实验八 常用控件实验八 常用控件.docVIP

实验八 常用控件（一） 【实验目的】 【实验内容】 1、界面设计如下：（不能编写任何代码）包含有四个复选框分别设置选中或不选中状态。窗体标题为“选择”。 【提示】【提示】Private Sub Form_Load() List1.AddItem 计算机 List1.AddItem 英语 List1.AddItem 数学 List1.AddItem 语文 End Sub Private Sub List1_DblClick() Label1.Caption = List1.Text End Sub 3、窗体上包含有两个名称分别为Op1和Op2的单选按钮，标题分别为“100-200的素数和” 和“200-400的素数和”。还有一个文本框和一个命令按钮，标题分别为“求和”。程序运行后，选中某个单选按钮，并单击“求和”按钮，则计算指明范围内的素数之和，并显示在文本框中。 Private Sub Command1_Click() Dim a%, b% If Option1.Value = True Then For a = 100 To 200 For b = 2 To a - 1 If a Mod b = 0 Then Exit For End If Next b If a = b Then Sum = Sum + a End If Next a Else For