VB实验--------所有实验题目

1、实验题目总体要求：本学期的所有的实验题目，希望同学们按如下步骤认真做,（1）先画出处理界面（窗体）；（2）再给出处理步骤，（3）写出程序代码： 可参考下面的例题: 例如：设计程序，求1+2+3+.+N的和值。其处理过程是：（一）设计界面（在纸上画出界面，并注明各控件的名称）1:TEXT12:TEXT21: Command1（二）处理步骤： 单击命令按钮，按以下步骤处理（1）（2）（3）（4）（5）定义3个变量：N, s，x，分别用于存放：输入的数值，和值，控制循环 将文本框1的值，提供给变量 N;s=0 （累加前，将变量s初始化为0）;X=1 （设置循环的开始值）当X<=N时重复执行S=

2、s+xX=X+1（5）在文本框2中显示和值S（三）编写有关的代码：Private Sub Comma nd1_Click（） Dim n%，s%，x% N=val（text1.text） S=0X=1Do while x<=nS=s+xX=x+1LoopText2=sEnd Sub实验一：用语言或流程图描述处理步骤（1次）1.2.3.4.5.6.判定一个数X是否是偶数的处理步骤；写出求5的阶乘的计算步骤；写出求1+2+3+100的计算过程；写出计算1!+2 ! +3! +4! +20!的计算步骤；写出求一元二次方程解的处理步骤；给出将三个整数A,B,C按从小到大的顺序排列的处理步骤；实验

3、二：表达式及其运算的实现（1次）1.设计一个程序，完成利用文本框输入任意两个数的乘法运算，并显示计算结果。2.进一步完善程序，完成利用文本框输入任意两个数的加法、减法、乘法、除法运 算，并显示计算结果，3.再进一步，改进，完成，利用随机函数，产生任意两个100到200之间的整数,并完成两个数的加法、减法、乘法、除法运算，并显示计算结果。4.求方程AX+B=0的解。x5 .表达式：e当输入x,y,z值求该表达式的值.X3 Tyz26 .思考：求方程AX2+BX+C=O的解.7对于第4题,当提供A,B的值后，输出该式子例如,当 A=3,B=4,输出:3X+4=O实验三顺序程序设计（1次）1.利用I

4、nputBox函数输入一个正实数，用 Print方法在窗体上打印出其平方值、 平方根、立方值，结果保留2位有效数字。2编写一个华氏温度与摄氏温度之间的转换程序，运行界面如图公式为：F = 9/5 X C + 32及C = 5/9 （F 32）;其中，F :华氏温度；C :摄氏温度。2-3-5所示。转换3求方程AX+B=O的解。当提供A,B的值后，输出该式子例如,当A=3,B=4,输出:3X+4=0，并输出方程的解。实验四 分支程序设计（1次）1. 已知3个数，设计一个求出最大值的程序。2. 输入一个整数，判定是正数还是负数，并输出结果3. 输入x,y,z三个数，按从小到大的次序显示。显示形式：

5、由小到大输出 4.输入一元二次方程ax2 +bx+c=0的系数a,b,c，计算并输出一元二次方程的两个实根X1,X2。实验五 循环程序设计（1次）1.求1+2+3+.+N的和，N利用inputbox （）函数输入,2 .设计一个程序，对Sum=1+2+3+.+N,求Sum不超过10000的最大整数项数N。6求出100到200之间所有的素数及其平均值,并输出7利用循环，打印输出下列图形:AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA AAAAAAAAAAAAA AAAAAAAAAAA AAAAAAAAA AAAAAAA AAAAA AAAA1因子，但1不是完全数）； 则

6、6是完全数。8.找出1000以内的所有的完全数。 完全数是指等于其所有因子和的数（包括例如：6的因子有1、2、3,并且6=1+2+3,实验六数组的应用（2次）1. 输入一组不重复的数据（10个数据），同时找出最大值和最小值，并输出它们.2体操运动员参加自由体操决赛，有10个评委为他们打分。选手的成绩计算方法是：10 个评委分数中，去掉一个最高分和一个最低分，余下分数的平均值为选手的最后得分。编程序求选手的成绩。3输出如图所示的下三角数据4设某一个班共有60个学生，期末考试5门课程，请编一程序评定学生的奖学金，要 求打印输出一、二等奖学金学生的学号和各门课成绩。（奖学金评定标准是：总成绩超过全班

7、总平成绩20%发给一个奖学金，超过全班总平成绩10%发给二个奖学金。）5. 用随机函数产生50个10，100 ）的随机整数，并按照由小到大的顺序打印出来（10个数一行）。程序界面如下：排序前馥据:62S714637073581447E779846419S96 13 8 13 S 6 9 18 5 S S 17 16-98产生數甜援序后馥据:14355373S7i排序输出i111131335257TO72刖44 5- -8 3 S13 5 7 09 2 3 1014 6 8 99 3 0 131 4 _e G 96 :用随机函数产生100个0，99范围内的随机整数，统计个位上的数字分别为1, 2

8、,3, 4, 5, 6, 7, 8, 9, 0的数的个数并打印出来 7 .统计成绩分布亂缤计全班成尊芬lara实验七子过程与函数过程（2次）1.定义一个判断X是否素数的子过程，并调用此过程打印出前 100个素数。提示：子过程的入口参数是 X （整型），出口参数是 W （整型），W为1,表示X是 素数，W为0 ,表示X不是素数。2. 编写一个子过程（或函数过程），功能是求阶乘，并调用该过程计算：S=1!+2!+3!+n!的值，其中n的值可以通过键盘随机输入，图 2-7-1是程序界面。图2-7-1程序界面3.给出计算Sum=1+2+3+（n-1）+n的和值的递归函数，并通过命令按钮事件调用，计算输

9、出结果。4设有两个文本框TEXT1和TEXT2 ，在TEXT1中输入字符。当遇到回车键时, 将刚输入的字符串，在TEXT2框中显示，请设计程序完成该功能。注意：回车键的ASCII码是13,其扫描码也是135.设计一个程序，每间隔1秒，在文本框中显示数字，依次是：1 2 3 4 5 6 7 8 9 10 等等，直到显示30止。6. 设计一个程序，在窗体上当按下键盘上的“Ctrl ”键并单击鼠标器的左键，然后在文本框中显示：“按下键盘上的Ctrl键并单击鼠标器的左键”。7. 编写一个子过程，对于输入在文本框TEXT1中给定的字符串，判断是否是回文，并在文本框TEXT2中，显示判定结果。所谓回文是指正读与倒读内容相同。例如：ABCDFDSSDFDCBAABCBA都是回文。实验八文件操作（1次）1.编程把一个文本框中的内容，以文件形式存入磁盘。 假定文件名为c:My 。2.编程建立一个包含若干行字符串的文本文件