VB选择题不太会的.doc

31804. 阅读下列程序：Sub Med(x%, ByVal y%)x = 3 * x: y = x + yEnd SubPrivate Sub Form_Click()Dim a%, b%a = 3: b = 8Med a, bPrint a, bEnd Sub运行后，单击窗体，输出结果为（ ）。(A) 3 8(B) 3 17(C) 9 8(D) 9 17(答案：C) 32009. 用（ ）语句打开顺序文件File1.txt后，可以进行写操作。(A) Open File1.txt For Input As #1 (B) Open File1.txt For Output As #1(C) Open File1.txt For Random As #1 (D) Open File1.txt For Binary As #1(答案：B)32006. 下列叙述正确的是（ ）。(A) 一个记录中所包含的各个元素的数据类型必须相同(B) 随机文件中每个记录的长度必须相同31807. 阅读如下程序，Dim S As Single, a As Single, b As Singlea = 1: b = 2plus S, a, bPrint S不能使其输出结果为3的plus过程为（ ）。(A) Sub plus(sum As Single, a As Single, b As Single)sum = a + bEnd Sub(B) Sub plus(ByVal sum As Single, a As Single, b As Single)sum = a + bEnd Sub(C) Sub plus(ByRef sum As Single, ByVal a As Single, ByVal b As Single)sum = a + bEnd Sub(D) Sub plus(sum As Single, ByRef a As Single, ByRef b As Single)sum = a + bEnd Sub(答案：B) 31604. 执行下列程序段后输出的结果是（ ）。s = 1For i = 1 To 3For j = 0 To i-1s = s + s * jNext jprint s;Next I(A) 1 2(B) 2 1(C) 2 2 12(D) 1 2 12(答案：D) S=1+0=1:s=1+1*1=2 S=2+2*0=2:s=2+2*1=4 S=4+4*0=4:s=4+4*1=8:s=8+8*B=24?????????????????)31409. 要使用自定义的鼠标指针，必须将MousePointer属性设置为（ ）。(A) 0(B) 15(C) 3(D) 99(答案：D) 31406. 下列叙述错误的是（ ）。(A) 在KeyDown事件中，键盘上输入的A或a被视作相同的字母 (B) 在KeyUp事件中，键盘上的1和右侧小键盘上的1视作不同的数字(C) 只有获得焦点的对象才能够接受键盘事件 (D) KeyPress事件中可以识别键盘上某个键的按下释放31405. 对文本框Text1编写如下事件过程：Private Sub Text1_KeyPress(KeyAscii As Integer)Dim b As Stringb = Chr(KeyAscii)KeyAscii = Asc(UCase(b))End Sub运行时，下列叙述正确的是（ ）。(A) Text1中无法输入字符(B) Text1中内容为b(C) Text1中输入的字符都变为大写(D) Text1中输入的字符都被转换成ASCII码(答案：C) 30907. 设置图框的（ ）使其按图片尺寸自动调整大小。(A) AutoSize属性为True(B) AutoSize属性为False(C) Stretch属性为True(D) Stretch属性为False(答案：A) 3090 5. 下列叙述错误的是（ ）。 (A) Scale方法用来定义新坐标系(B) 窗体缺省坐标原点在窗体的左下角(C) ScaleLeft和ScaleTop属性可改变坐标系的原点位置。(D) ScaleWidth和ScaleHeight属性可改变其对象高度和宽度的刻度单位(答案：B) 30804. 下列叙述错误的是（ ）。 (A) 标签和文本框都有Move方法(B) 标签和文本框都有Text属性(C) 标签具有Caption属性，而文本框没有(D) 文本框具有Locked属性，而标签没有(答案