问题:[问答题]
根据题意,将两个名称分别为Check1和Check2的复选按钮、一个名称为Text1的文本框和一个名称为Command1的命令按钮放入到窗体中,复选按钮的Caption属性分别为Item1和Item2,Text1的 Text属性为空,命令按钮的Caption属性为“选择”。双击Command1进入代码编写窗口,代码如下: PrivatehubCommand1Click() IfCheck1.Value=1Then’当选中Check1时 IfCheck2.Value=1Then’选中Check2 Text1.Text="不能全选" ’在Text1中显示不能全选 Else’没有选中Check2 Text1.Text="选中Item1" ’在Text1中显示选中Item1 EndIf Else’当没选中Check1时 IfCheck2.Value=1Then’选中Cheek2 Text1.Text="选中Item2"’显示选中Item2 E1se Text1.Text=""’不显示 EndIf EndIf EndSub 单击按钮运行程序,并按要求保存。
● 参考解析