fork download

copy

Private desiredTop As Integer
 
Private Sub Command1_Click()
	desiredTop = 60
End Sub
 
Private Sub Command2_Click()
	desiredTop = 30
End Sub
 
Private Sub Timer1_Timer()
	If Picture1.Top < desiredTop Then
		Picture1.Top = Picture1.Top + 1
	Else If Picture1.Top > desiredTop Then
		Picture1.Top = Picture1.Top - 1
	End If
End Sub
 

Visual Basic.Net Compiler version 0.0.0.5943 (Mono 3.8 - tarball)
Copyright (C) 2004-2010 Rolf Bjarne Kvinge. All rights reserved.

/home/W7cQ5E/prog.vb (1,20) : error VBNC30203: Identifier expected.
/home/W7cQ5E/prog.vb (3,12) : error VBNC30203: Identifier expected.
/home/W7cQ5E/prog.vb (4,12) : error VBNC30203: Identifier expected.
/home/W7cQ5E/prog.vb (5,8) : error VBNC30203: Identifier expected.
/home/W7cQ5E/prog.vb (7,12) : error VBNC30203: Identifier expected.
/home/W7cQ5E/prog.vb (8,12) : error VBNC30203: Identifier expected.
/home/W7cQ5E/prog.vb (9,8) : error VBNC30203: Identifier expected.
/home/W7cQ5E/prog.vb (11,12) : error VBNC30203: Identifier expected.
/home/W7cQ5E/prog.vb (12,4) : error VBNC30203: Identifier expected.
/home/W7cQ5E/prog.vb (13,11) : error VBNC30203: Identifier expected.
/home/W7cQ5E/prog.vb (14,6) : error VBNC30203: Identifier expected.
/home/W7cQ5E/prog.vb (15,11) : error VBNC30203: Identifier expected.
/home/W7cQ5E/prog.vb (16,8) : error VBNC30203: Identifier expected.
/home/W7cQ5E/prog.vb (17,8) : error VBNC30203: Identifier expected.
There were 14 errors and 0 warnings.
Compilation took 00:00:00.2723930

Standard output is empty