2．【解析】首先按题目要求在窗体上画一个列表框、一个文本框和一个命令按钮，并分别设置它们的属性。在组合框属性窗口的List属性框中可以输入列表项初值，在组合框中选定一个数值，该数值出现在Text属性中。Val()函数是将字符型常量转换为数值型常量。表达式i Mod Val(Cb1.Text)＝0表示i能被Val(Cb1.Text)整除的条件。
【解题步骤】
(1)控件及其属性设置见表24-4。
表24-4
控件 |
控件名 | 属性名 | 属性值 |
| List(0) | 3 | ||
| 组合框 | Cb1 | List(1) | 7 |
| List(2) | 11 | ||
| 文本框 | Text1 | Text |
(2)参考代码：
三、综合应用题
【解析】菜单项是否有效通过Enabled属性值来确定，True为有效，False为无效。空字符串“""”用来清除文本框中的内容和判断文本框中是否有内容。当文本框得到焦点时，会产生GotFocus事件。变量which的作用是记录哪个文本框最后一次得到了焦点，即当前被激活的文本框。
【解题步骤】
(1)在属性窗口中将Text3文本框中的Visible属性设置为False，运行时Text3控件将不显示。
(2)菜单项的属性设置见表24-5。
表24-5
| 标题 | 名称 | 内缩符号 | 可见性 |
| 编辑 | Edit | 无 | True |
| 剪切 | Cut | 1 | True |
| 复制 | Copy | 1 | True |
| 粘贴 | Paste | 1 | True |
(3)程序提供代码：
责任编辑：小草
