vb全部上机练习题

VB上机练习题3
1、实验教材P9 (1)
2、实验教材P9 (2)
3、实验教材P9 (3)
4、在窗体上设计一个标签，要求标签有边框，当程序运行时标签中显示内容为“验证性实验”，窗体的背景颜色为“黄色”，当单击标签时，显示的内容水平居中对齐，双击标签时，标签的背景透明。

5、按照下面窗体的式样设计窗体界面，然后编写程序代码实现下面的加法器功能：当程序运行时单击“出题”按钮，分别在文本框Text1和Text2中随机出[10—90]之间的两位整数（提示：用随机函数Rnd），当单击“=”按钮时，在文本框Text3中显示计算的结果，单击“清除”按钮时，三个文本框中的内容全部清除。

VB上机练习题4
1、设a=2, b=3, c=4, d=5, 求下列表达式的值，将答案写在每题的后面。

(1) a+c < b+d
(2) a+b <> c+d
(3) a > b AND c<=d
(4) b < c AND d>a
(5) a < c OR d<=b
(6) a > b OR c<=d
(7)NOT a>b OR c>=d
(8)3>2*b OR a=c AND b <> c OR c< d
2、将下列数学式子写成vb表达式，将答案写在每题的后面。

(1) 5+(a+b)2
(2)e2+2
(3)2a(7+b)
(4)8e3ln2
(5)
(6)
3、将答案写在每题的后面。

(1)
(2)print chr(97)
(3)print Asc(“B”)
(4)print Asc(“def”)
(5)print Sqr(2)
(6) print sgn(2)
4、写出下列程序的运行结果，将答案写在每题的后面。

设ab$=”ABCDEF”
(1)Print Left(ab$ , 4)
(2)Print Mid(ab$ , 2, 4)
(3)print Right(ab$ , 4)
(4)print Len(ab$)
5、按照运算符的运算顺序(函数>算术运算符>关系运算符>逻辑运算符)
计算表达式的值：10\ 97 / Asc(“a”)*(18.7 mod 4)+Int(8.7-5.5)
6、产生[10，100]区间内的随机整数使用________________________语句？
7、实验教程P10 （6）。

8、编写程序，要求程序运行时在四个文本框中分别任意输入相应的信息（见下图），当单
击“计算”按钮时在窗体中按照下图格式输出此人相应的信息及总分和平均分，平均分保留两位小数（用Format（S，“###.##”）函数实现）。

单击“清除”按钮时清除四个文本框中的内容及窗体中显示的信息。

单击“结束”按钮时结束运行。

运行界面如下图。

（可参考实验教程P16 例2-1）
9、编写程序，要求程序运行时单击“生成”按钮在窗体中输出指定范围内的（范围在程
序运行时由两个文本框任意输入）3个随机整数和这三个随机整数和的平方根，平方根保留两位小数（用Format（S，“###.##”）函数实现）。

单击“清除”按钮时清除两个文本框中的内容及窗体中显示的红色信息。

单击“结束”按钮时结束运行。

运行界面如下图。

VB上机练习题5
1、写出下列程序的运行结果，将答案写在每题的后面。

(1) print chr(70)
(6)print chr(102)
(7)print Asc(“D”)
(8)print Asc(“fde”)
(9)print Ucase(“asdfgHJKL”)
(10)print Lcase(“ABCDefg”)
(11)print String(5, ”$%”)
(12)print String(6, 100)
(13)Print len("good morning")
(14)Print Format(1234567.896, "$#,##.##")
1、写出下列程序的运行结果，将答案写在每题的后面。

设S=”ABC defGH”
(5)Print Left(S , 5)
(6)Print Mid(S , 2, 4)
(7)print Right(S , 4)
(8)print instr(S，“def”)
3、实验教程P20 (3)
4、按照下面窗体的式样设计窗体界面，然后编写程序代码实现下面的功能：单击“显示日期”按钮，在标签中显示当前的日期；单击“显示时间”按钮，在文本框中显示当前的时间;单击“清除”按钮,显示的日期和时间被清除。

5、按照下面的窗体式样设计窗
体界面，然后编写程序代码实现
加法器功能：当程序运行时单击
“出题”按钮，分别用Inputbox语句从键盘上任意输入两个两位数，并分别显示在文本
框Text1和Text2中，当单击“=”按钮时，在文本框Text3中显示计算的结果，单击“清除”按钮时，三个文本框中的内容全部清除。

6. 下面窗体是运行后的界面。

请按照界面式样设计界面，
要求：程序运行时点击“出题”命令按钮，用随机函数在加数和被加数的文本框中随机出10到50之间的两位整数。

请你在第三个文本框中进行做答，然后单击“判题”按钮，如果答对了，就在下面的“标签”控件中显示“答对了！”，否则显示“答错了！”。

按照要求编写程序代码。

7、请按照下图式样设计界面。

程序运行时，当单击“输入圆的半径”按钮后，要求从键盘上任意输入圆的半径，在窗体上打印出圆的周长、面积、体积。

VB 上机练习题6
1、在窗体上画一个名称为Command1的命令按钮，然后编写了如下的事件过程, 问程序运行时，三次单击命令按钮Command1后，在窗体上显示的第三行是（ ）。

(提示：Static 定义的变量为静态变量，静态变量在程序执行结束后不会释放掉，仍然保留当前的值)
Private Sub Command1_Click()
Dim A as integer
Static B as integer
B=B + 3
A=3 + A
Print A; B
End Sub
2、 在窗体上画一个命令按钮，然后编写了如下的事件过程：
程序运行后，单击命令按钮，在输入对话框中分别输入321和456，输出的结果为（ ）
A) 777 777 B) 321456 321456 C) 777 321456 D)321456 777
Private Sub Command1_Click()
Dim a As String, b As Integer
a = InputBox("请输入数字")
b = InputBox("请输入数字")
print a + b ；a & b
End Sub
3、 当VB 执行下面语句后，A 的值为（ ）
A=1
IF A>0 then A=A+1
IF A>1 then A=0
A) 0 B) 1 C) 2 D) 3
4、用Inputbox 语句任意输入三个数，打印三个数，并输出三个数中最小的数。

5、用Inputbox 语句任意输入三个数，求其平均值，输出大于平均值的数。

6、某幼儿园只收2～6岁的小孩，2岁入小班，3～4岁入中班，5～6岁入大班。

输入小孩的岁数，输出入哪类班。

7、分别用行IF 、块IF 和Select case 语句实现如下计算功能：
Y=
8、（选作）输入任意三个整数，按从大到小的顺序
VB 上机练习题７
一、选择题 1、主教材P150 3 （答案： ）
2、主教材P151 5 （答案： ）
3、主教材P151 6 （答案： ）
-2x+1 x<0 x 2 0≤x<10 4x- 4 x ≥10
4、主教材P152 8 （答案：）
5、主教材P152 9 （答案：）
二、编程题
1、程序运行时由InputBox函数输入5个数值(包括正数和负数)，分别计算出正数和负数的和。

要求将输入的原始数据和结果显示在窗体上。

2、计算s=1+1/2+1/3+…+1/n (n可以通过inputbox语句任意指定)。

3、主教材P154 三、2
4、主教材P154 三、4
5、主教材P154 三、9
6、打印100以内的素数，代码如下：
Private Sub Form_Click()
For i = 1 To 100
For j = 2 To Sqr(i)
If i Mod j = 0 Then Exit For
Next j
If j > Sqr(i) Then Print i;
Next i
End Sub。