nanoCAD forum

Hi there, I'm trying to use Goto but give me an error at line "GoTo Line1"

Call gotoStatementDemo

Sub gotoStatementDemo()
		number = 1
		' Evaluate number and branch to appropriate label.
		If number = 1 Then
				GoTo Line1
		Else
				GoTo Line2
		End If
		Line1:
		sampleString = "Number equals 1"
		GoTo LastLine
		Line2:
		'The following statement never gets executed because number = 1.
		sampleString = "Number equals 2"
		LastLine:
		' Write "Number equals 1" in the Debug window.
		ThisDrawing.Utility.Prompt sampleString
End Sub