crayon-syntax-highlighter/util/sample/vb.txt

11 lines
230 B
Plaintext
Raw Permalink Normal View History

2019-08-30 19:30:19 +02:00
Option Explicit
Dim Count As Integer
Private Sub Form_Load()
Count = 0
Timer1.Interval = 1000 ' units of milliseconds
End Sub
Private Sub Timer1_Timer()
Count = Count + 1
lblCount.Caption = Count
End Sub