This manual uses the following guidelines in its Visual Basic code:
Dim intSomeValue As Integer, strTextValue As String
Dim intStartNumber As Integer
' If, Then, and Str are Visual Basic keywords.
If intSomeValue = 0 Then strTextValue = Str(intStartNumber)
Dim dblIncome As Double
Dim strFirstName As String * 30
On Error GoTo ErrorHandler
	.
	.
	.
ErrorHandler:
	MsgBox Err.Description
' This is a comment; these two lines
' are ignored when the program is running.
Sub SomeCode()
	If intX > 0 Then
		intP = intQ
	End If
End Sub