编写 Visual Basic 2012 代码

我们已经知道 Visual Basic2012 是一个面向对象和事件驱动编程语言。事实上,所有Windows应用程序是事件驱动的。事件驱动是指用户将决定如何去应用一个电脑程序,比如单击命令按钮,在文本框中输入文字,或关闭应用程序等等。和事件有密切关联的是对象。用户的动作,如单击或按键盘上的一个键都是发生在一个对象的事件。类有拥事件,因为它创造了即时的类或对象。当我们启动一个 Visual Basic2012 中的Windows 应用程序时,我们将看到一个默认窗体Form1,但实际上Form1 类是继承自Form 类的 System.Windows.Forms.Form,如图5.1所示。

vb2012_fig5.1

 

要在Visual Basic 2012 集成开发环境中开始编写代码,你可以点击表格的任何部分进入代码窗口,如图5.2所示。这是以Private Sub 开始和与End Sub结束的一个事件结构。此程序包含在Form1类和事件Load,他们是以一个下划线结合在一起的,即Form_Load。

Public Class Form1

Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load

End Sub

End Class

vb2012_ch5.2

图5.2

当你点击代码窗口右上窗格时,你会看到和Form1类有关联的其他事件,如 Click,CursorChanged时,DoubleClick 和 DragDrop 等,如图5.3所示,

vb2012_ch_fig5.3

图5.3

 

5.2 编写代码

要编写事件程序代码,我们必须把代码键入在 Private Sub …….End Sub 之间,如下面的程序所示:

Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load

Me.Text = “我的第一个VB2012项目”

Me.ForeColor = Color.LightGoldenrodYellow

Me.BackColor = Color.RoyalBlue

End Sub

End Classs

我的第一个Visual Basic2012项目的第一行代码将改变输出界面的标题,第二行代码会改变前景对象的颜色为浅金黄色而和最后一行代码改变背景颜色为宝蓝色。等于(=)操作符是用来指定在代码中的对象的属性,如把Form1的前景设定为黄色。Me是到Form1类的名字。我们也把以上每一行的代码称为语句。因此,该程序的操作将依赖于程序员输入的语句。

输出界面如图5.4所示:

vb2012_ch_fig5.4

图5.4

这里是另一个例子。在这个项目中,你插入一个按钮到表单中,将其标签文本更改为“显示隐藏的名字”。点击此按钮,在代码窗口中输入下面的代码:

Private Sub Button1_Click_1(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

Dim 名字1, 名字2, 名字3, 全部名字As String
名字1 = “乔治”
名字2 = “陈小刚”
名字3 = “李媚云”
全部名字=名字1 & “,”&名字2 & “和“& 名字3
MsgBox(” 隐藏的名字是 ” & 全部名字,”隐藏的名字”)

End Sub

关键字Dim是用来声明变量名字1,名字2 和名字3 是字符串,这意味着他们只能处理文字。“&”符号是把全部名字串连起来。函数MsgBox的是显示在消息框中的字符串,MsgBox函数的最后一个参数“隐藏的名字”是显示消息框的标题。输出如图5.4所示:

vb2012_fig5.5

图5.5