乐博网lob.cn提示：调试环境为 vs2005 +  windows2003 / windows2008 / xp / vista

Public Class VarForm
    Private Sub VarForm_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        Dim a As Integer  ''声明变量名a是Integer类型，Dim a，b，c  As Integer声明多个变量
        a = 32  ''给变量a赋值32  '更多.net源码和实例，来自乐博网 www.lob.cn
        MessageBox.Show(a)  ''用弹出对话框输出变量a的值
    End Sub
End Class