VB程序填空改错设计题库全

1.'功能：以下程序段用于计算n的阶乘：n！。（1！=1）

2. 已知某城市一年的交通事故车辆报废情况，编程序计算该城市的交通事故一年损失金额。 3. 下面的程序用\冒泡\法将数组a中的10个整数按从小到大排列，请将程序补充完整。 4. '程序运行界面。键盘输入3个数，将它们按由大到小的顺序输出，-1为结束标志。

5. '在窗体有三个复选框，名称分别为 Ch1、Ch2和Ch3，标题依次为'\体育\、\音乐\、\美术\，还有一个命令按钮，名称为C1，标题'为\显示\。要求程序运行后，如果选中某个复选框，则当单击'\显示\命令按钮时，则显示相应的信息。例如，如果选中\体育\和\音乐\复选框，则单击\显示\命令按钮后，在窗体上显示'\我的爱好是体育音乐\（如图1所示）；而如果选中\体育\、'\音乐\和\美术\复选框，则单击\显示\按钮后，在窗体上显示\我的爱好是体育音乐美术\。

6. 窗体上建立了一个文本框Text1(\输入口令\和一个命令按钮Command1(\检查\。' 判断密码是否正确，并显示相应提示在加载窗体时设置密码框最大长度为8，密码显示字符为“*” 7. 下面的程序用于求三个数中最大数

8. 要求输入若干学生的成绩，计算平均分和高于平均分的 人数，并将这两个数据放入数组的最后。 9. 求A,B,C三个数的最大值。

10. 该程序通过For循环计算一个表达式的值，这个表达式是1/2+2/3+3/4+4/5

11. 用户单击命令按钮后，程序将文本框Text1中的文本反转显示，同时在文本框Text2中显示文本框Text1中字符串的个数

12. 功能：单击“插入数据”按钮后，输入一个整型数据，该数据会被插入到一个有序的数组a(1 to 10)中,插入该数据后数组还是有序的。

13. 文件检验中，经常要统计一段文字中某些字出现的频率。如图所示，编一程序，统计文本框输入的一段文字中\我\的\计\照\是\几个字出现的频率，将结果显示在图片框

14. '在窗体上有一个名称为Text1的文本框，一个名称为C1，标题'为\校验\的命令按钮。其中文本框用来输入口令（如图1所示），要求在文本框中输入的内容都必须以\显示（请考生自己通过属性窗口设置）。要求程序运行后，输入口令，单击命令按钮后，对口令进行校验。 如果输入的内容是\这3个大写'字母，则用MsgBox信息框输出\正确\，否则输出\错误\

15. 功能：以下程序段实现的功能是：查找一数列中是否存在某数字x，'若数列中存在该数字，则输出其出现的次数，否则输出不存在信息

16. 输入数字1-7,显示其对应是星期几(例:输入 1,显示星期日,如果输入其它内容，一律显示\输入错误\17. 下面是一个体操评分程序，10位评委，除去一个最高分和一个最低分，计算平均分 (设满分为 10 分)

18. 写出程序运行后，单击窗体，Form1上显示的内容sum 函数的功能为累加求和 19. 以下程序用于判断一个正整数（≥3）是否为素数。

20. 以下程序段分别以子过程和函数来计算某级数部分和，级数公式如图1所示。 21. 本程序段将一个十进制整数m转换成 r (2－16)进制字符串

方法：将m不断除 r 取余数，直到商为零，以反序得到结果。 22. 以下程序段用于求∑n!

23. 以下程序段用于计算数组中各元素的乘积。

24. 在文本框内输入一串字符后，统计并显示各字母出现的次数不区分大小写字母。

25. 下面的程序段，用于实现在一个nXm的矩阵中，找出值最大的元素所在的行和列，并输出其值及行号和列号。

26. 本程序功能为，单击窗体，Form1的输出结果为A1=10B1=20A2=20B2=10

27. 本程序使用控件数组生成一个国际象棋棋盘。程序运行后单击某棋格，改变其颜色，即白变黑、黑变白，并在单击的棋格内显示其序号

28. '定义方阵的一种范数为该方阵各列元素的绝对值之和中的最大值。以下程序的功能

'是求一个4×4方阵的范数。该方阵的数据是随机生成的-20～20之间的整数。

29. 利用自定义类型数组，编写如下程序：模拟实现数据库记录'输入、显示与查询功能。程序运行后,单击“新增”按钮，将'文本框中的学生信息加到数组中；单击“前一个”或“后一个”'按钮，显示当前元素的前或后一个记录；单击“最高”按钮，'则显示最高分的记录。并随时显示数组中输入的记录数与当前数'组元素的位置。

30. 利用一个标签和三个水平滚动条，设计一个RGB调色板，运行界面如图所示

31：下面程序的功能是：首先生成一个由小到大已排好序的整数数组，再输入一个数据，单击\插入\按钮会自动把这个数据插人到原数组适当的位置，并保持数组的有序性。程序界面参见下图。

32：功能：用户界面如图所示，实现左右两个组合框中数据的左移和右移功能。程序开始运行时，在左边组合框中生成10个由小到大排列的随机三位正整数 (在设计阶段该组合框的Sorted属性值已设置为True),现要求完成:

（1）单击\＞＞\钮，左边组合框中的10个数全部移动到右边组合框，同时使\＜＜\钮能响应，\＞＞\钮不能响应。

（2）单击\＜＜\钮，右边组合框中的10个数全部移到左边的组合框，，同时使\＞＞\钮能响应，\＜＜\钮不能响应；

（3）单击\结束\按钮，结束程序运行。

33 ：功能：本程序执行功能为，输入系列字符串，按递减次序排列。 （1）在文本框输入字符串，按回车键后存放到数组a（）中；

（2）单击\排序\按钮（Command1）时，进行递减次序排列，并在图形框控件显示。 34：题目：已知用inputbox函数输入两个数x和y，比较它们的大小，使得x大于y。

35：功能：在窗体上建立两个文本框Text1(输入数)及Text2(显示结果)，一个命令按钮Command1(\判断\。单击按钮时判断Text1中输入的数值是否是4的倍数。 36题：题目：编写简易画图程序。如图所示 37 ：功能：完成程序，使程序输出如图示。 38 ：下面的程序段用于打印出以下图形

* *** ***** ******* ***** *** *

39 ：功能：从键盘上输入一串字符，以\结束，统计输入字符中的大、小写字母和数字的个数。 40 ：功能：本程序运行后，单击“替换”按钮，可以将text1中包含的text2内容，替换为text3内容。如果若text1中包含text2，则将被查找内容替换为text3中内容，否则，不进行替换，并且将最终结果打印在窗体上。运行效果如图1所示

41：题目：在窗体上有三个名称为Ch1、Ch2和Ch3的复选框，标题依次为\程序设计\、\数据库原理\、\计算机网络\，还有一个名称为C1，标题为\选课\的命令按钮（如图1所示）。要求程序运行后，如果选择某个复选框， 则当单击命令按钮时在窗体上输出相应的信息。例如：如果选择\程序设计\和\数据库原理\复选框，则单击命令按钮后，将在窗体上显示\我选的课程是程序设计数据库原理\；如果选择\数据库原理\复选框，则单击命令按钮后，将在窗体上显示\我选的课程是数据库原理\。

42：功能：要求在Text1中输入一段字符，选中“大写转为小写小写转为大写”，单击转换按钮后，Text2显示大小写相反的字符串；选中“全部小写”，单击转换按钮后，Text2显示全部小写的字符串；选中“全

部大写”，单击转换按钮后，Text2显示全部大写的字符串。 43 ：功能：以下程序的功能如(图1)。

44 :功能：以下程序段用于实现矩阵转置，即将一个n×m的矩阵的行和列互换 45:功能：完成程序，使程序输出值为 15

46:下面程序的功能是随机生成小于100的诸素数组成的数据。程序界面如下图所示。 47：将顺序文本文件 “MYFILE.TXT” 的内容一个字符一个字符地读入文本框txtTest中

48:根据输入的学习成绩,分别显示优秀(90分以上), 良好 (75分以上),及格(60分以上),不及格几个等级。

49:功能：下面的程序段用于打印出以下图形

* *** ***** ******* ***** *** *

50:功能：在窗体上设计两个文本框和两个标签，标签上显示\摄氏温度\和\华氏温度\，文本框一个用于输入摄氏温度数，一个用于输出对应的华氏温度?摄氏温度与华氏温度的转换公式为:c = (5 / 9) * (f - 32)。要求：对输入的摄氏温度数有检查功能，拒绝接收非数字字符。

51题:功能：本程序利用二分法查找某数字n是否在已排序的数列当中，若在其中则输出其在数列中的位置，否则输出-1

52题:在文本框1中输入若干以空格分隔的整数（末尾无空格），程序自动将输入的数据分解并存储到一个一维数组，再把数组中所有重复的元素删除（只保留一个），并输出到文本框2。 53题:功能：写出程序运行时单击窗体后，Form1上的输出结果 n=1 z=4 n=2 z=7 n=3 z=10

54:下面的程序实现：从键盘输入一个数字，将其插入一个有序数组中，插入后的数组仍保持有序。 55:功能：用输入对话框输入x，根据如图公式计算对应的y，在窗体上输出y的值。 56:有5名警校同学打靶，每人5发子弹，编写程序把最好打靶成绩挑出来。 57:以下程序段用于计算若干个数字的最大公约数。

58:本程序将利用文本框txtInput输入的一行字符串中的所有字母加密，加密结果在文本框txtCode中显示。加密方法如下：将每个字母的序号移动5个位置，即\，\，\程序段如下：

59:本程序执行功能为，命令按钮单击一次后，窗体上输出结果为： 36，25，16，9

60:用以下公式(公式如下图所示)求Sin(x)的值.当级数通项的绝对值小与eps=10^-7时停止计算,x的值由键盘输入.请完善如下程序

61. 功能：由筛选法求m以内的所以素数（1）把2--m以内的所有数放入筛中；（2）找筛中最小的素数，再筛中去掉该素数的所有倍数；（3）重复（2），直到要找的筛中的最小素数已超出m 的范围；（4）在Pictur1中打印筛中的素数 1、1000 2、p=p+1 3、False 4、prime(j)=1 5、end if

62. '功能：窗体中有若干控件，单击其中的一个按扭cmdput时，执行如下的事件过程，该过程的功能是把数据输出到指定的文件中.1 Student 2 stu 3#1

63'题目：有12个文本框代表12个位置。程序为A-J 10个字母分配十个位置，并显示座位分配。

64. '功能：程序输出结果为：n=3 x=42 y=9 1:1 2:+1 3:loop 65.'下面程序的功能是计算如图所示的值。请完善如下程序1 . st=“” 2 .(-1)^(i-1)/val(st)

66. '功能：利用下面的过程求m!和m*n '1. find m,n/call find(m,n) 2 s=1 3 x+y 67. '功能：本程序用于实现：从键盘接收一数字，判断其是否在数组中，如果在数组中则将其删除，否则显示该数字不在数组中。 1.Exit for 2. i<=10 3.a(k)=a(k+1)

68. '功能：以下程序段用于实现：输入两个正整数m和n，求其最大公因数和最小公倍数。 1

num10 3.b=temp

69. '功能：本程序功能为，第一次单击窗体，Form1的输出结果为2 5 9 1. Static 2.I 3.sum(i)

70. '以下程序段用于计算数组中各元素的乘积。 1.a() 2.t=1

71. '题目：据统计，手印全长与人体身高存在一定的比例关系：身高（厘米）=手印全长*9.75，编写通过人手印长计算身高的函数? 1. length 2. length(le)

72. '本程序的功能是把由４个\分隔的十进制数表示的IP地址转换为由32位二进制数组成的IP地址。 例如十进制表示的IP地址为202.119.191.1,其中每个十进制数对应一个8位的二进制数，合起来构成一个32位二进制的IP地址11001010011101111011111100000001。过程Tiqu用于提取十进制IP地址中每个用\分隔的十进制数；过程Convert用于将十进制数转换为相应的8位二进制数。程序界面参见下图。 1, str2=str2 & convert(a(i)) 2, d=Mid(st,i,1) 3,s=”” 4, s=CStr(b)&s 或 s=b&s 5,convert=s

73. '功能：打印出 100-999 之间的所有水仙花数如果一个数的百位，十位，个位数的立方和等于这个数本身则这个数为水仙花数 1.999 2.100 3.b*10 74. '功能：单击“插入数据”按钮后，输入一个整型数据，该数据会被插入到一个有序的数组a(1 to 10)中,插入该数据后数组还是有序的。 1:Exit for 2:i+1 3:m

75. '以下程序段采用选择法对数组元素进行从大到小排序。第一空：k 第二空：i+1 第三空：k=j 76. max()用于求3个数中最大值，利用这个过程求5个数中最大值。1.max(max1,73,352) 2.a>b 3.m>c 77. '功能：下面的程序段用于建立文件并输出文件，文件内容如下： ' '***** ' ***** ' ***** ' *****

' ***** 1.OutPut 2.Close #1 3.Input

78. '功能：输入任何一个英文字母x,若x的值为\,则显示x的大写字母；若x的值为\则显示x的小写字母；若x的值为其它的值,则显示xa（如输入的X的值是g，则显示ga）。

1. Select Case x 2.\\\To \3.Label1.Caption = Trim(x) + \或Label1.Caption = x + \

79. '功能：以下程序的功能如(图1)。1.d>0 2.end if 3.else

80. '功能：输入n个数，n由用户输入。程序的功能是将输入的n个数反向输出。1:n 2:n/2 3:a(h)=a(k) 81. '题目：能被4整除且不能被100整除，或者能被400整除的年份是闰年，试补充完整判断闰年的程序. 82. '功能：以下程序段用于计算若干个数字的最大公约数。1:1 2: Gcd(m1,n1)

83.本程序求3~100之间的所有素数（质数）并统计个数；同时将这些素数从小到大依次写入顺序文件 dataout.txt；素数的个数显示在窗体Form1上。1.Open “e:\\dataout.txt” For Output as #1 2.t1 mod t2=0 84. '下面程序的功能是：统计存放在数组A中的N个数有多少个是不同的。具体做法是：变量Left指向要被处理的数（从第2个元素开始），Right指向数组最后一个元素。若A(Left)与排在它前面的某个数组元素值相同，就用数组元素A(Right)的值来替换A(Left)的值，同时将变量Right的值减1；否则将变量Left的值加1，处理数组下一个元素，重复以上过程，直到Left>Right为止。Right的值即为不同的数的个数。程序界面参见下图所示。1.UBound(A) 2.Left-1 3.I=0 4.ght=Right-1

85. '功能：以下程序段利用随机函数生成15个10-100之间的整数，然后用选择法将其从小到大排序。 1. int(rnd*91+10) 2. t=1 3.t<>i

86. '功能：在窗体上画一个标签（名称为 Label1 ）和一个计时器（名称为 Timer1 ），然后编写如下几个事件过程：要求：每一秒钟Label1更新显示一次系统时间

87. '用以下公式求f(x) 的值。当通项的绝对值小于10^-7时停止计算，x的值由键盘输入。 '程序界面和公式参考图片所示：

1. Abs（x）>=1 2 .fx+a*t 3.a2=a

88. '功能：下面的程序段用于实现以下功能：利用冒泡法将一组整数 ' 从小到大排序。

1. step-1 2 .work=false 3.exit for

89. '功能：用Circle 方法在图片框正中画出许多不同颜色的同心圆，且不能画出图片框。 1: Picture1.ScaleWidth/2 2: Limit=CX 3: Limit

90. '功能：本程序执行后，最终在窗体上打印数字7。1: Output 2: Input 3:1 91'下面程序的功能是将给定整数 N 表示成若干个质数因子相乘的形式（分解质因数）.

92.'功能：本程序用辗转相除法求自然数m、n的最大公约数和最小公倍数，求最大公约数的算法如下: (1) 对于己知两数m、n，使得m>n; (2) m除以n得余数r;3) 若r=0，则n为求得的最大公约数，算法结束；否则执行(4)m=n，n=r再重复执行(2)原两数相乘除以最大公约数即为最小公倍数。程序如下: 93.功能：以下程序段实现的功能是：查找一数列中是否存在某数字x，若数列中存在该数字，则输出其出现的次数，否则输出不存在信息。

94.功能：以下程序段采用递归的方法计算最大公约数。单击“计算”按钮时，窗体上输出两个文本框中数字的最大公约数。

95.'功能：求表达式s=x/2!+x^3/4!+...+x^(2n-1)/(2n)!的值，并在窗体上输出。

'96.功能：下面的事件过程判断文本框Text1中输入的数所在区间，并在文本框Text2中输出判断结果 97.'功能：窗体中有两个List列表，及4个按钮。程序功能，单击“产生随机数”按钮，随机产生20个随机数填入List1中 “保存”按钮作用是将数组内容写到文件中“读出”按钮作用是将文件内容读到数组中 “结束”按钮作用是结束程序 98.'功能：求 1!+2!+……+10!的值。

99'功能：程序功能：在Text1，Text2，Text3中分别输入三个数字，在Text4中计算这三个数的和。如果三个文本框的输入不为数字则显示错误提示

100.'功能：过程suixian可以判断某一个数字是否是水仙花数，利用 该过程找出三位数中所有水仙花数。 所谓\水仙花数\是指一个3位数，其各位数字立方和等于该数本身。

101.'功能：'以下程序段分别以子过程和函数来计算某级数部分和，级数公式如图1所示。

102.'下面程序的功能是：将输入的2位16进制数的每一位转换为一个4位的二进制数，再组合成为一个8位的二进制数。程序界面参见下图。

103.'功能：窗体上建立了两个文本框Text1(输入字符串)及Text2(转换结果)，一个命令按钮Command1(\清除\。录入Text1内容时，将录入内容大写字母转为小写，小写转为大写。

104.'下面程序的功能是：找出仅由数字1、2、3、4组成的4位素数，要求每个素数由4个不同数字组算法提示：函数Validate用于验证一个4位数是否由4个不同数字组成。在函数中用A数组的各个元素分别对应数字0～9，只要某数字出现在四位数中，无论几次，均将该数字对应的数组元素值置为1。程序界面105.功能：以下程序的功能为，单击窗体后如果输入的数据分别为\，\和\？\时， 窗体上显示的内容分别是：W is Alpha Character、8 is Numeral Character、？is Other Character 106.'功能：以下程序段用于输出杨辉三角：结果样式如图1

107.'功能：窗体上建立了一个文本框Text1，用于显示结果。单击按钮弹出输入对话框录入0-6之间的数值， 判断输入值为星期几

本文来源：https://www.bwwdw.com/article/9f9d.html