隶书。其代码如下 Private Sub Option Click( Text1 FontName=”宋体” End sub Private Sub Option2 Click( Textl. FontName=(12) End Sub (10) (11) (12) 六、编程题。(共36分) 1.输入3个数,输出其中最大的数。(9分 2.建立一个水平滚动条,其Max属性为25,Mn属性为0, SmallChange属性为1, Large Change属性为20,ale属性初始值为50。另 有一个文本框,它显示滑块当前位置的值。(9分) 3.用 InputBox输入长和宽,求长方形的周长。(9分) 4.利用文本框和命令按钮控件制作密码框。(9分) 《 Visual basic程序设计》试卷三答案 单项选择题 1.D2.C3.A4.C5.D6.B7.D8.A 二、判断对错。 1.√2.X3X4.√5.√6.√7.X8.√9X10.√ 将下列命题用ⅤB布尔表达式表示 1.(P Mod 2=0) and (P>0) 2.(C>A)And( c>B) 四、写出程序(段)的输出结果。 10 五、程序填空。隶书。其代码如下： Private Sub Option1_Click( ) Text1.FontName=”宋体” End Sub Private Sub Option2_Click( ) Text1.FontName= (12) End Sub (10) (11) (12) 六、 编程题。（共 36 分） 1. 输入 3 个数，输出其中最大的数。（9 分） 2. 建立一个水平滚动条，其 Max 属性为 255，Min 属性为 0， SmallChange 属性为 1，LargeChange 属性为 20，Value 属性初始值为 50。另 有一个文本框，它显示滑块当前位置的值。 （9 分） 3. 用 InputBox 输入长和宽，求长方形的周长。（9 分） 4. 利用文本框和命令按钮控件制作密码框。（9 分） 《Visual Basic 程序设计》试卷三答案 一、单项选择题。 1. D 2. C 3. A 4. C 5. D 6. B 7. D 8. A 二、判断对错。 1．√ 2. X 3.X 4. √ 5. √ 6. √ 7.X 8. √ 9.X 10. √ 三、 将下列命题用 VB 布尔表达式表示。 1. (P Mod 2=0 ) and ( P>0 ) 2. (C>A ) And ( C>B) 四、写出程序（段）的输出结果。 10 五、 程序填空