Dim s as String
   Dim i as Integer
   Dim last as Integer
    
s="Yahoo,Excite,Google,Ask.com,DogPile,AltaVista,HotBot,WebCrawler,Lycos 
"
   last= CountFields(s,",")
   //Me.caption="Month"
   //Me.captionalign=0 //flush left
   Me.hasMenu=1     //menu on right
   For i=1 to last
     me.addRow NthField(s,",",i)
   Next

I have the above code to populate a bevelbutton menu
Now how do I do something with it say the user clicked on Yahoo
I want to do a htmlviewer1.loadurl "http://www.yahoo.com";

Brian

_______________________________________________
Unsubscribe or switch delivery mode:
<http://www.realsoftware.com/support/listmanager/>

Search the archives:
<http://support.realsoftware.com/listarchives/lists.html>

Reply via email to