双击窗体的任何一个部分,将出现一个空的过程:“Form_Load()”,这是一个非常重要的过程,它所驱动的事件就是该窗体被加载的事件,打个比方,就象计算机启动时的批处理程序(Autoexec.bat)。 这个程序里我们要对控件进行一些设置。我们刚才也曾对控件进行设置,但那是在程序设置中进行的,有时我们也需要在程序中改变某些控件的属性,通过程序代码。VB中规定,一个控件属性的访问方法:名称.属性,于是我们对本程序的控件进行如下设置:
Private Sub Form_Load()
Picture1.Visible = False
Picture2.Visible = False
Picture3.Visible = False
Text1.Visible = False
Text2.Visible = False
Text3.Visible = False
End Sub
Private表示此过程是局部的,Sub表示子过程的开始,与之相对的是End Sub表示过程的结束,Visible属性表示控件的可见性,这个属性的值有两个True和False。
注意:
VB里对大小写是不加区分的,而且,已定义的名称,以后再用到时,系统会自动把它变成相应的大写或小写。
小知识:
1.VB里的对变量及常量的规矩。
变量一般为Abc的格式,常量为ABC,另外这些变量和常量名不得同VB内的关键字相同,也不可以使用一些特殊符号,这些我们将在以后介绍,注意在学习中养成好习惯,使程序便于自己和别人的浏览。
2.程序书写的窍门:
不要真的一句一句把程序打完,利用快捷键:拷贝Ctrl C,剪切Ctrl T,粘贴Ctrl P。
按下F5,运行一下程序,现在发现只剩下无线钮了。如图1_5。

Private Sub Form_Load()
Picture1.Visible = False
Picture2.Visible = False
Picture3.Visible = False
Text1.Visible = False
Text2.Visible = False
Text3.Visible = False
Option4.Left = -2000
Option4.Value = True
End Sub
Left属性表示控件离窗体左边框的距离,设置为-2000,则在窗体内不会看到这个控件,并使之Value=True。再运行程序,一切如愿,如图1_6。

注意:为什么不用Option4.Visible=False?
因为,一旦设置无线钮为不可见,那么再使它的Value为真是没有意义的,不信自己试试。
下面我们可以继续进行了。在刚才的代码窗口里,将Object选择为Option1,Proc选择为Click,即得到一个Option1_Click的过程。代码如下:
Private Sub Option1_Click()
Picture1.Visible = True
Picture2.Visible = False
Picture3.Visible = False
Text1.Visible = True
Text2.Visible = False
Text3.Visible = False
Text1.Text = "再见,残酷的世界。"
End Sub
相同的建立Option2_Click和Option2_Click:
Private Sub Option2_Click()
Picture2.Visible = True
Picture1.Visible = False
Picture3.Visible = False
Text2.Visible = True
Text1.Visible = False
Text3.Visible = False
Text2.Text = "今天心情不错。"
End Sub
Private Sub Option3_Click()
Picture3.Visible = True
Picture2.Visible = False
Picture1.Visible = False
Text3.Visible = True
Text2.Visible = False
Text1.Visible = False
Text3.Text = "Hello,World。"
End Sub
好,我们的开山之作完成了!按下F5,玩一下吧。这个程序虽然简单,但也用到了许多基本知识,你开始感兴趣了吗?





