编程题 vb 习题.docx
- 文档编号:18130514
- 上传时间:2023-08-13
- 格式:DOCX
- 页数:34
- 大小:51.54KB
编程题 vb 习题.docx
《编程题 vb 习题.docx》由会员分享,可在线阅读,更多相关《编程题 vb 习题.docx(34页珍藏版)》请在冰点文库上搜索。
编程题vb习题
编程题
1、在窗体上建立2个文本框(Name属性值分别为Text1和Text2)和2个命令按钮(Name属性分别为Command1和Command2),程序运行时,在Text1中输入文本,单击Commadn1命令按钮时,将Text1文本框中的值复制到Text2文本框中;当单击Command2命令按钮时,退出程序。
2、已知自由落体的位移公式为:
s=1/2gt2+v0t,其中v0为初始速度,go为重力加速度,t为经历的时间,编写一程序,求位移量s。
用2个磨灭框分别输入初始速度和经历的时间,单击一个命令按钮时,进行计算,并将运算结果在另一文本框显示。
3、输入球体的半径,然后计算并输出球体的体积和表面积。
已知:
球体的体积计算公工为:
v=4/3πr3,球的表面积公式为:
f=4πr2,此处的R为还球体的半径。
要求:
程序用一个文本框输入半径r,单击一个命令按钮时,进行计算,并将运算结果即球的体积和表面积分别用2个文本框显示出来。
4、编写一个将摄氏温度转换成华氏温度的程序,要求:
摄氏温度通过输入对话框来输入,结果在窗体上显示,已知:
由摄氏温度求华氏温度的计算公式为:
9/5F=9/5×C+32,其中:
C为摄氏温度,F为华摄温度。
5、从键盘输入两个数,编写一程序,计算并输出2个数的和及平均值,通过InputBox函数输入数据,在窗体显示和及平均值。
6、编写一个程序,计算半径为15cm、高为30cm的圆柱体的体积、半径和高通过InputBox函数输入,计算结果并将其打印到窗体中。
7、编写一程序,输入一个整数,判断能否被3或5整除,如能整除就打印该数,否则不打印,请半程序代码写在窗体的Click事件中。
8、由键盘输入3条线段的长度,判断这3条线段能否构成三角形,如能构成三角形则计算三角形的面积,如果不能构成三角形则打印出错信息。
请将代码写在窗体的Click事件中,输入3条线段请用ImputBox函数。
9、输入一个年份,判断它是否为闰年。
闰年的条件是:
年号能被4整除但不能被100整除,或者能被400整除的年份。
10、输入3个数,要求按从小到大输出。
11、输入一个0~99999之间的整数,判断输入的是几位数。
如:
如果输入586请输出结果为3。
12、设计一个销售彩电(3000元/台)、冰箱(2500元/台)、洗衣机(1000元/台)的程序(商店送货上门时需加收100元)。
设计程序进,窗体中包括2个框架、3个选择按钮(用于选择商品)、3个文本框(用于输入商品的台数)、2个单选按钮(用于选择送货方式:
自取或送货)、1个命令按钮(用于计算金额)和1个文本框(用于显示总金额)。
13、编写一个程序求一个m*n矩阵中最大元素及其所在的行列号。
14、编写一程序将一个矩阵转置,即行列元素对换。
15、编写一个程序,求一个十进制整数n的各位数字之和,设n为小于或等于5位的数。
16、输入10个学生记录(每个记录包括学号、成绩),组成记录类型数组,统计出平均成绩,及成绩最低的学生的学号和成绩。
17、写一程序将一个数插入到已经有序(设从小到大排序)的数组中,使数组还继续保持有序。
假设原数组中的数为-12,-4,10,23,68。
18、编写一个求一组数中的最小数的Function过程,要求使用可变参数。
19、编写一个Sub过程,它能完成把数组中的某个位置上的元素移到指定的位置。
20、编写一个Sub过程,它能完成把数组中的某个位置上的元素删除。
21、编写一个Sub过程,将一个新的数据插入到数组中的指定位置上。
22、求两个数m和n的最大公约数和最小公倍数,要求用一个函数过程来实现。
23、编写一个函数过程,求п的近似值,公式为:
п/4=1-1/3+1/5-1/7+……+
/(2*n-1)
24、已知斐波那挈(Fibonacci)数列的第一项是1,其后每一项都是其前面两项的和,形如:
1,1,2,3,5,8,13,……,编写一个函数过程,求出该数列第n项的值。
25、请在例12.1的基础上再增加一个包含有“红色”,“绿色”,和“蓝色”的颜色主菜单,并设计其事件过程。
当用户执行某一菜单命令时,程序能执行相应的操作,既改变文本框中文字的颜色。
26、设计一个窗体,其中放一Lable控件,并在窗体中设置2个主菜单,各菜单的组成如下:
菜单标题栏
名称栏
菜单标题栏
名称栏
字体效果(&E)
meffect
字体颜色(&C)
mcolor
….粗体(&B)
mbold
…..黑色(&X)
mblack
….斜体(&I)
mitalic
…..红色(&R)
mred
….加下划线(&U)
munderline
…..绿色(&G)
mgeen
….加删除线(&S)
mstrikethrough
…..蓝色(&B)
Mblue
….分割线
mpartion
…..退出
mend
要求:
“字体效果”菜单项中的某一子菜单被选取时,前面打“√”号,其作用是改变Lable标签中的文字的字体;“字体颜色”中的某一菜单被选取时,呈灰色状态,其作用是将Lable标签的文字的颜色设置成该颜色。
27、利用通用对话框控件编写一个应用程序。
在窗体中添加一个通用对话框控件、一个文本框、两个命令按钮,当用户单击其中一个命令按钮时,显示一个打开文件对话框,由用户从中选择一个文件,在对话框中单击“确定”按钮后,可将选择的文件的路径及文件名显示到文本框中。
当用户单击窗体中的另外一个命令按钮时,可显示字体对话框,用于设置文本框中的文字的字体、样式、效果和颜色。
可用鼠标左键将图片从Picture1图片框中拖放到图片框Picture2中,此时图形从Picture1图片框中消失,并显示到Picture2图片框中,命令按钮Command1也从原来的禁用状态变为可用状态。
当单击命令按钮Command1时,图片从Picture2图片框中又回到Picture1图片框中,同时命令按钮Command1又变为禁用状态。
从程序代码中可以看出,该程序中所实现的控件拖放过程的启动和停止是利用对象的Drag方法设置实现的,并且整个拖放过程全部是由用户通过编程代码来控制实现,这个拖放过程并不是由系统自动启动和停止,这就是手动拖放模式的特点。
28、在窗体上画一文本框,编写程序实现向文本框中输入数据,只允许在文本框中输入字母和数字字符。
29、写一程序,通过拖动鼠标的清洁工在窗体上拖画直线。
30、在窗体上加一图片框,在图片框中加一图片,利用手工拖动的方法,利用鼠标可以将图片拖动到窗体的任何一个部位。
31、设有通用对话框cmdialog,在点击command1时,显示“打开”对话
框。
文件类型为*.*,*.txt,*.bat,默认类型为*。
Bat. (10分)
sub command1_click()
End s
32、设窗体中有image1:
蝴蝶展开翅膀图,image2:
蝴蝶合上翅膀图,
image3;timer1:
定时器,timer1每秒触发一次,改变image3的图象,并
使它每次位置x+10,y+10,当x超出屏幕宽度时,将位置中的x改为0。
A、写出timer1_timer中的程序设计思想 (10分)
B、写出timer1_timer中的程序代码 (15分)
33、在窗体的Command1_click事件中使用输入框来判断答案是否正确,且在三次错误后退出。
其中正确值为99,用户输入错误后给出错误提示。
写出Command1_click中的程序代码(15分)
34、设计文字颜色、大小、位置不断变化的程序。
(位置可随机或滚屏)
35、输入一个华氏(F)温度,要求输出摄氏(℃)温度。
公式为C=(F-32),输出要有文字说明。
36、输入三个数,分别存入变量,试编程求出最大者
37、输入一个不多于3位的正整数,要求:
它是几位数,分别打印出每一位数字,按逆序打印出各位数。
38、输入一元二次方程的A、B、C,求出这个方程有没有实根,如果有实根分别求出来
39、输入圆的半径,分别输出圆的周长和圆的面积。
40、将输入的学生百分制成绩转换为等级制,90分以上为A,80~89分为B,70~79分为C,60~69分为D,60分以下为E。
编程实现每输入一个成绩输出一个等级
41、求1到100之间的数累加和
42、求100到200之间的奇数累加和。
43、打印输出5到100之间的质数及其个数。
44、产生30个A~Z之间的随机大写字母。
45、输入一个数n,这个数的阶乘n!
(n!
=1*2*3*……..*(n-1)*n.)
46、输入10个数,求这10个数的总和,以及平均值。
47、输入10个整数,对这10个数进行排序,再从大到小输出。
48、在窗体中打印输出100个随机机基本键位字符(asdfghjkl;)
49、输入两个正整数,求其最大公约数和最小公倍数。
50、打印所有的三位数,其各位数字立方和等于该数本身。
51、一球从100米高度自由落下,每次落地后反跳回原高度的一半;再落下,求它在第10次落地时,共经过多少米?
第10次反弹多高?
52、用*号打印出平行四边形图案。
53、S=1+2+3+…+n,求S不大于1000时的n的值。
54、已知三角形三条边的长度为a、b、c,计算并显示三角形的面积。
公式为:
面积=sqr(s(s-a)(s-b)(s-c)),其中,s=(a+b+c)/2。
55、随机产生一个正实数,用Print方法在一行上显示出它的平方和平方根、立方根,每个
数保留3位小数,各位之间有间隔。
56、随机产生一个3位正数,然后逆序输入,产生的数与逆数同时显示。
例如,产生246,输出是246642。
57、窗体上有两个命令按钮,第一个按钮显示“写字板”、第二个按钮显示“画图”,要求单击命令按钮,利用Shell函数执行对应的应用程序。
58、输人三角形的三条边a、b、c的值根据其数值判断能否构成三角形。
若能还要显示三
角形的性质:
等边三角形、等腰三角形、直角三角形或任意三角形。
59、编写一程序根据上网时间计算上网费用计算的方法如下:
费用计算规则
同时为了鼓励多上网每月最多不超过600元。
60、输入一年份,判断它是否为闰年,并显示有关信息。
判断闰年的条件是:
年份能被4整除但不能被100整除,或者能被400整除。
61、计算S=1+1/2+1/4+1/7+1/11+1/16+1/22+1/29+……当最后所加的项的值<10-4时结束。
【提示】找出规律,某一项的分母是前一项的分母加上前一项在序列中的顺序数。
62、求Sn=a+aa+aaa+aaaa+……+aa……aaa(n个a)其中,a是一个由随机数产生的1~9(包括1、9)中的一个正整数。
是一个由随机数产生的10-20(包括10、20)中的一个数。
63、有一个四位数具有这样的特点:
它的平方根恰好就是它中间两位的数字,便如3600的平方根为60。
编程找出所有这样的四位数。
64、有一个长阶弱,如果每步跨2阶最后剩1阶,如果每步跨3阶最后剩2阶,如果每步跨4阶最后剩3阶,如果每步跨5阶最后4阶,如果每步跨6阶最后剩5阶,如果每步跨7阶时恰好走完,问这个阶梯到少有多少阶?
【提示】得用其肯定是7的倍数这个条件,然后根据同时满足除n余m(m=2,3,4,5,6;m=1,2,3,4,5)的逻辑关系即可。
95、有一根长度为321m的钢材料,要将它截取成两种规格的短料,规格a、b的长度分别为17m和27m,问分隔成a、b各多少段后剩余的残料r最少?
【提示】利用两重循环,进行最短残料的比较,防止r出现负值(实际情况不可能出现负值)。
96、编写一个程序输入某班长的三门课的学分对应成绩,计算其平均绩点。
97、用随机数产生5行6列的矩阵,其值为1~100之间的数,表示5位学生期末6门课程的成绩。
再利用DimRreserve重新定义5行7列的矩阵,增加的最右列存放每位学生的最高分;再定义6个元素的一维矩阵,存放每门课程的平均分数。
例如,求每位学生的最高分程序段如下:
Fori=0To4
max1=a(i,0)>max1Thenmax1=a(i.j)
Nextj
a(i,6)=max1
Nexti
求每门课程的平均分程序段如下:
1Forj=0To5
2aver=0
3Fori=0To4
4aver=aver+a(i,j)
5Nexti
6b(j)=aver/5
7Nextj
【思考】
若把第2句的aver=0移动到外循环句即第1句的前面,是否影响程序的运行?
是否影响程序正确性?
这和前面讲过的累加时要在循环体外对存放求和结果的单元清零是否矛盾?
98、编写一个子过程DeleStr(s1,s2),将字符串S1中出现的S2子字符串删去,结果还是存放在s1中。
例如:
s1=”12345678AAABBDEFG12345”s2=”234”
结果:
s1=-1567AAABBDEfG15”
【提示】解决此问题的方法要点如下:
(1)在s1字符串找s2的子字符串,可利用InStr()函数,要考虑到S1字符中可能存在多个或不存在S2字符串,用DoWhileInstr(s1,s2)>0循环结构来实现。
(2)若在s1中找到s2字符串,首先要确定s1字符串的长度,因s1字符串在进行多次删除时,长度在变化;然后通过:
Left$()、Right()函数的调用来实删除s1中存在的s2字符串。
99、编写一个将二进制字符串(全由0和1组成)转换成十进制的函数。
【提示】函数形式如下:
FunctionTranBtoD(S$)AsSingle
主调程序用之,并显示二进制字符串和转换结果。
【进一步要求】要考虑到二进制字符串中有小数和负号。
100、根据要求分别编写两个过程:
(1)编写一个冒泡法排序子壶程,对已知的若干个整数按递增次序排列。
子过程形式为:
SubSort1(a%)
(3)一个二分法查找函数过程,查找某数。
找到返回该数在数组中的下标位置,找不到返回值为-1。
(4)函数过程形式为:
FunctionSearch1(a%,Key%)AsInteger
a%()为有序的数组,Key%为要查找的数。
主调程序可通过随机函数产生若干个数,先后调用Sort1子过程和Search函数过程。
101、利用迭代法求方程x2-a=0的近似根,要求精度为10-5,迭代公式为:
xi+1=1/2(xi+a/xi).
编制3个过程:
迭代函数、迭代子过程、递归法函数过程。
主调程充中分别调用这3个过程,并调用标准函数sqr(a),比较过程正确与否。
102、编写一函数过程Maxlenht(s),在已知的字符串s中,找出最长的单词。
假定字符串s内只含有字母和 ,空格分隔不同的单词。
【提示】
(1)程序中用到当前单词、当前单词长度、最长单词、最长单词长度等变量。
(2)首先求出输入的字符串长度,然后从字符串中分离出单词,即对每个字符判断;若不为空格,将每个字符连接到当前单词的字符串变量,当前单词长度计数器加1;若为空格,表示一个单词结束,将当前单词长度与最长单词长度比较,若前者长,则将当前单词替代最长单词。
当前单词置空,当前单词计数器清除为0。
103、对于输入的文本统计各字母出现的次数,有序的显示文本中的单词。
【提示】根据韪要求,本例要求实现3个功能:
(1)统计各字母出现的次数,这在前面已介绍过。
(2)从输入的文本框的内容中分离出单词,可通过编程实现,本例利用Split函数简化编程。
(3)分离出的单词按递增顺序排列。
使单词有序,可以通过数组排序算法实现,但在VB中的列表框具有Sorted属性,可以简化编程。
104、利用组合框编写一字体浏览器,在组合框中可增加未出现过的字休。
105、窗体上放置文件系统的3个按件,外加一个文本框、一个标签和两个命令按钮。
建立文件系统,模仿Windows的应用程序中的典型“文件打开”对话框中所见到的交互作用,当用户在TextBox中输入一个文件类型时,比如*.txt。
它将被反映到FileListBox控件分解为路径和文件类型两个部分。
【提示】在代码中改变fileName或Path属性时,如果改变文件类型会产生一个PaterChange事件如果改变路径会产生一个PathChange事件,如果指定存在的文件名会产生一个DbliClick事件。
在本例中,当在文本框中输入一个文件名或文件类型后,将文本框的内容赋予FileName属性,File1.Path将获得路径名,File1.Pattern将获取文件类型。
使用Dir1.Path=File1.Path可改变目录路径。
106、利用文件系统控件和VB提供的文件命令物操作命令,对在目录列表框选一的目录,单击“删除目录”按钮,将选定的目录删除;对在文件列表框选定的文件,击“删除文件”按钮,将选定的文件删除。
运行界面见图1.7.5。
【提示】利用RmDir函数删除选定的目录时,此目录必须为空目录才有效,可先删除该目录下的所有文件;若要选定某个目录项,可用Dir1.List(Dir1.ListInedex),见常见错误和难点分析2。
107、利用文件系统控件、组合框、文本框,制作一个文本浏览器。
组合框限定显示*.txt和*.dat文件;当文件列表框选定欲显示的文件时,在文本框显示出该文件的内容。
【提示】在文本框显示文本,利用顺序文件操作的语句。
108、用驱动器列表框、目录列表、文件列表框、组合及其他控件设计一个图形浏览器。
要求根据组合框规定的文件扩展名(规定wmf、bmp的文件),在文件列表框显示该类文件;双击文件列表框中的扩展名为wmf的文件,则在图形框显示该图形,图形自动充满整个界面
109、在Form1窗体上放置一个标签框、一个命令按钮。
在窗体中建立可通过鼠标右键弹出的菜单(快捷菜单),含有“产生”、“窗体2”、和“结束”3个菜单项,它们之间有分隔线。
在Form2窗体上放置一个文本框。
选择快捷菜单的“产生”菜单项时,利用随机函数产生10个长度在2~10之间的小写字母字符串,并按行显示在标签内。
选择快捷菜单的“窗体2”菜单项,打开Form2窗体,并将所产生的10个字符串按递增次序显示在文本框内。
110、设计一个应用程序,要求如下:
(1)窗体上放置图形框、文本框、标签和滚动条等控件,并建立3个菜单项,菜单项的标准题为“产生”、“删除”和“结束”。
(2)使用滚动指定一个值(只允许是一个100以内的正数n),当单击“产生”菜单项时,根据滚动条的指定什n在图形框内按每行4个数据的格式输出随机数产生的n个100~200内的随机数。
(3)文本框内只允许输入一个100~200以内的正整数m,当单击菜单项“删除”时,删除与指定值m相等的随机数项,并重新在图形框内显示所余下的数据项。
(4)建立与菜单项相对应的工具条。
111、在Form1窗体上放置两个命令按钮控件Command1、Command2(控件标题分别人“绘图”和“返回”),一个图形框Picture1。
单击“绘图”按钮,定义Picture1的坐标系为(-4,2)-(4,-2),用循环语句和Pset方法在图形醛gPicture1内绘制方程y=sinx在-л到л之间的图形。
112、用Circle方法在窗体上绘制心脏形图案,构造图案的算法为:
将一个半径为r的贺周等分为n等分,以这n个等分点为圆心,以等分点到定点的距离为半径绘制n个圆。
【提示】高定程序中点坐标为(x1,y1),半径为r的贺周上第i个等分点到定点的距离平方为:
(r*Cos(i*t)+x0-x1)2+(r*Sin(i*t)+y0-y1)2
113、编写一个字幕滚动公千牌程序,要求如下:
(1)当程序启动后,在窗体上垂直(或水平)循环滚动显示文字。
(2)要求滚动的文字之间在垂直方向等距离。
(3)允许通过控件暂停滚动或继续滚动。
(4)滚动文字的左侧显示一幅图画,内容自字义。
114、建立一个图形浏览器。
要求如下:
(1)在窗体上放置通用对话框、标签、图像框和滚动条等控件。
(2)窗体上建立两个菜单项,菜单的标题用学生的学号、姓名。
(3)当单击菜单项“学号”时,打开通用对话框。
通用对话框可过滤BMP、WMF两种图形文件。
当从通用对话框选择一个图开文件后,标签内显示所选择的文件的目录路径,图像框内显示该文件的图形,使用滚动条可缩放图像框内的图形。
115、用PaintPictuer方法实现图形从右边飞入的效果。
116、从键盘上输入4年数,编写程序,计算并输出这4个数的和及平均值。
通过InputBxo函数输入数据,在窗体上显示及平均值。
117、编写程序,要求用户输入下列信息:
姓名、年龄、通信地址、邮政编码、电话,然后将输入的数据用适当的格式在窗体上显示出来。
118、编写程序,求解鸡兔同笼问题,一个笼子中有鸡x只,qjqy;y只,每只鸡有2只脚,每只兔有4只脚。
今天知鸡和兔总头数为h,总脚数为f.问笼中鸡和兔各若干?
119、a=5,b=2.5,c=7.8,编程序计算:
y=лab/(a+b*c)
120、输入以秒为单位表示的时间,编写程序,将其换算成几日几时几分几秒。
121、自由落体位移公式为s=1/2gt2+v0t其中V0为初始速度,g为重力加速度,t为经历的时间,编写程序,求位移师s。
设V0=4.8m/s,t=0.5s,g=9.81m/s2,在程序中把g定义为符号常量,用InputBox函数输入V0,和t两个娈量的值。
122、在窗体上画4个图像框和一个文本框,在每个图像框中装入一个箭头图形,分为4个不同地方向,把文本框的MultiLine属性设置为True,编写程序,当单击某个图像框时,在文本框中显示相应的信息。
例如单击身右的箭头是,在文本框中显示“单击向右的箭头”。
123、在窗体上建立三个文本框和一个命令按钮。
程序运行后,单击运行后,单击命令按钮,在每一个文本框中显示由Command1_Click事件过程设定的内容(例如:
“MicrosoftVisualBasic”),同时在第二,第三个文本框中分别用小写字母和大写定线显示每一个文本框的内容。
提示:
用每一个文本框的Change事件过程在第二、第三个文本框中显示指定的内容。
124 、编写程序,用文本框检查口令输入。
在窗体上建立一个文本框、一个图片框和三个命令按钮,把三个命令按钮的标题分别设置为“开始”、“检查口令”、“结束”。
程序运行后,单击每一个命令按钮,清除文本框中的信息,并把光标移到文本框中,按着在文本框中显示一个图形,否则显示一个信息框,要求重新输入,些时将调用一个命令按钮的Click事件过程,再一次在文本框中输入口令,直到输入正确的口令为止。
如果单击“结束”按钮,则结束程序。
125、用图形编辑软件(如Windows下的“画图”)画一个简单的图形,然后把它装入图片框。
126、编写程序,演示列表框控件的基本操作。
在窗体上建立两个列表框,两个命令按钮。
程序运行后,在每一个列表框中选择所需要的项目,单击“添加”按钮,把所选择的项目移到第二个列表框中。
如果单击“删除”按钮,则执行相反的操作。
在第二个列表框中,允许同时选择多个项目。
要求在每个列表框的下面用标签控件显示各自的Style和Sorted属性。
127、编写程序,用计时器按秒计时。
在窗体上画一个计时器控件和一个标签,程序运行后,在标签内显示经过的秒数,并响铃。
128、编写程序,计算1+2+3…+100
129、我国现有人口为12亿
- 配套讲稿:
如PPT文件的首页显示word图标,表示该PPT已包含配套word讲稿。双击word图标可打开word文档。
- 特殊限制:
部分文档作品中含有的国旗、国徽等图片,仅作为作品整体效果示例展示,禁止商用。设计者仅对作品中独创性部分享有著作权。
- 关 键 词:
- 编程题 vb 习题 编程