Timer Control - Need a bit of help

[Sal]

The following code is on a form, and isn't doing what I want it to do.

Private Sub Timer1_Timer()
If Timer1.Enabled = True Then
cmdStart.Visible = False
Else
cmdStart.Visible = True
End If
End Sub

The command button is visible when the form loads, contrary to my desire. I want the form, which is a splash screen to load, then after about 12 seconds, the cmdStart command button appears. Allowing the user to start the actual program. By the way, the timer interval is set to 12,000. I think that is equal to 12 seconds

Thanks,
Sal

[Thai]

set the VISIBLE property of the command button to false in the IDE.. or.. in the form_load sub set cmd.visible = false, then all you gott do is set it back to true in your timer.

hope that helps,
Thai

[Sal]

Figured that out, probably just as you were typing the solution. :-O

Thanks

[Nitro]

Replace all of this:

Private Sub Timer1_Timer() 
 If Timer1.Enabled = True Then 
   cmdStart.Visible = False 
 Else 
   cmdStart.Visible = True 
 End If 
End Sub

With:

cmdStart.visible = not cmdStart.visible

[Sal]

Where can you get a good source of icons, preferably free? I need a door and some other stuff.

Sal

[Sam Finch]

Therer's loads of Icon's come with windows, Just look around your Hard drive.