THE TOUGHEST QUESTION IN THIS WHOLE FORUM!!!!!

[Sacofjoea]

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

[Chris]

What do you mean ... How can I make the status bar say "Active..." when they are moving the mouse?
???

it is this???

Private Sub Form_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)
StatusBar1.Panels(1).Text = "Active..."
End Sub

[Sacofjoea]

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?)

[Chris]

All you need to do is just save all this eeting into the registry and retrieve it in the Form_Load() events.

For more information, please refer to this Thread or this as well Registry

[Rodik]

Use this code for the menu click:

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

[dimava]

this is of the top of my head:

if check1.value = checked then
' your code

[Gen-X]

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

[Sacofjoea]

rodik...can you explain the code a little more...im not quite understanding what it does...

[Sacofjoea]

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?