05年9月VB试题.docVIP

（11）B） （12）C） （13）C） （14）D）（15）C） （11）假定一个 Visual Basic 应用程序由一个窗体模块和一个标准模块构成。为了保存该应 用程序，下列正确的操作是（ ）。 A）只保存窗体模块文件 B）分别保存窗体模块、标准模块和工程文件 C）只保存窗体模块和标准模块文件 D）只保存工程文件 （12）为了消除窗体上的一个控件，下列正确的操作是（ ）。 A）按回车键 B）按Esc键 C）选择（单击）要清除的控件，然后按Del键 D）选择（单击）要清除的控件，然后按回车键 （13）下列叙述中错误的是（ ）。 A）打开一个工程文件时，系统自动装入与该工程有关的窗体、标准模块等文件 B）当程序运行时，双击一个窗体，则触发该窗体的 DblClick 事件 C）Visual Basic 应用程序只能以解释方式执行 D）事件可以由用户引发，也可以由系统引发 （14）设 a=2，b=3，c=4，d=5，下列表达式的值是（ ）。 Not a=c Or 4*c=b^2 And ba+c A）-1 B）1 C）True D）False （15）设 a=5，b=10，则执行 c=Int((b-a)*Rnd+a)+1 后，c 值的范围为（ ）。 A）5～10 B）6～9 C）6～10 D）5～9 （16）C）（17）A） （18）B） （19）B） （20）A） （16）在窗体上画一个命令按钮，名称为 Command1，然后编写下列事件过程： Private Sub Command1_Cilck( ) a$ = software and hardware b$ = Right(a$, 8) c$ = Mid(a$, 1, 8) MsgBox a$, ,b$, c$, 1 End Sub 运行程序后，单击命令按钮，则在弹出的信息框的标题栏中显示的是（ ）。 A）software and hardware B）software C）hardware D）-1 （17）在窗体上有一个命令按钮和一个文本框，其名称分别为 Command1 和 Text1，把文本框的 Text 属性设置为空白，然后编写下列事件过程： Private Sub Command1_Click( ) a=InputBox(Enter an integer) b=InputBox(Enter an integer) Text1.Text=b+a End Sub 程序运行后，单击命令按钮，如果在输入对话框中分别输入 8 和 10，则文本框中显 示的内容是（ ）。 A）108 B）18 C）810 D）出错 （18）在窗体上画两个文本框，其名称分别为 Text1 和 Text2，然后编写下列程序： Private Sub Form_Load( ) Show Text1.Text=“ “ Text2.Text=“ “ Text1.SetFocus End Sub Private Sub Text1 Change( ) Text2.Text=Mid(Text1.Text,8) End Sub 程序运行后，如果在文本框 Text1 中输入 BeijingChina，则在文本框 Text2 中显示的 内容是（ ）。 A）BeijingChina B）China C）Beijing D）BeijingC （19）在窗体上画一个列表框和一个命令按钮，其名称分别为 List1 和 Command1，然后编 写下列事件过程： Private Sub Form_Load( ) List1.AddItem Iterm 1 List1.AddItem Iterm 2 List1.AddItem Iterm 3 End Sub Private Sub Command1_Click( ) List1.List(List1.Listcount)=AAAA End Sub 程序运行后，单击命令按钮，其结果为（ ）。 A）把字符串AAAA添加到列表框中，但位置不能确定 B）把字符串AAAA添加到列表框的最后（即“Item 3”的后面） C）把列表框中原有的最后一项改为AAAA D）把字符串AAAA插入到列表框的最前面（即“Item 1”的前面） （20）有下列事件过程： Private Sub Form_Click( ) Dim x As Integer, n As Integer x=1 n=0 Do While X28 x=x*3 n=n+1 Loop Print x,n End Sub 程序运行后，单击窗体，输出结果是（ ）。 A）81 4 B）56 3 C）28 1 D）243 5 （21）D） （22）A）（23）A） （24）D）（25）C） （21）有下列事件过程： Private