vb三种基本结构练习题
vb三种基本结构练习题
1、计算圆的面积（顺序结构）
dim r,s,c as single
r=inputbox("输入r的值")
s=3.14*r*r
c=2*3.14*r
print s
print c
2、小明去买电池，2.5元一节，买电池超过10节，超出的部分按八折出售。输入小明买电池的数量，输出小明应付的钱数。（选择语句）
dim a as integer
dim q as single
a=inputbox("输入小明买的电池数")
if a>10 then
b=25+(a-10)*2.5*0.8
else
b=a*2.5
end if
print b
3、求1+2+3+4+……+100的和。（循环语句）
dim i,sum as integer
for i=1 to 100
sum=sum+i
next i
print sum
4、输入数字n，求n！（n!=1*2*3*……*n）（循环语句）
dim i,sum,n as long
n=inputbox("输入n的值")
sum=1
for i=1 to n
sum=sum*i
next i
print sum
1、在窗体上任意位置画一个文本框和一个命令按钮，编写程序，当用户单击命令按钮时，文本框移动到窗体的左上角，并且文本框的大小是原来的2倍。
2、在窗体上任意位置画一个文本框和一个命令按钮，设置窗体的标题属性为“信息窗口”；命令按钮的标题属性为“确定”。编写程序，当用户单击命令按钮时，在文本框中显示“包头师范学院”，要求字体为隶书、加粗、加下划线、字号为20、颜色为红色。
3、在窗体上任意位置画两个命令按钮，分别设置它们的标题属性为：加载图片、显示信息。编写程序，当用户单击第一个命令按钮时，在窗体上加载一幅图片（图片自定）。当用户单击第二个命令按钮时，在窗体上打印信息“包头师范学院“。
4、例1: 在窗体上部设置一个文本框，文本框的下面设置 3 个命令按钮，其中左边按钮中标有“单击此按钮”，中间按钮中标有“清除”，右边按钮中标有“程序结束”。当程序运行时，用鼠标单击左边按钮时，屏幕上部的文本框中显示“欢迎使用vb 6.0”;如果单击中间按钮，则清除文本框中显示的内容；而如果单击右边的按钮，则结束程序。
5、例2
请根据题目要求，设计VB应用程序：
1、在窗体的上方并排分别创建一个标签控件label1和一个文本框控件
text1；
要求：①窗体的标题命名为“个人简介”、窗体背景颜色为黄色。
②标签和文本框中显示的字体为隶书、样式为斜体、字体大小为三号的红色字。
2、在两个控件的下方并排创建两个命令按钮控件command1、command2，分别命名为：“姓名”、“单位”。
3、请编写事件过程代码，使得程序运行时，当鼠标按下“姓名”按钮时，将在标签中显示你的名字；当鼠标按下“单位”按钮时，将在文本框中显示你现在所在的系、级、班。
4、完成以上操作后以V1为窗体名保存在D盘自己的文件夹下
上机练习三
1、在窗体上画一个文本框控件，要求运行时在文本框中显示信息“包头师范学院”（form-load事件）。当用户在文本框中选中任意数量的字符时，在窗体上显示所选中的字符数、选中字符数的首字符数及选中的字符内容。
2、在窗体上画两个文本框控件，先在属性窗口中删除两个文本框中的初始text 属性值。要求当程序运行时，当在文本框1中输入任意一个字符时，同时在文本框2中显示出来，同时也在窗体中显示出来。
3、实现“减法器”功能。
1、设a=2, b=3, c=4, d=5, 求下列表达式的值：
(1) a > b AND c<=d
(2) b < c AND d>a
(3) a < c OR d<=b
(4) a > b OR c<=d
(5) a > b AND c <=d OR 2*a>c
(6) 3>2*b OR a=c AND b <> c OR c> d
2、将下列数学式子写成vb表达式：
(1) cos2(c+d)
(2) 5+(a+b)2
(3) cosx(sinx+1)
(4) e2+2
(5) 2a(7+b)
(6) 8e3n2
3、写出下列程序的运行结果：
(1) print chr$(65)
(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$ , 3, 4)
(3) print Right$(ab$ , 4)
(4) print Len(ab$)
(5) print Instr(ab$,”DE”)
(6) print Instr(ab$,”de”)
5、写出下列程序的运行结果：
(1) print now
(2) print day(now)
(3) print year(now)
(4) print weekday(now)
6、写出下列程序的运行结果：
ac$=”包头师范学院“
b1$=Ltrim$(ac$)
c1$=Rtrim$(ac$)
d1$=Trim$(ac$)
print b1$;c1$;d1$
7、已知字符串A的值为“AbcDe“，现在把它全部转换为大写字母，并存放在A中，使用_________语句？
8、下列语句的输出结果是_________。请分析该语句的作用是什么？
Print Int(12345.6789*100+0.5)/100
作用：
9、按照运算符的运算顺序(函数>算术运算符>关系运算符>逻辑运算符)
计算表达式的值：
10\ 97 / Asc(“a”)*Fix(2.6*1.2)*Int(8.7-5.5)
10、产生[20，30]区间内的随机整数使用________________________语句？
11、教材
上机练习题（五）
一、计算表达式的值：(将结果写在表达式的后面)
1、3+2*7
2、（3+2）*7
3、1+（（2+3）*2）*2）
4、14 / 5*2
5、5 / 2
6、5 \ 2
7、15 \ 5*2
8、15.67 \ 5.78
9、5 mod 2
10、15 mod 1.6
11、12.89 mod 2.76
12、27^1/3
13、27^(1/3)
14、-2^2*7
15、（-2）^2*7
16、（1+2）*3^4
二、下列哪些字符串可作为vb的变量名。
4*delta alpha 4abc a(a+b) print a%b abc ab cd ab_cd ab.cd
三、写出下列程序的运行结果：
a$=”good”
b$=”morning”
print a$+b$
print a$ & b$
print a$ & 123
print 123+456
print 123 & 456
四、已知有赋值语句：
str1=”abcde” : str2=”ABCDE”
str3=”ac” : str4=”1234567”
则最大的字符串是（）。
五、写出下列程序的运行结果：
x=1 : y=2 : z=3
x=y : y=z : z=x
print x , y, z
六、写出下列程序的运行结果：
a=300 : b=20
a=a + b : b=a – b
a=a – b
print b
七、下列表达式的值为true的是（）
A) 1000 < 999 B) “1000” < “999”C) “1”+2=”12”
D) “1” + “2” =”3”E) “1” & 2=”12”F)”1” &
“2”=”3”
八、下列的（）表达式是不正确的：
A) “计算机“ + “与程序设计“
B) “计算机” + 150
C) “计算机” & 150
D) “计算机” & “与程序设计”
九、下列（）是日期型数据：
A) “01/03/2005” B) #01/03/2005# C) 01/03/2005
十、下列（）是Single 型变量：
A) abc% B) sheiht! C) name$ D) cxyz@
十一、按照运算符的优先顺序计算下列表达式的值：
1 +
2 -
3 *
4 / 2 ^ 2 mod 7 \ 3
十二、在窗体上画一个文本框控件和一个标签控件，当程序运行时，在文本框中输入任何信息，当用户单击文本框时，文本框中的信息显示在标签控件里。
十三、在窗体上画三个命令按钮，当程序运行时，用户单击第一个命令按钮时，在第二个命令按钮上显示一幅图片，当单击第三个命令按钮时显示的图片消失。
极速奔跑
11.09 08:13
上机练习题（五）
一、计算表达式的值：(将结果写在表达式的后面)
1、3+2*7
2、（3+2）*7
3、1+（（2+3）*2）*2）
4、14 / 5*2
5、5 / 2
6、5 \ 2
7、15 \ 5*2
8、15.67 \ 5.78
9、5 mod 2
10、15 mod 1.6
11、12.89 mod 2.76
12、27^1/3
13、27^(1/3)
14、-2^2*7
15、（-2）^2*7
16、（1+2）*3^4
二、下列哪些字符串可作为vb的变量名。
4*delta alpha 4abc a(a+b) print a%b abc ab cd ab_cd ab.cd
三、写出下列程序的运行结果：
a$=”good”
b$=”morning”
print a$+b$
print a$ & b$
print a$ & 123
print 123+456
print 123 & 456
四、已知有赋值语句：
str1=”abcde” : str2=”ABCDE”
str3=”ac” : str4=”1234567”
则最大的字符串是（）。
五、写出下列程序的运行结果：
x=1 : y=2 : z=3
x=y : y=z : z=x
print x , y, z
六、写出下列程序的运行结果：
a=300 : b=20
a=a + b : b=a – b
a=a – b
print b
七、下列表达式的值为true的是（）
A) 1000 < 999 B) “1000” < “999”C) “1”+2=”12” D) “1” + “2” =”3”E) “1” & 2=”12”F)”1” &
“2”=”3”
八、下列的（）表达式是不正确的：
A) “计算机“ + “与程序设计“
B) “计算机” + 150
C) “计算机” & 150
D) “计算机” & “与程序设计”
九、下列（）是日期型数据：
A) “01/03/2005” B) #01/03/2005# C) 01/03/2005
十、下列（）是Single 型变量：
A) abc% B) sheiht! C) name$ D) cxyz@
十一、按照运算符的优先顺序计算下列表达式的值：
1 +
2 -
3 *
4 / 2 ^ 2 mod 7 \ 3
十二、在窗体上画一个文本框控件和一个标签控件，当程序运行时，在文本框中输入任何信息，当用户单击文本框时，文本框中的信息显示在标签控件里。
十三、在窗体上画三个命令按钮，当程序运行时，用户单击第一个命令按钮时，在第二个命令按钮上显示一幅图片，当单击第三个命令按钮时显示的图片消失。
极速奔跑
11.09 08:13
上机练习题（六）
1、在窗体上画一个名称为Command1的命令按钮，然后编写了如下的事件过程, 问程序运行时，三次单击命令按钮Command1后，在窗体上显示的第三行是（）。
Private Sub Command1_Click()
Static A as integer
Static B as integer
B=B + 3
A=3 + A
Print A; B
End Sub
2、在窗体上画一个名称为Command1的命令按钮，然后编写了如下的事件过程, 问程序运行时，三次单击命令按钮Command1后，在窗体上显示的第三行是（）。
Private Sub Command1_Click()
Dim A as integer
Static B as integer
B=B + 3
A=3 + A
Print A; B
End Sub
3、执行下面的程序，单击两次命令按钮Command1后，在窗体上显示的第二行是（）
Dim k as integer ‘声明了一个窗体级变量k
Private Sub Form-Load()
k = 15
End Sub
Private Sub Command1_Click()
Static b as integer
b=b+k
k=k+1
Print k ；b
End Sub
4、按照下面窗体的式样设计窗体界面，然后编写程序代码实现下面的功能：从键盘上输入圆的半径，然后分别单击“圆的周长”、“圆的面积”、“球的体积”按钮，在窗体上分别用红色、二号字打印出圆的周长、面积、体积。
5、下面窗体是运行后的界面。请按照界面式样设计界面，
要求：程序运行时点击“出题”命令按钮，用随机函数在加数和被加数的框中随机出10到50之间的两位整数加法题。请你在第三个文本框中进行做答，然后单击“判题”按钮，如果答对了，就在下面的“标签”控件中显示“答对了！”，否则显示“答错了！”。按照要求编写程序代码。
6、教材P101 习题四（3）
极速奔跑
11.09 08:13
上机练习题（七）
1、下面窗体是运行后的界面。请按照界面式样设计界面，
要求：程序运行时点击“出题”命令按钮，用随机函数在加数和被加数的框中随机出10到50之间的两位整数加法题。请你在第三个文本框中进行做答，然后单击“判题”按钮，如果答对了，就在下面的“标签”控件中显示“答对了！”，否则显示“答错了！”。按照要求编写程序代码。
2、设计一个程序，从键盘上输入学生的分数，程序可以计算并输出及格（大于等于60分）、不及格的人数及总平均分数。要求：根据题意自己设计界面，编写程序代码。
3、写出下面程序的运行结果：
For I=1 to 10 step 2
K=k+I
Next I
Print K
结果：
4、写出下面程序的运行结果：
For I=1 to 10 step 2
K=k+2
Next I
Print K
结果：
5、写出下面程序的运行结果：
Sum=0
for I= 11 to –1 step –2 Sum=Sum+1
Next I
print Sum，I
结果：
循环体 Sum=Sum+1执行的次数为（）。
6、教材
极速奔跑
11.09 08:14
上机练习题（八）
1、写出下列程序的运行结果
Dim I% , J%
For I = -3 to 3
Print Tab(7+Abs(I));
For j= 1 To 7-2*Abs(I)
Print “*”;
Next j
Next i
2、编程计算下列S的值。
（1）、S=12+22+32+…+n2
(2)、S=12×22×32×…×n2
3、用近似公式求自然对数的底e的值，
e=1+1/1！+1/2！+1/3！+…+1/n!
直到某项值小于0.00001时为止.
4、教材p102 10、11、12
1、在窗体上任意位置画一个文本框和一个命令按钮，编写程序，当用户单击命令按钮时，文本框移动到窗体的左上角，并且文本框的大小是原来的2倍。
2、在窗体上任意位置画一个文本框和一个命令按钮，设置窗体的标题属性为“信息窗口”；命令按钮的标题属性为“确定”。编写程序，当用户单击命令按钮时，在文本框中显示“包头师范学院”，要求字体为隶书、加粗、加下划线、字号为20、颜色为红色。
3、在窗体上任意位置画两个命令按钮，分别设置它们的标题属性为：加载图片、显示信息。编写程序，当用户单击第一个命令按钮时，在窗体上加载一幅图片（图片自定）。当用户单击第二个命令按钮时，在窗体上打印信息“包头师范学院“。
4、例1: 在窗体上部设置一个文本框，文本框的下面设置 3 个命令按钮，其中左边按钮中标有“单击此按钮”，中间按钮中标有“清除”，右边按钮中标有“程序结束”。当程序运行时，用鼠标单击左边按钮时，屏幕上部的文本框中显示“欢迎使用vb 6.0”;如果单击中间按钮，则清除文本框中显示的内容；而如果单击右边的按钮，则结束程序。
5、例2
请根据题目要求，设计VB应用程序：
1、在窗体的上方并排分别创建一个标签控件label1和一个文本框控件
text1；
要求：①窗体的标题命名为“个人简介”、窗体背景颜色为黄色。
②标签和文本框中显示的字体为隶书、样式为斜体、字体大小为三号的红色字。
2、在两个控件的下方并排创建两个命令按钮控件command1、command2，分别命名为：“姓名”、“单位”。
3、请编写事件过程代码，使得程序运行时，当鼠标按下“姓名”按钮时，将在标签中显示你的名字；当鼠标按下“单位”按钮时，将在文本框中显示你现在所在的系、级、班。
4、完成以上操作后以V1为窗体名保存在D盘自己的文件夹下
评论(7)┆阅读(11)
论坛评论
极速奔跑
11.09 08:11
上机练习三
1、在窗体上画一个文本框控件，要求运行时在文本框中显示信息“包头师范学院”（form-load事件）。当用户在文本框中选中任意数量的字符时，在窗体上显示所选中的字符数、选中字符数的首字符数及选中的字符内容。
2、在窗体上画两个文本框控件，先在属性窗口中删除两个文本框中的初始text 属性值。要求当程序运行时，当在文本框1中输入任意一个字符时，同时在文本框2中显示出来，同时也在窗体中显示出来。
3、实现“减法器”功能。
极速奔跑
11.09 08:12
上机练习题(四)
1、设a=2, b=3, c=4, d=5, 求下列表达式的值：
(1) a > b AND c<=d
(2) b < c AND d>a
(3) a < c OR d<=b
(4) a > b OR c<=d
(5) a > b AND c <=d OR 2*a>c
(6) 3>2*b OR a=c AND b <> c OR c> d 2、将下列数学式子写成vb表达式：
(1) cos2(c+d)
(2) 5+(a+b)2
(3) cosx(sinx+1)
(4) e2+2
(5) 2a(7+b)
(6) 8e3n2
3、写出下列程序的运行结果：
(1) print chr$(65)
(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$ , 3, 4)
(3) print Right$(ab$ , 4)
(4) print Len(ab$)
(5) print Instr(ab$,”DE”)
(6) print Instr(ab$,”de”)
5、写出下列程序的运行结果：
(1) print now
(2) print day(now)
(3) print year(now)
(4) print weekday(now)
6、写出下列程序的运行结果：
ac$=”包头师范学院“
b1$=Ltrim$(ac$)
c1$=Rtrim$(ac$)
d1$=Trim$(ac$)
print b1$;c1$;d1$
7、已知字符串A的值为“AbcDe“，现在把它全部转换为大写字母，并存放在
A中，使用_________语句？
8、下列语句的输出结果是_________。请分析该语句的作用是什么？
Print Int(12345.6789*100+0.5)/100
作用：
9、按照运算符的运算顺序(函数>算术运算符>关系运算符>逻辑运算符)
计算表达式的值：
10\ 97 / Asc(“a”)*Fix(2.6*1.2)*Int(8.7-5.5)
10、产生[20，30]区间内的随机整数使用________________________语句？
11、教材
极速奔跑
11.09 08:12
上机练习题（五）
一、计算表达式的值：(将结果写在表达式的后面)
1、3+2*7
2、（3+2）*7
3、1+（（2+3）*2）*2）
4、14 / 5*2
5、5 / 2
6、5 \ 2
7、15 \ 5*2
8、15.67 \ 5.78
9、5 mod 2
10、15 mod 1.6
11、12.89 mod 2.76
12、27^1/3
13、27^(1/3)
14、-2^2*7
15、（-2）^2*7
16、（1+2）*3^4
二、下列哪些字符串可作为vb的变量名。
4*delta alpha 4abc a(a+b) print a%b abc ab cd ab_cd ab.cd
三、写出下列程序的运行结果：
a$=”good”
b$=”morning”
print a$+b$
print a$ & b$
print a$ & 123
print 123+456
print 123 & 456
四、已知有赋值语句：
str1=”abcde” : str2=”ABCDE”
str3=”ac” : str4=”1234567”
则最大的字符串是（）。
五、写出下列程序的运行结果：
x=1 : y=2 : z=3
x=y : y=z : z=x
print x , y, z
六、写出下列程序的运行结果：
a=300 : b=20
a=a + b : b=a – b
a=a – b
print b
七、下列表达式的值为true的是（）
A) 1000 < 999 B) “1000” < “999”C) “1”+2=”12”
D) “1” + “2” =”3”E) “1” & 2=”12”F)”1” &
“2”=”3”
八、下列的（）表达式是不正确的：
A) “计算机“ + “与程序设计“
B) “计算机” + 150
C) “计算机” & 150
D) “计算机” & “与程序设计”
九、下列（）是日期型数据：
A) “01/03/2005” B) #01/03/2005# C) 01/03/2005
十、下列（）是Single 型变量：
A) abc% B) sheiht! C) name$ D) cxyz@
十一、按照运算符的优先顺序计算下列表达式的值：
1 +
2 -
3 *
4 / 2 ^ 2 mod 7 \ 3
十二、在窗体上画一个文本框控件和一个标签控件，当程序运行时，在文本框中输入任何信息，当用户单击文本框时，文本框中的信息显示在标签控件里。
十三、在窗体上画三个命令按钮，当程序运行时，用户单击第一个命令按钮时，在第二个命令按钮上显示一幅图片，当单击第三个命令按钮时显示的图片消失。
极速奔跑
11.09 08:13
上机练习题（五）
一、计算表达式的值：(将结果写在表达式的后面)
1、3+2*7
2、（3+2）*7
3、1+（（2+3）*2）*2）
4、14 / 5*2
5、5 / 2
6、5 \ 2
7、15 \ 5*2
8、15.67 \ 5.78
9、5 mod 2
10、15 mod 1.6
11、12.89 mod 2.76
12、27^1/3
13、27^(1/3)
14、-2^2*7
15、（-2）^2*7
16、（1+2）*3^4
二、下列哪些字符串可作为vb的变量名。
4*delta alpha 4abc a(a+b) print a%b abc ab cd ab_cd ab.cd
三、写出下列程序的运行结果：
a$=”good”
b$=”morning”
print a$+b$
print a$ & b$
print a$ & 123
print 123+456
print 123 & 456
四、已知有赋值语句：
str1=”abcde” : str2=”ABCDE”
str3=”ac” : str4=”1234567”
则最大的字符串是（）。
五、写出下列程序的运行结果：
x=1 : y=2 : z=3
x=y : y=z : z=x
print x , y, z
六、写出下列程序的运行结果：
a=300 : b=20
a=a + b : b=a – b
a=a – b
print b
七、下列表达式的值为true的是（）
A) 1000 < 999 B) “1000” < “999”C) “1”+2=”12” D) “1” + “2” =”3”E) “1” & 2=”12”F)”1” &
“2”=”3”
八、下列的（）表达式是不正确的：
A) “计算机“ + “与程序设计“
B) “计算机” + 150
C) “计算机” & 150
D) “计算机” & “与程序设计”
九、下列（）是日期型数据：
A) “01/03/2005” B) #01/03/2005# C) 01/03/2005
十、下列（）是Single 型变量：
A) abc% B) sheiht! C) name$ D) cxyz@
十一、按照运算符的优先顺序计算下列表达式的值：
1 +
2 -
3 *
4 / 2 ^ 2 mod 7 \ 3
十二、在窗体上画一个文本框控件和一个标签控件，当程序运行时，在文本框中输入任何信息，当用户单击文本框时，文本框中的信息显示在标签控件里。
十三、在窗体上画三个命令按钮，当程序运行时，用户单击第一个命令按钮时，在第二个命令按钮上显示一幅图片，当单击第三个命令按钮时显示的图片消失。
极速奔跑
11.09 08:13
上机练习题（六）
1、在窗体上画一个名称为Command1的命令按钮，然后编写了如下的事件过程, 问程序运行时，三次单击命令按钮Command1后，在窗体上显示的第三行是（）。
Private Sub Command1_Click()
Static A as integer
Static B as integer
B=B + 3
A=3 + A
Print A; B
End Sub
2、在窗体上画一个名称为Command1的命令按钮，然后编写了如下的事件过程, 问程序运行时，三次单击命令按钮Command1后，在窗体上显示的第三行是（）。
Private Sub Command1_Click()
Dim A as integer
Static B as integer
B=B + 3
A=3 + A
Print A; B
End Sub
3、执行下面的程序，单击两次命令按钮Command1后，在窗体上显示的第二行是（）
Dim k as integer ‘声明了一个窗体级变量k
Private Sub Form-Load()
k = 15
End Sub
Private Sub Command1_Click()
Static b as integer
b=b+k
k=k+1
Print k ；b
End Sub
4、按照下面窗体的式样设计窗体界面，然后编写程序代码实现下面的功能：从键盘上输入圆的半径，然后分别单击“圆的周长”、“圆的面积”、“球的体积”按钮，在窗体上分别用红色、二号字打印出圆的周长、面积、体积。
5、下面窗体是运行后的界面。请按照界面式样设计界面，
要求：程序运行时点击“出题”命令按钮，用随机函数在加数和被加数的框中随机出10到50之间的两位整数加法题。请你在第三个文本框中进行做答，然后单击“判题”按钮，如果答对了，就在下面的“标签”控件中显示“答对了！”，否则显示“答错了！”。按照要求编写程序代码。
6、教材P101 习题四（3）
极速奔跑
11.09 08:13
上机练习题（七）
1、下面窗体是运行后的界面。请按照界面式样设计界面，
要求：程序运行时点击“出题”命令按钮，用随机函数在加数和被加数的框中随机出10到50之间的两位整数加法题。请你在第三个文本框中进行做答，然后单
击“判题”按钮，如果答对了，就在下面的“标签”控件中显示“答对了！”，否则显示“答错了！”。按照要求编写程序代码。
2、设计一个程序，从键盘上输入学生的分数，程序可以计算并输出及格（大于等于60分）、不及格的人数及总平均分数。要求：根据题意自己设计界面，编写程序代码。
3、写出下面程序的运行结果：
For I=1 to 10 step 2
K=k+I
Next I
Print K
结果：
4、写出下面程序的运行结果：
For I=1 to 10 step 2
K=k+2
Next I
Print K
结果：
5、写出下面程序的运行结果：
Sum=0
for I= 11 to –1 step –2
Sum=Sum+1
Next I
print Sum，I
结果：
循环体 Sum=Sum+1执行的次数为（）。
6、教材
极速奔跑
11.09 08:14
上机练习题（八）
1、写出下列程序的运行结果
Dim I% , J%
For I = -3 to 3
Print Tab(7+Abs(I));
For j= 1 To 7-2*Abs(I)
Print “*”;
Next j
Next i
2、编程计算下列S的值。
（1）、S=12+22+32+…+n2
(2)、S=12×22×32×…×n2
3、用近似公式求自然对数的底e的值，
e=1+1/1！+1/2！+1/3！+…+1/n! 直到某项值小于0.00001时为止.
4、教材p102 10、11、12
vb三种基本结构练习题
vb三种基本结构练习题 1、计算圆的面积（顺序结构） dim r,s,c as single r=inputbox("输入r的值") s=3.14*r*r c=2*3.14*r print s print c 2、小明去买电池，2.5元一节，买电池超过10节，超出的部分按八折出售。输入小明买电池的数量，输出小明应付的钱数。（选择语句） dim a as integer dim q as single a=inputbox("输入小明买的电池数") if a>10 then b=25+(a-10)*2.5*0.8 else b=a*2.5 end if print b 3、求1+2+3+4+……+100的和。（循环语句） dim i,sum as integer for i=1 to 100 sum=sum+i next i print sum 4、输入数字n，求n！（n!=1*2*3*……*n）（循环语句） dim i,sum,n as long n=inputbox("输入n的值") sum=1 for i=1 to n sum=sum*i next i print sum
1、在窗体上任意位置画一个文本框和一个命令按钮，编写程序，当用户单击命令按钮时，文本框移动到窗体的左上角，并且文本框的大小是原来的2倍。 2、在窗体上任意位置画一个文本框和一个命令按钮，设置窗体的标题属性为“信息窗口”；命令按钮的标题属性为“确定”。编写程序，当用户单击命令按钮时，在文本框中显示“包头师范学院”，要求字体为隶书、加粗、加下划线、字号为20、颜色为红色。 3、在窗体上任意位置画两个命令按钮，分别设置它们的标题属性为：加载图片、显示信息。编写程序，当用户单击第一个命令按钮时，在窗体上加载一幅图片（图片自定）。当用户单击第二个命令按钮时，在窗体上打印信息“包头师范学院“。 4、例1: 在窗体上部设置一个文本框，文本框的下面设置 3 个命令按钮，其中左边按钮中标有“单击此按钮”，中间按钮中标有“清除”，右边按钮中标有“程序结束”。当程序运行时，用鼠标单击左边按钮时，屏幕上部的文本框中显示“欢迎使用vb 6.0”;如果单击中间按钮，则清除文本框中显示的内容；而如果单击右边的按钮，则结束程序。 5、例2 请根据题目要求，设计VB应用程序： 1、在窗体的上方并排分别创建一个标签控件label1和一个文本框控件 text1； 要求：①窗体的标题命名为“个人简介”、窗体背景颜色为黄色。 ②标签和文本框中显示的字体为隶书、样式为斜体、字体大小为三号的红色字。 2、在两个控件的下方并排创建两个命令按钮控件command1、command2，分别命名为：“姓名”、“单位”。 3、请编写事件过程代码，使得程序运行时，当鼠标按下“姓名”按钮时，将在标签中显示你的名字；当鼠标按下“单位”按钮时，将在文本框中显示你现在所在的系、级、班。 4、完成以上操作后以V1为窗体名保存在D盘自己的文件夹下 上机练习三 1、在窗体上画一个文本框控件，要求运行时在文本框中显示信息“包头师范学院”（form-load事件）。当用户在文本框中选中任意数量的字符时，在窗体上显示所选中的字符数、选中字符数的首字符数及选中的字符内容。 2、在窗体上画两个文本框控件，先在属性窗口中删除两个文本框中的初始text 属性值。要求当程序运行时，当在文本框1中输入任意一个字符时，同时在文本框2中显示出来，同时也在窗体中显示出来。 3、实现“减法器”功能。
VB基本知识及选择、循环结构习题
一、VB 基本知识及选择、循环结构习题 一、基本概念题 （1） 说明下列哪些是Visual Basic 合法的直接常量，并分别指出它们的类型。 %100 1E1 123D3 123,456 0100 “ASDF” “” #2004/10/7# 100# π &O78 &H123 True T -1123! # （2）下列数据哪些是变量，哪些是常量是什么类型的常量 Name “name” False ff “11/16/99” cj “120” n #11/12/2004# （3） 下列符号中，哪些可以是Visual Basic 的合法变量名 A123 a12_3 123_a a,123 a 123 Integer XYZ False Sin(x) 变量名 sinx π （4）把下列数学表达式写成Visual Basic 表达式： （1）5||z y x ++ （2）6)1(xy + （3）xy y x 310+ （4）a ac b b 242-+- （5）3211111r r r ++ （6）110ln 45sin 10++++y x e （5）写出下列表达式的值： （1）123 + 23 Mod 10 \ 7 + Asc("A") （2）Int * 100 + / 100 （3）#11/22/2004# - 10 （4）"ZXY" & 123 & "abc" （6）设a=7，b=3，c=4，求下列表达式的值： （1）a + 3 * c （2）a ^ 2 / 4 （3）a / 2 + 3 \ 2 （4）a Mod 3 + b ^ 3 / c \ 5 （7）写出下列函数的值： （1）Int （2）Fix （3）Sqr(Sqr(81)) （4）Len("Visual Basic 程序设计") （5）Int(Abs(99 - 100) / 2) （6）Sgn(7 * 3 + 2) （7）LCase("Hellow VB!") （8）Mid("Hellow VB!", 4, 3) （9）Left("Hellow VB!", 3) （10）Val("16个加23个") （11）Str （12）UCase("Visual Basic") 二、 选择题 （1）可以同时删除字符串前导和尾部空格的函数是 。 A. Ltrim B. Rtrim C. Trim D. Mid （2）函数Int(Rnd(1) * 10)是在哪个范围产生随机整数 。 A. (0,1) B. (0,9) C. (1,10) D. (1,9) （3）数学式子sin25o写成Visual Basic 表达式是 。 B. Sin(25) C. Sin(25o) D. Sin(25*180) （4）表达式16/4 – 2^3 * 8/4 Mod 5\2的值是 。 A. 14 B. 4 C. 20 D. 2 （5）数学关系式103<≤x 表示成正确的VB 表达式为 。 A. 3<= x <10 B. x >= 3 And x<10 C. x>=3 Or x<10 D. 3<= x And <10
VB练习题2
1.项目文件的扩展名是（） A．.vb B．.sln C..exe D．.vbproj 2.集成开发环境有两类窗口：浮动和固定，下面的（）窗口不是浮动窗口。 A．工具箱B．属性 C.即时D．窗体 3.要使窗体的标题为“演示实例”，应修改窗体的（）属性。 A．Caption B．Tip C．Item D．Text 4.在https://www.wendangku.net/doc/631166999.html,中，下面属于方法的是（）。 A.Focus B.SelectedText C.LostFocus D.Keypress 5.一条语句要在下一行继续写，可用（）符号作为续行符。 A.+ B.- C.空格和_ D.... 6.若要使命令按钮不可操作，要对（）属性进行设置。 A.Enabled B.Visible C.BackColor D.Text 7.在https://www.wendangku.net/doc/631166999.html,集成环境中创建https://www.wendangku.net/doc/631166999.html,应用程序时，除了工具箱窗口、窗体窗口和属性窗口 外，必不可少的窗口是（） A．窗体布局窗口B．立即窗口 C．代码窗口D．监视窗口 8.当运行程序时，系统自动执行启动窗体的（）事件过程 A．Load B．Click C．Unload D．GotFocus 9.当文本框的ScrollBars属性设置了非None值，却没有效果，原因是（） A．文本框没有内容B．文本框的MultiLine属性为False C．文本框的MultiLine属性为True D．文本框的Locked属性为True 10.若要使标签控件显示时不要覆盖窗体的背景图案，要对（）属性进行设置 A．BackColor B．BorderStyle C．ForeColor D．BackStyle 11.数据类型为Long的类型标识符为（）。 A．%B．&C．!D．# 12.下面（）是日期型常量。 A．“5/17/12”B．5/17/12 C．#5/17/12#D．(5/17/12) 13.下面的（）是合法的单精度型变量。 A.num! B.sum% C.char! D.mm# 14.下面的（）是合法变量名。 A.X_yz B.123abc C.Integer D.X-Y 15.Rnd函数不可能为下列的（）值。 A.0 B.1 C.0.1234 D.0.0005 16.图片框控件（PictureBox）是专门用于显示图片的控件，主要属性image用于设置显示 在控件上的图片，使用（）语句可以在程序中消除已装入的图片。 A.PictureBox控件名.image=”” B．PictureBox控件名.image=Nothing C．PictureBox控件名.image=Image.FromFile(“”) D．PictureBox控件名.image=Image.FromFile(Nothing) 17.表达式16/4-2^5*8/4Mod5\2的值为（） A.14 B.4 C.20 D.2 18.表达式Len（“123程序设计ABC”）的值是（） A.10 B.14 C.20 D.17 19.为了给x,y,z三个整型变量赋初值1，正确的赋值语句是（）。 A.x=1:y=1:z=1 B.x=1，y=1，z=1
VB基础练习题
vb基础练习题二 一、选择题 1、使用Visual Basic编程,我们把工具箱在的工具称为()。 A.事件 B.工具 C.控件 D.窗体 2、我们保存一个编写好的程序，“过程名”是以（）作为扩展名的。 A、.frm B、.vbp C、.bat D、.bas 3、下列变量名写法错误的是（）。 A、abc B、abc123 C、abc_123 D、123abc 4、结束当前程序的语句是（）。 A、quit B、exit C、end D、sub 5、要改变窗体的标题时，应当在属性窗口中改变的属性是（）。 A、Caption B、Name C、Text D、Label 6、双击窗体中的对象后，VB将显示的窗口是（）。 A、工程窗口 B、工具箱 C、属性窗口 D、代码窗口 7、VB是一种面向对象的程序设计语言，构成对象的三要素是（）。 A、属性、事件、方法 B、控件、属性、事件 C、窗体、控件、过程 D、窗体、控件、事件 8、在VB中表达式11\3+11mod3的运算结果值是（）。 A、3 B、4 C、5 D、6 9、语句段 a=3:b=5 t=a:a=b:b=t 执行后，（）。 A、a值为3，b值为3 B、a值为3，b值为5 C、a值为5，b值为5 D、a值为5，b值为3 10、语句if3*4>=10then a=1else a=2执行后，a的值为（）。 A、12 B、10 C、1 D、2 11、语句段 s=0 for i=1to5 s=s+i next i 执行后，s的值为（）；i的值为（）。 A、1 B、5 C、6 D、15 二、判断题 （）1.在VB中运算优先级别从高到低的顺序为：算术运算、连接运算、关系运算、逻辑运算。 （）2.程序代码的基本结构有两种：选择结构和循环结构。 （）3、“菜单编辑器”由菜单属性设置区、编辑区两部分组成。 （）4、End if语句对单行if语句不需要。 （）5、能够实现文本框接受多行文本显示的是将属性Multiline的属性值设为True。 （）6、表达式(2*3)>=5and12/3<=4的值为false。 （）7、VB程序一行写不下，可以直接换行继续写。
VB程序设计试题及答案一
V B程序设计试题及答案（一） 一、单选题 1. VB6.0是一种面向B 的编程环境。 (A) 机器(B) 对象 (C) 过程(D) 应用 2. 要使FormI窗体的标题栏显示"欢迎使用VB"，以下D 语句是正确的。 (A) Forml.Caption=“欢迎使用VB” (B) Forml.Caption='欢迎使用VB' (C) Forml.Caption=欢迎使用VB (D) Forml.Caption="欢迎使用VB" 3. 若要使命令按钮不可操作，要对A 属性进行设置。 (A) EnabIed (B)Visible (C) Backcolor (D)Caption 4. 如果在窗体上已经创建了一个文本框对象TextI，可以通过C 事件获得输入键值的ASCII码。 (A) Change (B) LostFocus (C) KeyPress (D) GotFocus 5. 下面A 是合法的变量名。 (A) X_yz (B) 123ab。(C) integer (D) X-Y 6. 以下关系表达式中，其值为False的是A 。 (A) "ABC">"AbC" (B) "女">"男" (C) "BASIC"=UCase("basic) (D) "123"<"23" 7. 为了给x、y、z三个变量赋初值1，下面正确的赋值语句是A 。 (A) x=1:y=1:z=1 (B) x=1,y=1,z=1 (C) x=y=z=1 (D) xyz=1 8. VB提供了结构化程序设计的三种基本结构，三种基本结构是D 。 (A)递归结构、选择结构、循环结构 (B)选择结构、过程结构、顺序结构 (C)过程结构、输入输出结构、转向结构 (D)选择结构、循环结构、顺序结构 9. 下面If语句统计满足性别为男、职称为副教授以上、年龄小于40岁条件的人数，不正确的语句是 D 。 (A) If sex="男" And age=4O And InStr(duty，"教授")>O Then n=n+l (B) If sex="男" And age=4O And (duty="教授" Or duty="副教授") Then n=n+l (C) If sex="男" And age=4O And Right(duty，2)="教授" Then n=n+l (D) If sex="男" And age=4O And duty="教授" And duty="副教授" Then n=n+l 10.下列关于Do…Loop循环结构执行循环次数的描述正确的是D 。 (A) Do While…Loop循环和Do…Loop Until循环至少都执行一次 (B) Do While…Loop循环和Do…Loop Until循环可能都不执行 (C) Do While…Loop循环至少执行一次和Do…Loop Until循环可能不执行 (D) Do While…Loop循环可能不执行和Do…Loop Until循环至少执行一次 11.以下B 是正确的For…Next结构。 (A) For x=1 To Step 10 (B) For x=3 To -3 Step -3 ……
VBnet重点学习的练习练习习题集.doc
第一章https://www.wendangku.net/doc/631166999.html, 环境和程序设计初步 一 .选择题 1.在 Visual https://www.wendangku.net/doc/631166999.html, 的集成开发的环境中，下面不属于该环境编程语言的是（C）。 A.VB B.C++ C. Pascal D. J# 2.在集成开发环境中有两类窗口，浮动窗口和固定窗口，下面不属于浮动窗口的是（D）。 A. 工具箱窗口 B.属性窗口 C.立即窗口 D. 窗体窗口 3.在 https://www.wendangku.net/doc/631166999.html, 中，在窗体上显示控件的文本，用（ A ）属性设置。 A. Text B. Name C. Caption D. Image 4.不论何种控件，共同具有的是什么属性( D ) 。 A. Text B. Name C． ForeColor D ． Text 5．对于窗体，可改变窗体的边框性质的属性是（ B ）。 A. MaxButton B. FormBorderStyle C. Name D. Left 6.若要使标签控件显示时不要覆盖窗体的背景图案，要对（ A ）属性进行设置。 A ． BackColor B. BorderStyle C．ForeColor D.BackStyle 7．若要使命令按钮不可操作，要对（ A ）属性进行设置。 A. Enabled B.Visible C. BackColor D. Text 8.要使文本框中的文字不能被修改，应对（D）属性进行设置。 A. Locked B. Visible C. Enabled D. ReadOnly 9.要使当前Form1 窗体的标题栏显示“欢迎使用https://www.wendangku.net/doc/631166999.html, ”，以下（ B ）语句是正确的。 A. Form1.Text= “欢迎使用V https://www.wendangku.net/doc/631166999.html, ” B. Me. Text= “欢迎使用https://www.wendangku.net/doc/631166999.html, ” C. https://www.wendangku.net/doc/631166999.html,= “欢迎使用https://www.wendangku.net/doc/631166999.html, ” D. Me. Name= “欢迎使用https://www.wendangku.net/doc/631166999.html, ” 10.当运行程序时，系统自动执行启动窗体的（A）事件过程。 A. Load B. Click C. UnLoad D.GotFocus 11.当文本框的ScrollBars 属性设置了非None 值，却没有效果，原因是（B）。 A.文本框没有内容 B.文本框的 MulitLine 属性为 False C.文本框的 MulitLine 属性为 True D.文本框的 Locked 属性 True 12．要判断在文本框中是否按了Enter 键，应在文本框的（D）事件中判断。 A. Change B. KeyDown C. Click D. KeyPress 13.在 VB.NE 集成环境中创建 https://www.wendangku.net/doc/631166999.html, 应用程序时，除了工具箱窗口、窗体窗口和属性窗口外，必不可少的窗口是（ C）。 A ．窗体布局窗口 B ．立即窗口 C．代码窗口 D ．监视窗口 14．当创建一个项目名为“引例”的项目时，该项目的所有代码文件将保存在（C）文件夹下。 A ．My Documents B ． https://www.wendangku.net/doc/631166999.html, C．引例 D ． Windows 15．将调试通过后生成的.exe 可执行文件放到其他机器上不能运行的主要原因是（ A ）。 A . 运行的机器上面无https://www.wendangku.net/doc/631166999.html, 系统 B . 缺少 . frm 窗体文件 C.该可执行文件有病毒
VB程序的三种基本结构复习课教学案例
《VB程序的三种基本控制结构》 复习课教案 平桂高级中学陀君一、案例背景信息 模块：算法与程序设计 年级：高一年级 所用教材版本：粤教版《算法与程序设计》 学时数：1课时（40分钟） 二、教学设计： 1、教学目标： 知识与技能：能根据流程图正确区分VB程序的三种基本结构，并记住相关语句格式，能编写出简单明了的程序关键代码； 过程与方法：充分认识VB程序中三种基本结构的实用性，体会生活中算法的存在和精彩。 情感态度与价值观：培养学生在学习过程中积极思考、自我探究的能力和学以致用的意识。 2、教学重点：顺序、选择（分支）和循环三种基本结构的区分及其对应的VB 语句的使用。 教学难点：for循环结构，各类语句关键代码的编写。 三、教学实录 1．复习引入 师：我们之前学过VB的基本结构，通常程序有三种最基本的结构，是哪三种结构？ 大部分学生在底下小声回答，师让某生回答，说：顺序模式、分支模式、循环模式。
师：分支模式也可称为？ 部分学生：选择模式。 师：非常好，接下来看下这三种结构的流程图，然后分别指出这三个流程图是什么结构。（出示三种流程图结构） 2．正题 （1）顺序结构P38： 执行第一条语句后，必然从第二条语句继续，顺序执行所有的语句，直到执行完最后一条语句为止。 例1：例1、 a=1 b=2 c=a+b a=c-a b=c-a
最后，变量b的值是（ 1 ） （2）选择结构（分支结构）：P42 根据条件判断其是否成立，如果成立执行成立的分支；否则执行另一分支。其一般形式为： If 条件Then 语句序列1 Else 语句序列2 End If 单行形式为： If 条件Then 语句组1 Else 语句组2 例2、a =10 If a>=10 Then a=a+1 Else a=a-1 End If 该程序段运行后，变量a的值是（ D ） A. 8 B. 9 C. 10 D. 11 【师读题，学生思考。请同学回答，让同学们思考a=5结果是多少】 （3）循环结构：P51 根据条件判断其是否成立，如果条件成立则重复执行循环体（循环结构中某语句序列），直到条件不成立，退出循环结构为止。 循环结构的常用形式为： for 循环变量= 初值to 终值[step 步长] [循环体] next [循环变量]
《VB程序设计》课后题答案
第二章 一、问答题 1.叙述建立一个完整的应用程序的过程。 答：界面设计编写事件过程代码运行、调试保存文件 2.当建立好一个简单的应用程序后，假定该工程仅有一个窗体模块。问该工程涉及到几个文件要保存？若要保存该工程中的所有文件，正确的操作应先保存什么文件？再保存什么文件？若不这样做，系统会出现什么信息？ 答：涉及到两个文件要保存。先保存窗体文件（.frm），再保存工程文件（.vbp）。若先保存工程文件，系统也会先弹出“文件另存为”对话框，要求把窗体文件先保存。 3.假定在W indows环境中，要保存工程文件时，若不改变目录名，则系统默认的目录是什么？ 答：VB98 4．当标签框的大小由Caption属性的值进行扩展和缩小，应对该控件的什么属性进行何种设置？ 答：将标签的Autosize设置为True. 5．VB6.0提供的大量图形文件在哪个目录下？若你的计算机上没有安装，则怎样安装这些图形文件？ 答：VB6.0提供的图形文件在Graphics目录。 6．在VB6.0中，命令按钮的显示形式可以有标准和图形两种选择，这通过什么属性来设置？若选择图形的，则通过什么属性来装入图形？若已在规定的属性里装入了某个图形文件，但该命令按钮还是不能显示该图形，而显示的是Caption属性设置的文字，怎样改正？答：按钮Style的属性设置为Graphical（或1）。通过Picture属性来装入图形。不能显示图形是因为Style的属性设置为Standard（或0），只要改为Graphical（或1），一般还将Caption 属性的值设置为空。 7．标签和文本框的区别是什么？ 答：文本是否可编辑。 8．当窗体上有三个文本框和一个命令按钮，若程序运行时，需把焦点定位在第三个文本框处，应对何控件的什么属性进行何种设置？ 答：应对Text3控件进行Text3.TabIndex=0的设置。 9．简述文本框的change与keypress事件的区别。 答：文本框内容变化，change与keypress事件都会发生，所不同的是Keyprees还将返回一个Keyasii参数 10.当某文本框输入数据后（按了回车键），进行判断认为数据输入错，怎样删除原来数据？怎样使焦点回到该文本框重新输入？ 答：假定文本框的名称为Text1，则事件过程如下： Private Sub Text1_KeyPress(KeyAscii As Integer) If KeyAscii = 13 Then If 出错条件判断成立Then Text1＝””…先删除原来数据 Text1.SetFocus …焦点回到Text1 End If …… End If End Sub
vb综合练习答案
Visual Basic程序设计综合练习 一、单项选择题 1．一个VB应用程序可以包含几个vbp文件（ A ）。 A．1个 B．2个 C．可以没有 D．不受限制 2．启动VB后，就意味着要建立一个新（ C ）。 A．窗体 B．文件 C．工程 D．程序 3．后缀为.bas的文件表示（ D ）。 A．类模块文件 B．窗体文件 D．窗体二进制数据文件 D．标准类模块文件 4．当一个工程中含有多个窗体时，其中的启动窗体是（ D ）。 A．启动VB时创建的第一个窗体 B．第一个添加的窗体 C．最后一个添加的窗体 D．在“工程属性”对话框中指定的窗体5．在文本框控件中将Text的内容全部显示为所定义的字符的属性是（ B ）。A．Password B．PasswordChar C．需要编程来实现 D．以上都不是 6．Visual Basic是一种面向对象的程序设计语言，所采用的编程机制是（ C ）。A．从主程序开始执行 B．按过程顺序执行 C．事件驱动 D．按模块顺序执行 7．下列四项中合法的变量名是（ B ）。 A．a-bc B．a_bc C．4abc D．integer 8．在Visual Basic中，变量的默认类型是（ D ） A．Integer B．Double C．Currency D．Variant 9．无论何种控件，共同具有的属性是（B ） A．Text B．Name C．Caption D．ForeColor 10．有程序代码如下： Text1.Text = "Visual Basic程序设计" 则Text1，Text ，和"Visual Basic程序设计"分别代表（ C ）。 A．对象，值，属性 B．对象，方法，属性 C．对象，属性，值 D．属性，对象，值 11．如果仅需要得到当前系统时间，使用的函数是（ B ） A．Now B．Time C．Year D．Date 12．表达式16/4-2^5*8/4MOD5\2（ D ）。
VB程序设计试题及答案(一)-vb程序设计答案
VB程序设计试题及答案（一） 一、单选题 1. VB6.0是一种面向B 的编程环境。 (A) 机器(B) 对象 (C) 过程(D) 应用 2. 要使FormI窗体的标题栏显示"欢迎使用VB"，以下D 语句是正确的。 (A) Forml.Caption=“欢迎使用VB” (B) Forml.Caption='欢迎使用VB' (C) Forml.Caption=欢迎使用VB (D) Forml.Caption="欢迎使用VB" 3. 若要使命令按钮不可操作，要对A 属性进行设置。 (A) EnabIed (B)Visible (C) Backcolor (D)Caption 4. 如果在窗体上已经创建了一个文本框对象TextI，可以通过C 事件获得输入键值的ASCII 码。 (A) Change (B) LostFocus (C) KeyPress (D) GotFocus 5. 下面A 是合法的变量名。 (A) X_yz (B) 123ab。(C) integer (D) X-Y 6. 以下关系表达式中，其值为False的是A 。 (A) "ABC">"AbC" (B) "女">"男" (C) "BASIC"=UCase("basic) (D) "123"<"23" 7. 为了给x、y、z三个变量赋初值1，下面正确的赋值语句是A 。 (A) x=1:y=1:z=1 (B) x=1,y=1,z=1 (C) x=y=z=1 (D) xyz=1 8. VB提供了结构化程序设计的三种基本结构，三种基本结构是D 。 (A)递归结构、选择结构、循环结构 (B)选择结构、过程结构、顺序结构 (C)过程结构、输入输出结构、转向结构 (D)选择结构、循环结构、顺序结构 9. 下面If语句统计满足性别为男、职称为副教授以上、年龄小于40岁条件的人数，不正确的语句是 D 。 (A) If sex="男" And age=4O And InStr(duty，"教授")>O Then n=n+l (B) If sex="男" And age=4O And (duty="教授" Or duty="副教授") Then n=n+l (C) If sex="男" And age=4O And Right(duty，2)="教授" Then n=n+l (D) If sex="男" And age=4O And duty="教授" And duty="副教授" Then n=n+l 10.下列关于Do…Loop循环结构执行循环次数的描述正确的是D 。 (A) Do While…Loop循环和Do…Loop Until循环至少都执行一次 (B) Do While…Loop循环和Do…Loop Until循环可能都不执行 (C) Do While…Loop循环至少执行一次和Do…Loop Until循环可能不执行 (D) Do While…Loop循环可能不执行和Do…Loop Until循环至少执行一次 11.以下B 是正确的For…Next结构。 (A) For x=1 To Step 10 (B) For x=3 To -3 Step -3
VB第一章理解练习知识题
第一章https://www.wendangku.net/doc/631166999.html,环境和程序设计初步 一.选择题 1.在Visual https://www.wendangku.net/doc/631166999.html,的集成开发的环境中，下面不属于该环境编程语言的是（C）。 A.VB B.C++ C. Pascal D. J# 2.在集成开发环境中有两类窗口，浮动窗口和固定窗口，下面不属于浮动窗口的是（D）。 A.工具箱窗口 B.属性窗口 C.立即窗口 D.窗体窗口 3.在https://www.wendangku.net/doc/631166999.html,中，在窗体上显示控件的文本，用（A ）属性设置。 A. T ext B. Name C. Caption D. Image 4.不论何种控件，共同具有的是什么属性( D )。 A. T ext B. Name C．ForeColor D．Text 5．对于窗体，可改变窗体的边框性质的属性是（B）。 A.MaxButton B. FormBorderStyle C. Name D. Left 6.若要使标签控件显示时不要覆盖窗体的背景图案，要对（A）属性进行设置。A．BackColor B. BorderStyle C．ForeColor D.BackStyle 7．若要使命令按钮不可操作，要对（A）属性进行设置。 A. Enabled B.Visible C. BackColor D. T ext 8.要使文本框中的文字不能被修改，应对（D）属性进行设置。 A. Locked B. Visible C. Enabled D. ReadOnly 9.要使当前Form1 窗体的标题栏显示“欢迎使用https://www.wendangku.net/doc/631166999.html,”，以下（B）语句是正确的。 A.Form1.T ext=“欢迎使用V https://www.wendangku.net/doc/631166999.html,”
B.Me. T ext=“欢迎使用https://www.wendangku.net/doc/631166999.html,” https://www.wendangku.net/doc/631166999.html,=“欢迎使用https://www.wendangku.net/doc/631166999.html,” D.Me. Name=“欢迎使用https://www.wendangku.net/doc/631166999.html,” 10.当运行程序时，系统自动执行启动窗体的（A）事件过程。 A. Load B. Click C. UnLoad D. GotFocus 11.当文本框的ScrollBars属性设置了非None值，却没有效果，原因是（B）。 A.文本框没有内容 B.文本框的MulitLine属性为False C.文本框的MulitLine属性为True D.文本框的Locked属性True 12．要判断在文本框中是否按了Enter键，应在文本框的（D）事件中判断。 A. Change B. KeyDown C. Click D. KeyPress 13.在VB.NE集成环境中创建https://www.wendangku.net/doc/631166999.html,应用程序时，除了工具箱窗口、窗体窗口和属性窗口外，必不可少的窗口是（C）。 A．窗体布局窗口
算法与程序设计模块练习题-VB语言-客观性试题
《算法与程序设计》模块（VB语言）练习题 一、单选题 1．计算机程序的三种结构是顺序结构、、选择结构。 A．模块结构B．循环结构C．多重循环结构D．块IF结构 2．在VB应用程序设计中，通常应对编写程序代码。 A．所有对象B．窗体C．Timer D．有事件的对象 3．VB中，是指用户操作引发或由系统引发，能被对象所识别并做出响应的动作。 A．任务B．事件C．控件D．过程 4．在面向对象程序设计中，用来描述对象的特征信息。 A．事件B．方法C．代码D．属性 5．在VB系统中，一个对象具有的内部函数或过程，称之为该对象的。 A．代码B．属性C．方法D．事件 6．算法是。 A．计算方法B．计算公式C．对解决问题的方法和步骤的描述 7．在VB编程中，如果需要返回鼠标的当前位置时，应该使用事件。 A．Click B．Change C．MouseDown D．KeyPress 8．VB中，如果想让Timer控件每秒钟响应一次，应该将其Inerval属性设置为。 A．1 B．60 C．100 D．1000 9．下列过程中，是程序开始运行时，窗体一加载就运行的程序段。 A．Form_Load B．Form_Click C．Form_MouseDown D．Form_KeyPress 10．下列句子中，不是赋值语句。 A．A=”123” +”456”B．=”你好！” C．r=Val D．x+1=y 11．的Visual Basic表达式是。 A．(-b+b^2-4ac)/2a B．(-b+sqr(b^2-4*a*c))/(2*a) C．(-b+sqr(b^2-4ac))/(2a) D．(-b+sqr(b^2-4ac))/2a 12．生成一个1~6的随机整数的表达式是。 A．Rnd * 6+ 1 B．Fix (Rnd * 6 ) + 1 C．Fix (Rnd * 5 ) - 1 D．Fix (Rnd * 5 ) 13．在VB中，窗口坐标系的原点在，x轴向右为正，y轴向下为正。 A．窗口左上角B．窗口左下角C．窗口正中间D．窗口右上角14．关系表达式的值为。 A．数值B．字符串C．逻辑值D．逻辑表达式 15．在VB系统中，代表内存单元，是命了名的存储空间。 A．变量B．常量C．函数D．字节 16．关系表达式5<8的值为。 A．True B．False 17．语句用于声明变量，并定义变量的数据类型，给变量分配存储空间。
VB顺序结构及选择结构练习
VB顺序结构及选择结构练习 一、单选题 1.在窗体上画一个命令按扭（名称为Command1），然后编写如下事件过程 Private Sub Command1_Click() b=5 c=6 Print a = b + c End Sub 程序运行后，单击命令按扭，其结果为（D） A）a=11 B）a=b + c C）a= D）False 2. 在窗体上画一个命令按扭（名称为Command1），然后编写如下事件过程 Private Sub Command1_Click(D) a=11 b=5 c=6 Print a = b + c End Sub 程序运行后，单击命令按扭，其结果为（） A）a=11 B）a=b + c C）a= D）True 3.以下语句的输出结果是（B） a = Sqr(3) Print Format(a,”$$#### : ###”) A）$1.732 B）$$1.732 C）$1732 D）$$00001.732 4.以下程序段的输出结果是（D） a = Sqr(3) b = Sqr(2) c =a>b Print c A）-1 B）0 C）False D）True 5.以下语句的输出结果是（C） Print Format$ (32548.5,”000,000.00”) A）32548.5 B）32,548.5 C）032,548.50 D）32,548.50 1.假定有如下语句： answer$=MsgBox(“String1”,, “String2”, “String3”,2) 执行该语句后，将显示1个信息框，此时如果单击“确定”按扭，则answer$的值为（D）A）String1 B）String2 C）String3 D）1
VB程序设计试题及答案(一)
VB程序设计试题及答案(一) 一、单选题 1、VB6、0就是一种面向B 的编程环境。 (A) 机器(B) 对象 (C) 过程(D) 应用 2、要使FormI窗体的标题栏显示"欢迎使用VB",以下D 语句就是正确的。 (A) Forml、Caption=“欢迎使用VB” (B) Forml、Caption='欢迎使用VB' (C) Forml、Caption=欢迎使用VB (D) Forml、Caption="欢迎使用VB" 3、若要使命令按钮不可操作,要对A 属性进行设置。 (A) EnabIed (B)Visible (C) Backcolor (D)Caption 4、如果在窗体上已经创建了一个文本框对象TextI,可以通过C 事件获得输入键值的ASCII码。 (A) Change (B) LostFocus (C) KeyPress (D) GotFocus 5、下面A 就是合法的变量名。 (A) X_yz (B) 123ab。(C) integer (D) X-Y 6、以下关系表达式中,其值为False的就是A 。 (A) "ABC">"AbC" (B) "女">"男" (C) "BASIC"=UCase("basic) (D) "123"<"23" 7、为了给x、y、z三个变量赋初值1,下面正确的赋值语句就是A 。 (A) x=1:y=1:z=1 (B) x=1,y=1,z=1 (C) x=y=z=1 (D) xyz=1 8、VB提供了结构化程序设计的三种基本结构,三种基本结构就是D 。 (A)递归结构、选择结构、循环结构 (B)选择结构、过程结构、顺序结构 (C)过程结构、输入输出结构、转向结构 (D)选择结构、循环结构、顺序结构 9、下面If语句统计满足性别为男、职称为副教授以上、年龄小于40岁条件的人数,不正确的语句就是 D 。 (A) If sex="男" And age=4O And InStr(duty,"教授")>O Then n=n+l (B) If sex="男" And age=4O And (duty="教授" Or duty="副教授") Then n=n+l (C) If sex="男" And age=4O And Right(duty,2)="教授" Then n=n+l (D) If sex="男" And age=4O And duty="教授" And duty="副教授" Then n=n+l 10、下列关于Do…Loop循环结构执行循环次数的描述正确的就是D 。 (A) Do While…Loop循环与Do…Loop Until循环至少都执行一次 (B) Do While…Loop循环与Do…Loop Until循环可能都不执行 (C) Do While…Loop循环至少执行一次与Do…Loop Until循环可能不执行 (D) Do While…Loop循环可能不执行与Do…Loop Until循环至少执行一次 11、以下B 就是正确的For…Next结构。 (A) For x=1 To Step 10 (B) For x=3 To -3 Step -3 …… Next x Next x
VB循环结构练习题
VB循环结构练习题 一、分析程序的运行结果（每题2分，共60分） 1、以下循环的执行次数是_____。 K=0 Do While k<=10 k=k+1 Loop 2、下列程序段的执行后输出的结果为_____。 I=4:A=5 Do I=I+1:A=A+2 Loop Until I>=7 Print "A=";A 3、下列程序的执行结果是____。 T = O : m = 1 : Sum = 0 Do t = t + m : Sum = Sum + t : m = m + 2 Loop While m <= 9 Print Sum 4、下列程序段的执行时，共循环____次。 For a=0 To 1 For b=1 To 2 For c=1 To 3 I=I+1 Next c Next b next a 5、下列程序段的运行结果是： Sub sele() Dim n as Integer I=21:n=3 Do While I>n I=I-n Loop Print I End Sub 打印结果_____。 6、执行下面的程序段后，s的值为____。 S=5 For I=2.6 To 4.9 Step 2 s=s+1 Next I 7、下列程序段的执行后输出的结果为_______。K = 1 For I = 1 To 3 A = I ^ I ^ K Next I Print A 8、下列程序的执行结果是_____。 M1 = 1:m2 = 1
Do While m2<>6 m1 = m1*m2 : m2 = m2+1 Loop Print m1 9、下列程序的执行结果是_____。 Private Function P(N As Integer) For I = I To N SUM = SUM + 1 Next I P = SUM End Function Private Sub Command1_Click() S = P(1) + P(2) + P(3) + P(4) Print S; End Sub 10、以下程序用来输出1到100所有奇数的和，请补充完该程序。Private Sub Command3_Click() Dim s As Long Dim x As Integer s = 0 For x=1 to 100 step____ s = s + x Next x Print s End Sub 11、下列程序的执行结果是_______。A = 75 If a>60 Then I = 1 ElseIf a>70 Then I = 2 ElseIf a>80 Then I = 3 ElseIf a>90 Then I = 4 End If Print I 12、下列程序段的运行后t的值为______。Dim t,k as single k=5 : t=1 do While k>=-1 t=t*k : K=K-1 loop 13、下面程序段的输出结果是_____。 P=0:s=0 Do p = p+2 s = s+p Loop While p<11 Print "s="&s 14、下面程序段的输出结果是______。 For X=1.5 To 5 Step 5
第二部分 VB练习题与答案
第2章数据类型与表达式 一、选择题 1. 一个语句行内写多条语句时，每个语句之间用( )符号分隔。 A. ， B. ： C. 、 D. ； 2. 一句语句要在下一行继续写，用( )符号作为续行符。 A. ＋ B. – C. _ D. … 3. 下面( )是合法的变量名。 A. X_yz B. 123ab C. integer D. X-Y 4. 下面( )是不合法的整数。 A. 100 B. ＆Ol00 C. ＆H100 D. ％100 5. 下面( )是合法的字符常量。 A. ABC＄ B. "ABC" C. 'ABC' D. ABC 6. 下面( )是合法的单精度型变量。 A. num! B. sum％ C. xinte＄ D. mm＃ 7. 下面( )是不合法的单精度常数。 A. 100！ B. 100.0 C. 1E+2 D. 100.0D+2 8. 表达式16/4-2^5*8/4 MOD 5\2的值为( )。 A. 14 B. 4 C. 20 D. 2 9. 数学关系3≤x＜10表示成正确的VB表达式为( )。 A. 3＜=X＜10 B. 3＜＝x AND x＜10 C. x＞＝3 OR x＜10 D. 3＜＝x AND＜10 10. “＼”、“／”、“Mod”、“*”四个算术运算符中，优先级别最低的是( )。 A. ＼ B. ／ C. Mod D. * 11. 与数学表达式ab/3cd对应的不正确Visual Basic 6.0表达式是( )。 A. a*b／(3*c*d) B. a／3*b／c／d C. a*b／3／c／d D. a*b／3*c*d
12. Rnd函数不可能为下列( )值。 A. 0 B. 1 C. 0.1234 D. 0.0005 13. Int(198. 555*100＋0.5)／100的值( )。 A. 198 B. 199. 6 C. 198. 56 D. 200 14. 已知，A＄＝"12345678"，则表达式Val(Left (A$,4)+Mid(A$,4,2))的值为( )。 A. 123456 B. 123445 C. 8 D. 6 15. 表达式Len("123程序设计ABC")的值是( )。 A. 10 B. 14 C. 20 D. 17 16. 下面正确的赋值语句是( )。 A. x＋y＝30 B. v＝π*r*r C. y=x＋30 D. 3y＝x 17. 为了给x,y,z三个变量赋初值1，下面正确的赋值语句是( )。 A. x＝1：y＝1：z=l B. x=1，y=1，z=1 C. x=y＝z=1 D. xyz=1 18. 赋值语句：a＝123＋Mid("123456",3,2)执行后，a变量中的值是( )。 A. "12334" B. 123 C. 12334 D. 157 19. 赋值语句：a＝123 & Mid("123456",3,2)执行后，a变量中的值是( )。 A. "12334" B. 123 C. 12334 D. 157 二、填空题 1. 在VB中，1234、123456＆、1.246E+5、1.2346D＋5四个常数分别表示_____________、___________、____________、______________类型。 2. 整型变量x中存放了一个两位数，要将两位数交换位置，例如，13变成31，实现的表达式是____________________________________________。 3. 数学表达式3 + sin+ ?的VB算术表达式为________________。 ln( 45 )x2 4. 表示x是5的倍数或是9的倍数的逻辑表达式为______________________。 5. 已知a＝3.5，b=5.0，c=2.5，d＝True，则表达式：a>=0 AND a+c>b+3 OR NOT d的值是_________________。 6. Int(-3.5)、Int(3.5)、Fix(-3.5)、Fix(3.5)、Round(-3.5)、Round(3.5)的值分别是________、____________、____________、____________、____________、____________。 7. 表达式Ucase(Mid("hangzhouxihu",3,4))的值是______________。