<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">
<HTML><HEAD>
<META http-equiv=Content-Type content="text/html; charset=us-ascii">
<META content="MSHTML 6.00.6000.16640" name=GENERATOR></HEAD>
<BODY>
<DIV><SPAN class=085304614-15042008><FONT face=Arial
size=2>Hi</FONT></SPAN></DIV>
<DIV><SPAN class=085304614-15042008><FONT face=Arial
size=2></FONT></SPAN> </DIV>
<DIV><SPAN class=085304614-15042008><FONT face=Arial size=2>Thought I'd pass
this on. Today I used a Listbox at the bottom of a screen for the user to
select the next action after leaving the last input field on a screen. I thought
it was cool, and didn't know if it was well known use of
Listbox.</FONT></SPAN></DIV>
<DIV><SPAN class=085304614-15042008><FONT size=2></FONT></SPAN> </DIV>
<DIV><SPAN class=085304614-15042008><FONT size=2>::end:</FONT></SPAN></DIV>
<DIV><SPAN class=085304614-15042008><FONT size=2>@wlf1::'</FONT></SPAN></DIV>
<DIV><SPAN class=085304614-15042008><FONT size=2>::cls("21") ; cursor
off:</FONT></SPAN></DIV>
<DIV><SPAN class=085304614-15042008><FONT size=2>::showctr("22") "Please
Select":</FONT></SPAN></DIV>
<DIV><SPAN class=085304614-15042008><FONT size=2>::dim
listbox1(7):</FONT></SPAN></DIV>
<DIV><SPAN class=085304614-15042008><FONT size=2>::listbox1("1") =
"Top":</FONT></SPAN></DIV>
<DIV><SPAN class=085304614-15042008><FONT size=2>::listbox1("2") = "Vend
Inst":</FONT></SPAN></DIV>
<DIV><SPAN class=085304614-15042008><FONT size=2>::listbox1("3") = "Prev
Vend":</FONT></SPAN></DIV>
<DIV><SPAN class=085304614-15042008><FONT size=2>::listbox1("4") = "Next
Vend":</FONT></SPAN></DIV>
<DIV><SPAN class=085304614-15042008><FONT size=2>::listbox1("5") = "Total
Scr":</FONT></SPAN></DIV>
<DIV><SPAN class=085304614-15042008><FONT size=2>::listbox1("6") = "Main
Scr":</FONT></SPAN></DIV>
<DIV><SPAN class=085304614-15042008><FONT size=2>::listbox1("7") = "More
Opts":</FONT></SPAN></DIV>
<DIV><SPAN class=085304614-15042008><FONT size=2>::List1Choice =
listbox(listbox1,,,"23",,"1","80"):</FONT></SPAN></DIV>
<DIV><SPAN class=085304614-15042008><FONT size=2>:List1Choice eq "1":msgbox
"Choice1" ; cursor on ; screen ,1:</FONT></SPAN></DIV>
<DIV><SPAN class=085304614-15042008><FONT size=2>:List1Choice eq "2":msgbox
"Choice2" ; cursor on ; screen ,1:</FONT></SPAN></DIV>
<DIV><SPAN class=085304614-15042008><FONT size=2>:List1Choice eq "3":msgbox
"Choice3" ; cursor on ; screen ,1:</FONT></SPAN></DIV>
<DIV><SPAN class=085304614-15042008><FONT size=2>:List1Choice eq "4":msgbox
"Choice4" ; cursor on ; screen ,1:</FONT></SPAN></DIV>
<DIV><SPAN class=085304614-15042008><FONT size=2>:List1Choice eq "5":msgbox
"Choice5" ; cursor on ; screen ,1:</FONT></SPAN></DIV>
<DIV><SPAN class=085304614-15042008><FONT size=2>:List1Choice eq "6":msgbox
"Choice5" ; cursor on ; screen ,1:</FONT></SPAN></DIV>
<DIV><SPAN class=085304614-15042008><FONT size=2>:List1Choice eq "7":msgbox
"Choice7" ; cursor on ; screen ,1:</FONT></SPAN></DIV>
<DIV><SPAN class=085304614-15042008><FONT size=2>:List1Choice gt "7":List1Choice
= "" ; cursor on ; goto @wlf1:</FONT></SPAN></DIV>
<DIV><SPAN class=085304614-15042008><FONT size=2>::end:</FONT></SPAN></DIV>
<DIV><SPAN class=085304614-15042008><FONT size=2>::declare
List1Choice:</DIV></FONT></SPAN>
<DIV><SPAN class=085304614-15042008><FONT face=Arial
size=2></FONT></SPAN> </DIV>
<DIV><SPAN class=085304614-15042008><FONT face=Arial size=2>Bob
Simcoe</FONT></SPAN></DIV>
<DIV><SPAN class=085304614-15042008><FONT face=Arial size=2>Mid-City Office
Furniture, Inc.</FONT></SPAN></DIV>
<DIV><SPAN class=085304614-15042008><FONT face=Arial
size=2></FONT></SPAN> </DIV>
<DIV><SPAN class=085304614-15042008><FONT face=Arial
size=2></FONT></SPAN> </DIV></BODY></HTML>