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