计算机二级考试VB2014年试题6_第2页

简单应用题 
　　(1)本题主要考查复选框的使用。单击命令按钮触发Click事件，程序中需要检测复选按钮的状态，可 
　　以通过Value属性来实现。如果复选按钮被选中，则Value值为1，否则Value值为0。 
　　①在窗体上先按要求建立控件，设置控件属性，程序中用到的控件及属性如下表所示：

　　 
　　②打开工程资源管理器，右击窗体，选择查看代码项，在弹出的代码窗口输入代码如下：Option Explicit 
　　Private Sub c1_lick() 
　　Dim s As String 
　　s="我的爱好是" 
　　If Ch1．Value=1 Then 
　　  s=s＆Ch1．Caption 
　　End If 
　　If Ch2．Value=1 Then 
　　  s=s＆Ch2．Caption 
　　End If 
　　IfCh3．Value=1 Then 
　　  s=s＆Ch3．Caption 
　　End If 
　　Print s 
　　End Sub 
　　③调试并运行程序 
　　④按题目要求存盘。 
　　(2)①打开题目所给工程文件。 
　　②将注释浯句改为： 
　　Form1．MousePointer=0  
　　Select Cave Index 
　　③按要求深存文件即完成本题。