在第二课中,你已经学会如何编写程序代码并运行程序,但你可能还没有了解VB程序的逻辑。现在,让我们来学习一些基本编写VB程序代码的规则。
在VB中的每一个控件或对象,通常可以运行许多种活动或程序; 这些事件被列在下拉清单中的代码窗口。当你双击一个对象,并单击该程序箱时,这个代码窗口就会出现(如图 4.1所示)。其中事件包括点击一个命令按钮,按下一个键盘或拖曳一个对象等。每一个事件,你都需要写一个事件程序,以便进行一项或一系列的活动。
要编写一个事件的程序时,你需要双击一个对象。例如,如果你想写一个户点击命令按钮事件的程序,你可以双击该命令按钮。之后,一个如图4.2所示的事件程序将出现 。它的形式如图4.2:
图4.2
现在你可在PrivateSub Command1_Click .............End Sub 之间键入你的程序, 如下:
Sub 实际上是整个程序的一部分, 也称为子程序。
程序码是由许多的陈述句所组成,它们的作用是设定某些性能或启动一些行动。Visual Basic中的程序代码的语法几乎和英语一样,因此学习起来相当容易 。当然,对那些英语还未达标的朋友们,你必须去上一些英语课程。搞好英语之后对你学习VB 肯定有莫大的帮助。
用来设定一个对象的属性或传递价值于它的语法是:
object.property
对象和属性是以一个点来分开 。举例来说,form1.show 的意思是显示表1 , label1.visible =true 的意思是把 label1设置为可被显示, Text1.text = " VB6" ,目的就是要把VB6显示于text1的文本 框中。Text2.text = 100 ,是把100的数目显示于text2文本框中。 Timer1.enabled =false,是要禁用Timer1计时器。让我们看看几个以下的例子:
Private Sub Command1_click
Label1.Visible=false
Label2.Visible=True
Text1.Text=”你是正确的!”
End sub
Private Sub Command1_click
Label1.Caption=” 欢迎”
Image1.visible=true
End sub
Private Sub Command1_click
Pictuire1.Show=true
Timer1.Enabled=True
Lable1.Caption=”开始计数“
End sub
在范例4.1 中,点击该命令按钮将标签label1隐藏而显示标签label2,本文框textbox1 则显现"你是正确的"的文字。在范例4.2 中,点击该命令按钮使标签label1显现"欢迎"的文字,也显现影像Image1。
在范例4.2中,点选该命令按钮将显示picture1,计时器开始运行和把label1的字幕更改为"开始计数" 。 用法不涉及设定性能也是和英语一样,其中一些命令是 Print, If…Then….Else….End If, For…Next, Select Case…..End Select , End Exit Sub. ,并最终退出等。举例来说,Print " Visual Basic" ,目的就是要在屏幕上显示文本Visual Basic,End 是结束程序。其他指令将在后面的课程中有更详尽的解释。
那些涉及计算及数学的程序代码是很容易编写的,就如做数学一样。不过,为了编写一个涉及计算程序,,你需要了解在VB中基本的数学运算符,因为他们并非完全和平常的数学一样。在VB中,除了+
- 是一样外,乘法是用* ,而除法则用/ ,X^n 代表Xn,平方根是Sqr。其他的数学函数有Sin,
Cos, Tan, Log 等。除此之外,还有两个重要的VB函数,那就是VAL和STR 。
VAL的作用把键入文本框的文字转换成数值, 而STR刚好相反,它是把数值转换成字串(纯文字 。让我们看看范例4.4和范例4.5。)
Private Sub Form_Activate()
Text3.text=text1.text+text2.text
End Sub
Private Sub Form_Activate()
Text3.text=val(text1.text)+val(text2.text)
End Sub
当你执行范例4.4的 程序时,如在本文框textbox1 键入12 和在本文框textbox2键入3 ,其结果是123 ,这是不对的。这是因为VB把数字当作字串来对待,它只是把两个字符串起来,而不是加起来。另一方面,范例4.5则会给你正确的结果,即15,这是因为VAL把字串转换成数值了 。