Question

vb考试试题

一、选择题
1、在VB中，用Sring来表示的数据类型是：（D ）
A．长整型 B．字符型 C．逻辑型 D． 单精度型
2、下面哪一个不是Visual Basic保留的关键字？（ ）
（A）Loop（B）More（C）Mod（D）If
3.修改窗体的颜色通过设置窗体的（）属性：（ ）
（A）Backcolor（B）Forecolor（C）Caption（D）Appearance
4、Dim A=9 Dim B=10 Dim C=8 Myvars=Not (A>B and B>C) （ ）
A. True B. False
5、下面4项中合法的字符常数是：（ ）
A. ABC$ B. "ABC" C. 'ABC' D.ABC
6、在Visual Basic中，设置文本框内容的属性是：（ ）
A、Name B、Text C、Picture D、WindowState
7、在Visual Basic中，表示鼠标单击事件的是：（ ）
A、Activate B、DoubleClick C、Click D、MouseDown
8、For – Next 语句属于程序基本结构中的：（ ）
A、顺序结构 B、循环结构 C、分支结构 D、选择结构
9、保存一个VB程序时需要保存两个文件：（ ）
A、 工程文件和 .vbp B、窗体文件和 .frm文件
C、.vbp文件和 .frm文件 D、模块文件和 .bas文件
10、下列程序段的运行结果是：（ ）
Dim A As Integer , B As Integer
A = 15
B = 4
PRINT 4 + A \ B
A、7 B、 -7 C、7.75 D、8
11、下列程序段的运行结果是：（ ）
Dim A As Integer , B As Integer , X As Integer
A = 1 ：B = 2
IF A < B THEN X = A - B ELSE X = B + A
PRINT X
A、-1 B、 1 C、2 D、3
12、下列程序段的运行结果是： （ ）
Dim F As Long , I As Long
F = 0
FOR I = 3 TO -3 STEP –1
F = F + I
NEXT I
PRINT I
A、-5 B、 .5 C、0 D、. –4
13、设A=7,B=3,C=4, 则A MOD 3 + B ^ 3 / C \ 5 的值是（ ）
(A) 2 (B) 3 (C) 4 (D) 5
14、语句PRINT 25*4的输出结果是：（ ）
A、25*4 B、“25*4” C、100 D、出现错误信息
15．语句Dim x As Integer作用是:将x定义为（ ）变量。（ B ）
(A)单精度型 (B)整型 (C) 布尔型 (D)字符型

二、 完成程序
1、求任意两个数中的最大值：
Private Sub Command_Click ( )
Dim A As Single , B As Single , MIN As Single
A = Val (Text1 . Text ) ‘从文本框Text1接收第1个数
B = Val (Text2 . Text ) ‘从文本框Text2接收第2个数
IF A < B THEN

ELSE

END IF
Text3 . Text = ‘用文本框Text3输出最终结果
End Sub

2、按照从大到小的顺序输出100以内能被6整除的正整数
Private Sub Form_Click ( )
Dim I As Integer
Print “ 按照从大到小的顺序输出100以内能被6整除的正整数 “
For I = To Step
IF THEN Print I
Next I
End Sub
三、写出下列循环语句每一次循环中各变量的值及循环次数。
1、y=2
变量 1次 2次 3次 4次 ……
y
Do While y<=8
y=y+y
Loop

2、s＝ 0： t＝ l
变量 1次 2次 3次 4次 ……
k
s
t
For k＝ 1 To 4

s＝s＋k
t=t＊k
Next k

Answer 1

分有点少啊,反正没事做,帮帮你吧

一、选择题
1、在VB中，用Sring来表示的数据类型是：（D ）
A．长整型 B．字符型 C．逻辑型 D． 单精度型
2、下面哪一个不是Visual Basic保留的关键字？（B ）
（A）Loop（B）More（C）Mod（D）If
3.修改窗体的颜色通过设置窗体的（）属性：（A）
（A）Backcolor（B）Forecolor（C）Caption（D）Appearance
4、Dim A=9 Dim B=10 Dim C=8 Myvars=Not (A>B and B>C) （ A）
A. True B. False
5、下面4项中合法的字符常数是：（ B）
A. ABC$ B. "ABC" C. 'ABC' D.ABC
6、在Visual Basic中，设置文本框内容的属性是：（B ）
A、Name B、Text C、Picture D、WindowState
7、在Visual Basic中，表示鼠标单击事件的是：（ C）
A、Activate B、DoubleClick C、Click D、MouseDown
8、For – Next 语句属于程序基本结构中的：（B ）
A、顺序结构 B、循环结构 C、分支结构 D、选择结构
9、保存一个VB程序时需要保存两个文件：（C ）
这个题目就是有问题的.很明显是个傻冒出的题.通常情况下会有vbp和frm,但建个DLL就没有frm了.

A、 工程文件和 .vbp B、窗体文件和 .frm文件
C、.vbp文件和 .frm文件 D、模块文件和 .bas文件
10、下列程序段的运行结果是：（ A）
Dim A As Integer , B As Integer
A = 15
B = 4
PRINT 4 + A \ B
A、7 B、 -7 C、7.75 D、8
11、下列程序段的运行结果是：（A ）
Dim A As Integer , B As Integer , X As Integer
A = 1 ：B = 2
IF A < B THEN X = A - B ELSE X = B + A
PRINT X
A、-1 B、 1 C、2 D、3
12、下列程序段的运行结果是： （ D）
Dim F As Long , I As Long
F = 0
FOR I = 3 TO -3 STEP –1
F = F + I
NEXT I
PRINT I
A、-5 B、 .5 C、0 D、. –4
13、设A=7,B=3,C=4, 则A MOD 3 + B ^ 3 / C \ 5 的值是（ A）
(A) 2 (B) 3 (C) 4 (D) 5
14、语句PRINT 25*4的输出结果是：（C ）
A、25*4 B、“25*4” C、100 D、出现错误信息
15．语句Dim x As Integer作用是:将x定义为（ ）变量。（ B ）
(A)单精度型 (B)整型 (C) 布尔型 (D)字符型

二、 完成程序
1、求任意两个数中的最大值：
Private Sub Command_Click ( )
Dim A As Single , B As Single , MIN As Single
A = Val (Text1 . Text ) ‘从文本框Text1接收第1个数
B = Val (Text2 . Text ) ‘从文本框Text2接收第2个数
IF A < B THEN
MIN=B
ELSE
MIN=A
END IF
Text3 . Text =MIN ‘用文本框Text3输出最终结果
End Sub

2、按照从大到小的顺序输出100以内能被6整除的正整数
Private Sub Form_Click ( )
Dim I As Integer
Print “ 按照从大到小的顺序输出100以内能被6整除的正整数 “
For I = 1 To 100 Step 1
IF I mod 6 =0 THEN Print I
Next I
End Sub
三、写出下列循环语句每一次循环中各变量的值及循环次数。
1、y=2
变量 1次 2次 3次 4次 ……
y
Do While y<=8
y=y+y
Loop

2、s＝ 0： t＝ l
变量 1次 2次 3次 4次 ……
k
s
t
For k＝ 1 To 4

s＝s＋k
t=t＊k
Next k