(1)在考生文件夹下有一个工程文件sj3.vbp,相应的窗体文件为sj3.{rm。其功能是在Text
文本框中输入一个数N,单击命令按钮计算从0到N的所有素数的和,并在Text2中显示出来。运行程序如图7-3所示。 简单应用题
(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
③按要求深存文件即完成本题。
