各位XDJM帮忙做下VB题啊,感激不尽

zorro

 

程序设计语言VB试题

一、选择题(每题2分，共10分) 1 I. [, z+ A% X% e5 J5 H; x* c5 j* p9 w  

1. 表达式4+5\6*7/8 Mod 9的值是     B     。

A) 4      B) 5        C) 6       D) 7

2. 程序运行时复选框如果选中，其Value值是   C    。

A) 0         B) 1         C) True      D) False

3. 双击窗体中的对象后，Visual Basic将显示的窗口是    D    。
　  A）项目（工程）窗口　 B）工具箱　 C）属性窗口　 D）代码窗口

4. 以下选项中，不属于单选按钮属性的是          。
　  A）Enabled　 B)  Caption　 C）Name　 D）Min
5. 当拖动滚动条中的滚动块时，将触发滚动条的事件是    C    。

A) Move   B)  SetFocus   C) Scroll   D) Change

 

二、简述下图程序界面的设计步骤（包括添加控件、设置属性和编程，20分）

 

 

 

三、说明下列程序的运行结果或回答问题(每题10分，共20分)

1. 以下程序的输出结果是          。

Private Sub Command1_Click()

Dim a(9) As Integer, p(3) As Integer

k = 3

For i = 1 To 9

a(i) = i

Next i

For i = 1 To 3

p(i) = a(i * i)

Next i

For i = 1 To 3                                  第  2  页，共  2  页

k = k + p(i) * 2

Next i

Print k

End Sub

 

2. 在窗体上画一个命令按钮（其Name属性为Command1），然后编写如下事件过程：

Private Sub Command1_Click( )

Dim a（4,4）

For i=1 To 3

For j=1 to 3

a(i,j)=(i-1)*2+j

Next j

Next i

For i=1 To 3

For j=1 to 3

Print a(i,j);

Next j

Next i

End Sub

程序运行后，单击命令按钮，其输出结果为       。

 

四、编写程序(前3小题每题10分，4小题20分，共50分)

1. 设计在一框架中包含三个单选框，只有当其3选中时，才在Text2中显示"Good"字符。

2. 从文本框输入你的3位号码，如果是"358"，在标签框输出一等奖信息；如果前两位是"35"，输出二等奖信息；如果前一位是"3"，输出三等奖信息；其余则输出谢谢参与信息。

3. 机票优惠，某航空公司规定在7-9月份，如果订票数超过20张，则票价优惠15%；如果超过10张，则票价优惠5%；在1-5月份和11月份，如果订票数超过20张，则票价优惠25%，如果超过10张，则票价优惠15%。从输入对话框中输入票价、订票数及月份，用文本框显示出所需金额。

4. 输入6个学生的数学成绩，按不及格、60-70、71-99、100统计各个分数段的人数。

 

漂泊Θ

有没人知道啊...迫切需要答案...

熟悉的路

当年考试 女生给的答案...感谢那位女生~

专属的幸福

全忘了

刘建明

我上学期VB差点挂掉.....赶快闪....

有心理阴影

熟悉的路

晕  做了那是教坏你....我不会....当年VB考试女生给的答案

中西瓜

- -+ 简单......................

七色玲珑石

.....

猴子很忙

飘过....

ZZ!

哦要 召唤VB小王子

草草の马甲

袄要

傻子袄扫册来

ZZ!

哦哟，一道啊不懂