VBkaoshi评析.docVIP

1．基本操作 （1）解析：在窗体上建立好控件后，先设置控件属性，再编写事件过程。 菜单在菜单编辑器窗口中创建；在程序运行是控件是否可见该控件的Visible属性决定，如果将该值设置为True时，在对象可见，如果设置为为False时，则将隐藏该控件。 解题步骤： 第一步：建立界面并设置控件属性。 程序中用到的控件及其属性见表12-1。 表 12-1 控 件 属 性 设 置 值 菜单 名称 标题 Op 操作 菜单 名称 标题 Dis 显示 菜单 名称 标题 Hid 隐藏 文本框 Name Text Text1 计算机考试 第二步：编写程序代码。 参考代码： Private Sub Dis_Click() Text1.Text = 计算机考试 End Sub Private Sub Hid_Click() Text1.Visible = False End Sub 第三步：调试并运行程序。 第四步：按题目要求存盘。 （2）解析：在窗体上建立好控件后，先设置控件属性，再编写事件过程。 在属性窗口中，通过List属性设置列表项的内容。向列表框中添加文本通过Additem方法来实现，其格式为： 列表框.AddItem 项目字符串[.索引值] AddItem方法把项目字符串的文本内容放入列表框中。 解题步骤： 第一步：建立界面并设置控件属性。 程序中只用到的控件及其属性见表12-2。 表 12-2 控件 属性 设置值 列表框 Name L1 第二步：编写程序代码。 参考代码： Private Sub L1_Click() L1.AddItem 真有礼貌 End Sub 第三步：调试并运行程序。 2．简单应用 （1）解析：时钟控件作用是以一定的时间间隔激发计时器事件（Timer）而执行相应程序代码，Interval属性决定时间间隔的长短，以毫秒为单位，所以要改变两个图片交替的速度可将滚动框的Value值赋值给Interval属性即可；当时钟控件的Enabled属性为True时，时钟控件才起作用，当为False时该控件不起作用。所以要使开始的时候图片不改变，将Timer控件的Enabled属性设置为False，单击命令按钮要使图片开始改变时，将时钟控件的Enabled属性设置为True；程序运行时用LoadPicture()方法在图形框里装入图形，其格式为： 图形框.Picture=LoadPicture(图形文件名)。 解题步骤： 第一步：建立界面并设置控件属性。 程序中用到的控件及其属性见表12-3。 表 12-3 控 件 属 性 设 置 值 按钮 Name Caption C1 开始 图象框 Name Image1 计时器 Name Timer1 滚动框 Name HScroll1 第二步：编写程序代码： 程序提供的代码： Private Sub C1_Click() Timer1.Enabled = True End Sub Private Sub HScroll1_Change() Timer1.? = 1000 - HScroll1.? End Sub Private Sub Timer1_Timer() Static i As Integer If i = 0 Then Image1.Picture = ?(2.ico) i = 1 Else Image1.Picture = ?(1.ico) i = 0 End If End Sub 参考代码： Private Sub C1_Click() Timer1.Enabled = True End Sub Private Sub HScroll1_Change() Timer1.Interval = 1000 - HScroll1.Value End Sub Private Sub Timer1_Timer() Static i As Integer If i = 0 Then Image1.Picture = LoadPicture(2.ico) i = 1 Else Image1.Picture = LoadPicture(1.ico) i = 0 End If End Sub 第三步：调试并运行程序。 第四步：按题目要求存盘。 （2）解析：在窗体上建立好控件后，先设置控件属性，再编写事件过程。 按钮标题由Caption来设置；在属性窗口中通过Picture属性来设置图像框的图片。控件的大小由Width属性和Height属性来设置，Wi