Off Topic — HabitableZone

Off Topic

Woo Hoo!

Learning VB6

I just spent over an hour trying to get a command button To toggle text in a textbox on/off. After various atemps at for next loops I rememeber the static varible and came up with this.

Private Sub Command3_Click()
Static Counter As Integer

Counter = Counter + 1

If Counter Mod 2 = 0 Then
RecordLap.Text = " "
Else
Select Case List1.ListIndex
Case 0
RecordLap.Text = "2Mins32secs"

Case 1
RecordLap.Text = "1min67secs"

End Select

End If

End Sub

Rob -I love this stuff! (When it works)

Log in or register to post.

The whole thread