.

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

.

.

VB上机练习汇总

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中，使用_________语句？

.