VB复习资料编程题

四、编程题题号 题干编写一个程序，程序运行后的初始界面如所示。当用户在文本框输入姓名，例如输入“张三”，单击“确定”按纽，则程序的运行情况如图所示。单击“进入”按纽，则结束程序运行。2

编写一个程序，在屏幕上显示“你好，VisualBasic系统”，字体大小设为12磅、颜色为红色，如图所示。单击窗体后，在窗体上显示“初次见面，请多关照！”，同时窗体上出现两个命令按纽“继续”和“结束”，如图所示。如果单击“继续”按纽，则又回到开始运行状态；单击“结束”按纽，则在文本框（text1）输入一个三位数，单击窗体后，在窗体上打印输出该数的3个位数、十位数和百位数。编写一个程序，单击窗体后，在窗体上随机位置，随机输出一个大写的英文字4母利用InputBox输入圆的半径，计算并显示圆的面积。公式为：圆的面积 =∏5*r*r。在窗体上放一个标签Label1,一个命令按纽Command1，当窗体启动时使标签居于窗体的中间，并显示系统的当前时间，命令按纽显示为“放大”，当单击6命令按纽时，将标签中显示文字放大1~3倍（随机确定），并重新显示系统的当前时间。编写一个华氏温度与摄氏温度的转换程序，效果如所示。转换公式为：7F=9/5*C+32,C=5/9*(F-32) 。编写一个模拟袖珍计算器的程序，运行界面图图如所示。使用InputBox输入一个数，判断这个数的奇偶性。使用InputBox输入一个字符，判断你输入的字符的种类。编写一个程序，输入a，b，c三个数，要求按由大到小的顺序把它们打印出来。输入一个数字(0~6)，用中英文显示星期几。当输入数字 0后，运行后界面设12计如图所示。设A.将两个文本框的对齐方式设置为右对齐，最多接受 3个字符。单击“健康状况”按钮后，根据计算公式将相应的提示信息通过标签显示13C.计算公式：标准体重=身高-105提示信息：高于标准体重1.1倍为偏胖；低高于标准体重0.9倍为偏瘦；其余为正常。编写一个程序计算，若基本工资大于等于 600元，增加工资20%；若小于600元大于等于400元，则增加工资15%；若小于400元则增加工资10%。请根据用户输入的基本工资，计算出增加后的工资。界面设计自定。Page1四、编程题题号 题干设计一个字符大小写转换程序，程序运行界面如图所示。当在文本框 Text1中输入大写字母，在文本框 Text2中同时显示其小写字母；当在文本框 Text1中15输入小写字母，在文本框Text2中同时显示其大写字母；当输入其它字符，则在文本框Text2中原样输出。求自然数N的阶乘计算一个3位数组成水仙花的个数（一个数的各位的立方和等于这个数本身的数）。运行界面设计：使用一个Picture框，如图所示。18 求sin(x)=x-x^3/3!+x^5/5!-x^7/7!+ ，使精度达到10-5。我国古代数学家张丘建在“算经”里提出一个世界数学史上有名的百鸡问题：鸡翁一，值钱五，鸡母一，值钱三，鸡雏二，值钱一，百钱买百鸡，问鸡翁、母、雏各几何？请编写一程序。设计程序，求s=1+(1+2)+(l+2+3)++(1+2+3++n)的值在编辑框中输出100~1000之间能被37整除的数。编写一程序。有一根100米长的线段，每天剪掉一半，一直剪到小于0.1为止，请问几天后可剪完。编程序打印由数字组成的如图所示的金字塔图案。输入整数n，则显示出具有n行的杨辉三角形,运行界面设计如图所示。分析：解决此题所用方法的要点是：定义一个二维数组 A，在该数组中，每—行的第24一个元素和最后一个元素都为1，其余各元素等于它上面一行的同一列和前—列数据之和。编一个程序，随机产生一个 5*5矩阵，打印并输出5*5方阵中的下三角和上三25角元素。建立一个输入界面，完成田径比赛报名的录入功能。选择最合适的控件输入班级、姓名、性别、组别、项目信息。使用自定义类型将输入的内容保存在数组中，程序运行界面如图所示。随机产生10个任意的二位正整数存放在一维数组中，求数组的最大值、平均值、能实现将数据按升序排列，并且使用InputBox函数插入一个新数据使数组仍然升序排列，结果显示在图片框中，程序运行情况如图所示。用随机函数产生50个10~100之间的整数，并按升序且每行 10个数打印输出到28窗体上。利用随机数生成两个3*3矩阵（数据不一定相同，前者元素取值范围 30~70、前者元素取值范围101~135）。要求：在Form_Load事件过程中对A、B数组生29成随机数；将两个矩阵A、B相加，结果放入矩阵C中。程序运行界面自行设计利用随机数生成4*3矩阵A（数据不相同，元素取值范围 20~70），将矩阵A转30置。程序运行界面自行设计。利用随机数生成一个5*5矩阵C、前者输入决定。要求：找出矩阵 C最大值和下31标。程序运行界面自行设计。Page2四、编程题题号题干利用随机数生成两个4*4矩阵（前者元素取值范围30~70、前者元素取值范围32101~138）。要求：在Form_Load事件过程中对A、B数组生成随机数；在list1框中以下三角形式显示矩阵A、上三角形式显示矩阵B。程序运行界面自行设计。利用随机数生成4*6矩阵A（数据为两位数整数）。要求：在list1框中矩阵33A，将矩阵A的第一行与第三行对应元素交换位置，结果在list2框中显示。程34利用随机数生成5*5矩阵A（数据为两位数整数）。要求：在list1框中矩阵A，求矩阵A两条对角线元素之和，结果在exit1框中显示。35利用随机数生成5*5矩阵A（数据为两位数整数）。要求：在list1框中矩阵A，将矩阵A按列转换成一维数组，结果在exit1框中显示。?随机产生10个1~100的正整数方入数组，在Form中显示产生的数，并求出最大36值、最小值、平均值。运行界面设计如图所示。编一个程序，随机产生100个整数，放入数组a中。将其中的偶数放入数组b37 中，然后运用选择发将数组b中的数据从大到小的顺序进行排序，并将数组b以每行10个数据在窗体上输出。在一维数组中利用元素移位的方法显示如图所示的结果。编制程序，用随机函数产生20个两位数的整数，存于4行5列的二维数组中，将数组按行（矩阵形式）输出到窗体，并求出其中的最大元素及它的行、列坐标。规范整理英语文章，即对输入的任意大小写英语文章进行整理。要求：句子开头应为大写字母（句子以符号 "？"、"."和"！"作为结束符的），其它都是40提示：设置一个变量，存放当前处理字符的前一个字符，来判断前一字符是否为句子结束符。编一使用子过程的程序，子过程的作用为交换两个整型变量值，如图所示。分别编写计算下列级数的子过程和函数过程，并在窗体的作用单击事件中调42级数为：s=x/2!+x^3/4!+ +x^(2*n-1)/(2*n)!要求精度为：abs(x^n/(2*n)!<10^(-6)编写函数过程max，求数组中最大值。按command命令按钮，使用随机函数产43生10~100之间的10个随机数给数组赋初值，然后调用 max，输出最大值。Page3四、编程题题号 题干输入一系列字符串，按升序排列输出。程序运行后的窗体界面如图所示。要a.按回车键后即把该字符串存放到数组中，并输出在排序前的文本框 text2中B.单击“排序”命令按纽，字符数组“升序”排序，并在排序后的文本框text3中输出。a.定义窗体级字符型动态数组 s和整型变量n（表示输入字符串的个数），即44文在本框text1的KeyPress事件中编写程序处理单词，并存入数组中，同时PrivateSubText1_KeyPress(KeyAsciiAsInteger)DimIAsInteger,jAsInteger,kAsInteger,tAsStringIfKeyAscii=13Then...EndIfEndSub编写一个子过程用于判断给定的任意正整数是否是素数，并在“调用子过程”45按钮中编写调用语句。如图所示。编写一求平均值的函数aver(x,y) 。主调程序调用函数过程求平均值并输出46。如图所示。编写一子过程DeleStr(s1,s2)，将字符串s1中出现s2子字符串删去，结果存放在s1中。在源字符串中输入任意字符串，在要删除的字符串中输入欲删除47的子字符串，单击“删子字符串”按钮，调用DeleStr(s1,s2)，将结果在结果框中显示。如图所示。编一子过程ProcMin，求一维数组a中的最小值，子过程的形参自己确定。主调程序随机产生10个-300~-400之间的整数，调用ProcMin子过程，显示最小值。运行界面设计如图所示。注意：本题的形参应有两个，一个是数组，另一个是求得的数组的最小值，它们是"值传递"还是"地址传递"呢？它们都应该是传地址的方式。设计一个小学生做的算术练习程序。计算机连续地随机给出两位数内的算术题，要求学生回答，答对的打 "√"，答错的打"×"。将做过的题目存放在列49表框中备查，并随时根据学生的答案判断正确与否，并给出成绩，单击“结束”命令按钮，退出应用程序。程序运行界面设计如图所示。统计在一个文本框内各英文字母出现的次数（不区分大小写），并按英文字母的先后顺序输出各个字符与其对应的出现次数，要求将统计各字母出现次数的50自定义统计过程CharCount，个形参定义如下，其中，str1为被统计文本，数组a存放各个字符出现次数。SubCharCount(str1asstring,a()asinteger)Page4四、编程题题号 题干编一函数过程IsH(n)，对于已知正整数n，判断该数是否是回文数，函数的返回值类型为布尔型。主调程序每输入一个数，调用IsH函数过程，然后在图形框显示输入的数，对于是回文数显示一个“★”。运行界面设计如图 8-3所示51分析：判断回文数的方法是，将一个数字串从两头往中间逐对比较，只要有一对不相同，该数就不是回文数，全部比较过，都相同，就是回文数。应用滚动条控制颜色。通过3个滚动条分别控制3个文本框红绿蓝的背景颜色，并进而控制由这3色组成的混合色。表示颜色的文本框分别为TxtRed、52TxtGreen、TxtBlue和TxtColor；3个滚动条为VSbRed、VsbGreen和VsbBlue。为了控制颜色，还需要利用 RGB函数。设计一个秒表程序。程序运行界面设计如图所示。编写一程序，在窗体上画两个标签，其名称分别为Label1和Label2,Caption属性分别为“数值”及空白；然后画一个名称为Hscoll1的水平滚动条，其54中：Min的值为0，Max的值为100。程序运行后，如果单击滚动条两端的箭头，则在标签Lable2中显示滚动条的值，运行界面设计如图所示。编制一程序，要求输入成绩计算某个学生奖学金的等级，以三门功课成绩M1,M2,M3为评奖依据。运行界面设计如图所示。评奖标准如下：一等奖: 符合下列条件之一的可获一等奖：1) 平均分大于95分者。2) 有两门成绩是100分，且第三门功课成绩不低于 80分者。55二等奖: 符合下列条件之一的可获二等奖：1) 平均分大于90分者。2) 有一门成绩是100分，且另两门功课成绩不低于 75分者。三等奖: 各门功课成绩不低于70分者。符合条件者就高不就低，只能获得高的那一项奖学金。设计一“偶数迁移”程序，使用两个列表框list1、list2，两个命令按钮，单击“产生”时，计算机随机产生10个两位正整数放入list1内，单击“迁移56”时，先清空list2，再将list1内的偶数迁移至list2。运行界面设计如图所示。设a.根据选项中选择的家电及数量，单击 "确定"后，将选择的清单及总价在列b.每选择一种家电，光标自动定位在相应的文本框中，取消选择时，相应的"清除"按钮用于清空列表框中的项目。所有文本框只接受数字。Page5四、编程题题号 题干设a.设计两个定时器，Timer1用于显示系统时间，时间间隔为一秒；Timer2用于判断闹钟时间，时间间隔为0.5秒，Timer2设置为不可用。B.窗体的上半部是标签Label1，用于显示时间，设置Label1的Font为：宋体58C.窗体的下半部有一个标签Label2，标题为"闹钟时间："；Label2的右边是文本框Text1。D.在文本框中输入闹钟时间并按回车后，启动判断闹钟时间的定时器Timer2，如果Label1显示的时间超过那种时间，则标签Label1的背景色按红白两色交替变换。三种文件管理控件的使用练习（显示指定的文件目录中的文件，并可以根据文59件类型分类显示），如图所示。建立运行界面设计如图所示的文件操作窗口，将选中的文件复制到目标文件夹。在源文件部分实现文件的查询；在目标文件夹部分实现文件的查询、删除、并支持新建文件夹。利用文件系统控件、组合框，制作一个文件浏览器，组合框限定文件列表框中显示文件的类型（有“所有文件(*.*)”、“应用程序(*.exe)”、“文本文件(*.txt)”等）,如选定“应用程序(*.exe)”项,则只显示*.exe文件.当在文件列表框中双击某个文件时,如果是*.exe文件,则通过shell函数调用执行，否则用MsgBox显示提示信息。程序运行界面设计如图所示。建立下拉式菜单，通过菜单来控制文本框中的文字的字体、颜色等。程序运行界面设计如图所示。设计一个画图程序，程序运行情况如图所示。编制程序，计算1到100之间，能够被3整除但不能被9整除的整数的和，并输64出。编制程序，生成22到62之间的10个随机整数并存放在数组a(1to10)65中，求这10个数中最大数值和最小数值出现的位置，并输出。66编制子程序subshow(nasinterger)，显示数字排列；如图所示依次类推，要求：编制程序调用该子程序，打印n=9时图形。67编制程序，输入一个数值范围，计算在此范围之间，能够被2整除但不能被4整除的整数的和，并输出。68编制程序，生成32到72之间的8个随机整数并存放在数组a(1to8)中，求这8个数的和与平均值，并输出。69编制子程序subshow(nasinterger)，显示数字排列；如图所示依次类推，要求：编制程序调用该子程序，打印n=9时图形。Page6四、编程题题号 题干在command1_click（）事件过程中实现下面分段函数的功能并打印结果。随机产生10个30~85之间的随机整数，求它们的平均数。编写子过程reverse，功能为：输入一个字符串，按与输入的字符相反的次序72输出这个字符串。如输入字符串为“ abcdefgh”，则输出为”hgfedcba”。随机产生10个50~102之间的随机整数，求它们的平均值。在窗体上有一个名称为Command1的命令按钮和一个名称为Edit1框，要求在命令按钮中编写事件过程，读入名为inf.txt的文件中内容，并在编辑框中显示。要求在程序运行后，单击窗体使用 Do LoopWhile 编写1-2+3-4+ -10075的事件过程。编写函数过程max，求数组中最大值。按command命令按钮，使用随机函数产76生10~100之间的10个随机数给数组赋初值，然后调用 max，输出最大值。输入整数n，单击图片框，显示出具有n行的杨辉三角形如下。编写一子过程DeleStr(s1,s2)，将字符串s1中出现s2子字符串删去，结果存放在s1中。在源字符串中输入任意字符串，在要删除的字符串中输入欲删除78的子字符串，单击command按钮，调用DeleStr(s1,s2)，将结果在结果框中显示。建立一个10个元素的数组，随机产生 10个[1，100]之间的正整数进行数组赋79值，并输出其中最大数及最大数在数组中的位置。test.txt 的形式写到磁盘上。1222333332221编写一个子过程用于判断给定的任意正整数是否是素数，并在“调用子过程”按钮中编写调用语句。在窗体上有一个名称为Command1的命令按钮和一个名称为 Text1的文本框,在文本框中输入字符串。要求在命令按钮中编写事件过程，将文本框中输入的大写字母写入名为outf.txt的文件中。Page7四、编程题题号 题干要求程序运行后，单击窗体使用 Do LoopWhile 编写1+2+ +n的事件过程83。要求在命令按钮中编写求数组中最小值的事件过程。数组下标从一开始，数组84元素为10个，使用随机函数产生10~100之间的10个随机数给数组赋初值。编写一求平均值的函数aver(x,y) 。主调程序调用函数过程求平均值并输出85。自定义一汽车数据类型,该汽车模型包括(厂商名,型号,颜色,重量,价格)等5个属性项.其中,厂商名为字符型,型号为长度不超过8位的数据字符类型,颜色有16种选择,重量是单精度型,价格为货币型。编写一函数过程IsH(n),对已知正整数n,判断该数是否是回文数，函数的返回值类型为布尔型。（所谓回文数指顺读与倒读数字是相同的，即指最高位与最低位相同，依次类推。）Page8四、编程题知识点答案顺序结构B001顺序结构B002顺序结构B003顺序结构B004顺序结构、InputBox使用B005顺序结构、RAND函数B006顺序结构B007选择结构、字符串连接B008选择结构、InputBox使用B009选择结构、InputBox使用B010选择结构B011多分支选择结构B012选择结构、基本控件使用B013选择结构、基本控件使用B014Page9四、编程题知识点答案基本控件、大小写转换函数的使用B015顺序结构，累乘B016选择结构、控件使用B017顺序结构、选择结构、精度控制B018多重循环B019循环结构，累加B020循环结构，mod函数B021循环结构B022循环结构、打印控制B023数组+循环结构B024数组+循环结构B025数组+循环结构B026数组+循环结