Not really...lol
How can I make the status bar say "Active..." when they are moving the mouse?
Private Sub sbStatusBar_PanelClick(ByVal Panel As Lib.Panel)
'INSERT CODE HERE
End Sub
Printable View
Not really...lol
How can I make the status bar say "Active..." when they are moving the mouse?
Private Sub sbStatusBar_PanelClick(ByVal Panel As Lib.Panel)
'INSERT CODE HERE
End Sub
What do you mean ... How can I make the status bar say "Active..." when they are moving the mouse?
???
it is this???
Code:Private Sub Form_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)
StatusBar1.Panels(1).Text = "Active..."
End Sub
its been a week since I posted that, and I dont even know what the hell I am saying...
NEW QUESTION>>>
I have a program where it has the options menu (so uncommon) and I want to allow them to check an option on or off so that the program knows to do something at the end of the session... HOw do I make the program keep the info of the box checked or unchecked so that next time they load the program it is the way it was last time...(Would I store it in a .dll file or something?)
Use this code for the menu click:
Code:Private Sub mnuAny_Click()
mnuAny.Checked = Not mnuAny.Checked
SaveSetting "Your App Name", "Your Section", "Menu Key", mnuAny.Checked
End Sub
and this one in the load_form:
Code:Private Sub Form_Load()
mnuAny.Checked = GetSetting("Your App Name", "Your Section", "Meny Key", 0)
End Sub
this is of the top of my head:
Code:
if check1.value = checked then
' your code
I would suggest using App.Title rather than "Your app name" as a string because this will then insert the name of your application automatically from the settings you have given to the VB development environment.
This way if you decide to change your mind later and rename it you will get a new area in the registry.
Just a bit of standardization ;)
rodik...can you explain the code a little more...im not quite understanding what it does...
well can someone explain the functions he/she used in their post...?
Private Sub mnuAny_Click()
mnuAny.Checked = Not mnuAny.Checked
SaveSetting "Your App Name", "Your Section", "Menu Key", mnuAny.Checked
End Sub
and this one in the load_form:
Private Sub Form_Load()
mnuAny.Checked = GetSetting("Your App Name", "Your Section", "Meny Key", 0)
End Sub
whats mnuany.checked? and why do I put in my app name? and whats the section, and meny key?