英文VB教程 简体Visual Basic教程 繁体Visual Basic教程

第四课: 编写VB的程序代码



在第二课中,你已经学会如何编写程序代码并运行程序,但你可能还没有了解VB程序的逻辑。现在,让我们来学习一些基本编写VB程序代码的规则。

在VB中的每一个控件或对象,通常可以运行许多种活动或程序; 这些事件被列在下拉清单中的代码窗口。当你双击一个对象,并单击该程序箱时,这个代码窗口就会出现(如图 4.1所示)。其中事件包括点击一个命令按钮,按下一个键盘或拖曳一个对象等。每一个事件,你都需要写一个事件程序,以便进行一项或一系列的活动。

图 4.1

 

要编写一个事件的程序时,你需要双击一个对象。例如,如果你想写一个户点击命令按钮事件的程序,你可以双击该命令按钮。之后,一个如图4.2所示的事件程序将出现 。它的形式如图4.2:

图4.2

 

现在你可在PrivateSub Command1_Click .............End Sub 之间键入你的程序, 如下:

Private Sub 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计时器。让我们看看几个以下的例子:

范例4.1

Private Sub Command1_click

Label1.Visible=false

Label2.Visible=True

Text1.Text=”你是正确的!”

End sub 




范例 4.2

Private Sub Command1_click

Label1.Caption=” 欢迎”

Image1.visible=true

End sub

范例 4.3

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函数,那就是VALSTRVAL的作用把键入文本框的文字转换成数值, 而STR刚好相反,它是把数值转换成字串(纯文字 。让我们看看范例4.4范例4.5。)

范例4.4

Private Sub Form_Activate()

  Text3.text=text1.text+text2.text

End Sub

范例4.5

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把字串转换成数值了 。

❮ 上一课 下一课 ❯



版权所有©2008 Dr.Liew Voon Kiong。保留所有权利 。联系我们: VB面子书

[Privacy Policy]