计算机二级vb选择题新.xls

序号问题 abcd 答案 1 下列哪一组语句正确将文本框Text1 的全部内容一次性写入文件（） Open “Text.dat” For Output As #1 Print #1 Text1.text Close #1 Open “Text.dat” For Input As #1 Print #1 Text1.text Close #1 Open “Text.dat” For Input As #1 Print #1 Text1.text Close #1 Open “Text.dat” For Output As #1 For I= 1 to Len(Text1.text) Print #1 Mid(Text1.text,I,1) Next I Close #1 a 2 设已有语句Option Base 1，下面哪 一组语句正确定义了有10个整型元素 的数组（） dim x(9) as integer dim x(n) as integer n=10 dim x(10) as integer dim x(n) as integer n=9c 3下面关于比较排序说法不正确的是 在每一轮排序时找最小数（递 增次序）的下标,内循环结束 时,再交换最小数的位置 在每一轮排序时将相邻的数比 较,当大小次序不对就交换位置 比较排序又称冒泡排序 在每一轮排序时（递增次 序），内循环结束，则最小数 冒出 a 4事件KeyPress由（ ）引发。 按下一个会产生ASCII码的键 时被触发。 按下键盘上任一个键时被触发 。 按下并释放一个会产生ASCII 码的键时被触发。 以上答案都不对。c 5事件KeyUp由（ ）引发。 按下一个会产生ASCII码的键 时被触发。 按下键盘上任一个键时被触发 。 释放一个会产生ASCII码的键 时被触发。 释放键盘上任一个键时被触发 。 d 6事件KeyDown由（ ）引发。 按下一个会产生ASCII码的键 时被触发。 按下键盘上任一个键时被触发 。 释放一个会产生ASCII码的键 时被触发。 释放键盘上任一个键时被触发 。 b 7关于整型变量下列说法错误的是（） 用于保存整数类型符为%最大整数为 216-1占两个字节c 8 关于逻辑数据类型下列说法正确的是 （） 该数据类型可进行数值运算该数据类型只有两个值该数据类型占1个字节定义该类型的关键字为boolb 9 下列符号中，哪一个是不合法的变量 名（） 124-qa_q变量xyza 10 下列符号中，哪一个是合法的变量名 （） 1_1123_aintegersinxd 11 若选拔优秀毕业生的条件是：年龄 （age）小于19岁，三门功课总分 (total)大于285分，其中有一门 (mark)为100分，表达式应写为 age285 and mark1=100 or mark2=100 or mark3=100 age285 or mark1=100 or mark2=100 or mark3=100 age285 and （mark1=100 or mark2=100 or mark3=100） (age285) and (mark1=100 or mark2=100 or mark3=100) c 12 语句SELECT CASE X 中,X为一整型变 量，下列CASE语句中,哪一句表达式 是错误的（） CASE IS20CASE 1 TO 10CASE X10CASE 2,4,6c 13 下面哪一条语句正确画出了一组半径 由5到10每次递增1，圆心在（15， 15），红色的同心圆（） For I= 5 to 10 Circle(15,15),I,RGB(255,0, 0) Next I For I= 1 to 10 Circle I,(15,15),RGB(0,255,0) Next I For I= 5 to 10 Circle I,(15,15),RGB(255,0,0) Next I For I=5 to 10 Circle(15,15),I,RGB(0,255, 0) Next I a 14 下列数据类型与其类型说明符对应正 确的是() %-整型$-货币型-字符型!长整型a 15 关于 VB 中的运算符，以下说法正确 的是() “ ”是算术运算符，含义是 “乘法运算”； “”是关系运算符，含义是 “不等于”； “!”是逻辑运算符，含义是 “非”； “And”是逻辑运算符，含义 是“与”。 d 1 序号问题 abcd 答案 16 下面说明符代表字符串类型的是()%#$c 17 表达式NOT(“ABC” = “ABK”) OR (“abc” = “habc”)的结果为( )。 TRUEFALSETURE不能确定a 18 已知X=“OPQRSTXYZ”，表达式 Left$(X,3)+MID$(X,3,4) 的结果为( ）。 OPQQROPQXYZOPQQRSTOPQTXYZc 19 “1234” J; I 12 0 4 15 0 4 12 3 115 3 1b 180 若要使用户不能修改文本框TextBox1中内 容，应修改 属性 LockedMultiLinePassWordCharScrollBara 181 下列命令按纽事件过程执行后，输出的结 果是 Private sub command_click( ) for m=1 to 10 step 2 a=10 for n=1 to 10 step 2 a=a+2 next n next m print a end sub 605030 20 d 182 在窗体上添加一个命令按纽，名为 command1，其事件过程如下，程序运行 后，其输出的结果为 Private sub_command1_click( ) Dim a A=array(1,2,3,4,5) For k=1 to 4 S=s+a(k) Next k Print s End sub 101415120 b 183 下列表达式中，_的值为false“BCD“12345“&“ABC“ Not2*5=114=4 and 52+2c 184 下列程序执行后，变量S的值为 Dim s As Long, x As Integer s = 0 x = 1 Do While x = 5 x = x + 2 k = k - 1 Loop 2126 8 b 200 当一个工程含有多个窗体时，其中的启动 窗体是 启动VisualBasic时建立的窗体第一个添加的窗体最后一个添加的窗体在“工程属性”对话框中指定的 窗体 d 201 在窗体上画一个文本框，然后编写如下事 件过程 Private Sub Text1_KeyPress(KeyAscii As Integer) Dim char As String char=Chr(KeyAscii) KeyAscii=Asc(Ucase(char) Text1.Text=String(6