《最新VB考试练习题上机操作资料.doc》由会员分享，可在线阅读，更多相关《最新VB考试练习题上机操作资料.doc（18页珍藏版）》请在三一文库上搜索。
1、精品文档第一部分1在窗体上添加一个命令按钮 （名称为Cmd1 ,标题为"输出平均值”）。程序运行 后，单击命令按钮完成以下工作： 随机产生20个0到1000的整数，将其放入一个一维数组中 求出所有元素的平均值，并显示在窗体上（如下图所示）2请在名称为Forml的窗体上添加一个名称为 Textl的文本框和一个名称为 C1、标题为”转换 "的命令按钮，如下图所示。在程序运行时，单击"转换"按钮，可以把Textl中的小写字母转换为大写，把大写字母转换为小写，其他字符不变。3在窗体上添加一个命令按钮 （名称为MyCmdl，标题为"输出最大值"
2、）。程序运行后，单击 命令按钮完成以下工作： 随机产生30个01000的整数，将其放入一个一维数组中 求出其中的最大值，并显示在窗体上。4请设计如下图所示窗体界面。程序运行时，在选中一个或两个复选框和一个单选按钮时，单击命令按钮，则对文本框中的文本内容做相应的设置。请编写适当的事件过程，完成上述功能。5在名称为Forml的窗体上添加一个名称为 Textl的文本框；添加两个标题分别为”对齐方式"、”字体"，名称分别为Fm1、Fm2的框架；在Fm1框架中添加三个单选按钮，标题分别为 左对齐”、”居中”、"右对齐”，名称分别为Opt1、Opt2、Opt3 ;在Fm2框架
3、中添加两个单选按 钮，标题分别为”宋体"、”黑体”，名称分别为Opt4、Opt5。要求：编写五个单选按钮的Click事件过程，使程序运行时，单击这些单选按钮，可以对文本框中的内容实现相应的操作(如图所示)。6请设计如下图所示窗体界面。运行程序时，先向左侧文本框中输入一个不超过10的正整数,然后选择"N的阶乘"或"(N+2)的阶乘"单选钮，即可进行计算，计算结果在右侧文本框中显示。 请编写程序完成上述功能。7在窗体上添加两个文本框和三个标签，设置它们的属性，达到下图效果。程序运行时，在第一个文本框输入一串字符，在第二个文本框中输入一个字符，然后单
4、击”统计"命令按钮,统计第二个文本框中字符（大小写被认为是不同的字母 ）在第一个文本框中出现的次数，统计 结果在标签Label3中显示。精品文档8在窗体上添加一个文本框和一个命令按钮。程序运行后，单击命令按钮，即可计算出0200范围内能被3或7整除的所有整数的和，并显示在文本框中。程序运行界面如下图所示。9请设计如下图所示界面（文本框名称为：Txt1 ,按钮名称为：Cmdl）。程序运行时在文本框 中输入字符串，点击命令按钮，判断文本框中的字符串是否是回文，将判断结果显示在窗体上。所谓回文是指字符串正序和逆序的结果相同，如“aBCCBa是回文，“aBCcBa'不是回文。10编程
5、实现求Sum丄.丄丄1!2!3!1n（n为小于等于20的整数）。n的值，点击“计算”命令按钮,程序运行界面如下图所示。程序运行时，在文本框中输入 将计算结果显示在标签上。第二部分1已知在同一个笼子里有总数 M只鸡和兔，鸡和兔的总脚数为 N只，编程求出鸡和兔各有多 少只。要求：程序运行后，在两个文本框中分别输入M和N的值，单击 计算”命令按钮，在两个标签框中分别输出鸡和兔的数量。程序运行界面如下图。提示：NA 2XM的偶数。2若一个3位正整数中各位数字的立方和等于该数字本身，则该数称之为水仙花数”。例如153是水仙花数，因为 153 = 1*1*1 + 5*5*5 + 3*3*3 。编程求出10
6、0999之间所有的 水仙花 数”。要求：程序运行后，单击 查找”按钮，在窗体上显示找到的 水仙花数”。程序运行 界面如下图。3编写程序，要求程序运行后，单击“开始”按钮，随机产生20个学生的成绩（0100的整数）,并在左边图片框中输出（一行5个成绩），并在右边图片框中输出平均分和及格的人数， 程序运行界面如下图。首 Forwl回区2 0 612 5 761163071 O9 4-5 37 7O4编写程序实现：程序运行时，单击窗体则显示如下图所示的图案。*口回X拿車専卓拿単草車卓卓辜章学*5编程实现：在窗体中有一个文本框，一个计时器和两个命令按钮。其功能是：程序的运行 时，单击 开始计数”按钮，
7、就开始计数，每间隔1秒，文本框中的数增加1;单击 停止计数 按钮，则计数停止。6以下程序运行界面如下图所示。其功能如下：1) 单击”读数据”按钮(Commandl)，可将随机产生2) 单击"计算"按钮(Command2)，则根据从组合框数据计算平均值，并将计算结果四舍五入取整后显示在文本框题目提供的程序代码不完整，请设计下图界面并录入代码，将程序中的内容。注意：不能修改程序的其他部分。题目提供的程序代码：Dim a(100) As In tegerPrivate Sub Comma nd1 Click()Dim n As In tegerFor n = 1 To 100 a
8、( n)=l nt(R nd *?)Next nEnd SubPrivate Sub Comma nd2 Click()Dim x& ,y& , z& ,i% , j% , k%100个三位正整数存到数组 a中；Combo1中选中的项目，对数组 a中的Text1 中。?改为正确的For i = 1 To 100If a(i) Mod ?The nx = x + a(i) : j = j + 1Elsey = y + a(i)?End IfNext kx = Int(x / j + 0.5): y = Int(y / k +0.5)z = In t(x + y) / (j
9、 + k) + 0.5)Select Case Combo1.TextCase "所有偶数”Text1 = ?Case "所有奇数”Text1 = ?Case "所有数"Textl = ?End SelectEnd Sub7编写程序。要求：程序运行后，单击开始”按钮，则随机产生20个2位数输出到窗体上，每行10个数。同时对所产生的20个数从小到大排序，将排序后的数再次输出在窗体上。程序运行界面如下图。8编写程序，程序的功能是：程序运行后，在文本框中输入一串字符，单击标题为”统计"的命令按钮,分别统计输入字符串中大写字母、小写字母以及其他字符的个
10、数，并将统计结果分别在相应的标签框中显示。程序运行界面如下图。9编写程序。程序功能是：程序运行后在文本框中输入一个正整数，单击判断”按钮，在标签框中输出该数是个素数”或 该数不是一个素数”的信息。程序运行界面如下图。j Fox-mIFOX Ml 13737足一个素数网画F I119119不足一个素数nwn10编写程序，程序的功能是：程序运行后，单击开始”按钮，在窗体上显示出10个小于100的随机正整数，单击查找”按钮，则在窗体的下一行显示出这 10个数中的最大的数以及最大数在此数列中的位置号。程序运行界面如下图。第三部分1在窗体Forml上添加两个文本框， 一个“转换”命令按钮和三个单选按钮
11、（名称分别为 Opt1、Opt2、 Opt3，标题分别为“大小写转换”、“全部大写”、“全部小写”）。程序功能：在上方文本框 Textl中输 入一字符串，选中“大小写转换”，单击“转换”按钮后，Text2中显示大小写相反的字符串； 选中“全 部大写”，单击转换按钮后，Text2中显示全部大写字符串， 选中“全部小写”，单击转换按钮后，Text2 中显示全部小写字符串 。程序运行界面如下图。要求： 请按要求完成窗体界面设计程序的部分代码已给出如下，但不完整。请录入下面代码, 并将“？”处补充完整。Private Sub Comma nd1_Click()Dim n As Integer, k A
12、s Integer, ch As String, a As String ch =""If Opt1.Value = True The nn = Len(?)For k = 1 To na = Mid$(Text1, k, ？)If a >= "a" A nd a <= "z" The nch = ch + UCase(a)ElseIf a >= "A" A nd a <= "Z" The nch = ch + LCase(a)Elsech = ch + aEnd IfN
13、ext kEnd IfIf Opt2.Value = True The n ch = UCase(Text1)If Opt3.Value = True Then ch =？ (Text1)Text2 = chEnd Sub 2编写程序，演示列表框控件的基本操作。在窗体上建立两个列表框，两个命令按钮。程序运行后，在 左边列表框中选中所需要的项目，单击“添加”按钮，则把所选中的项目移到右边列表框中。如果单击“删除”按钮，则删除左边列表框中选中的项目。程序运行时的窗体界面如图。斯 尔克三虹 海奥春长3编程实现：单击“输出最大值”按钮，随机产生8个大于或等于10小于100的整数，显示在窗体的第一行，然
14、后在窗体第二行显示其中的最大值。程序运行时的效果如图。恿匚|n|区11223288 3476821688I输出最大值I4在Forml的窗体上有一个名称为 Textl的文本框和两个命令按钮， 命令钮标题分别为“显示A”和"显 示B”。要求程序运行后，如单击“显示A”命令按钮，则弹出对话框，输入要显示的个数，根据输入的数值在文本框中显示相应数量"A"构成的字符串；如单击“显示B”命令按钮，也弹出对话框，输入"B"构成的字符串。程序运行时的窗体界面如要显示的个数，根据输入的数值在文本框中显示相应数量 图所示。$ FotmI匚Ifc I X5已知十个数
15、为：67, 45, 34, 28, 49, 37, 87, 76, 27, 83。编程实现：按“开始”按钮，则在窗体的第一行显示这十个数，在窗体的第二行按从大到小的顺序显示这十个数。123654886界面设计如下图所示，单击“确定”按钮，在文本框中显示一句话，说明用户选择的综合情况。觐 ForMl口问冈我是女学生，爱好：体育、摄影口I性别:身份发好厂男柠女柠学生厂教师疋体育厂电影疋摄影7编程实现：在窗体上的4个文本框中各输入一个整数作为各数组元素的值，然后单击命令按钮，在窗体上显示出数组元素中的最大值。 Foiml求最大值8编程实现：在窗体的两个文本框中分别输入一个正整数，单击“求最大公约数”
16、按钮后，在窗体第 行显示它们的最大公约数。程序运行界面如下图所示。9编程实现：在窗体的左上角有一个图像框，通过属性窗口任选一张图片装入到图像框的Picture属性中，每按一次“放大”按钮时图像放大 10%，同理，每按一次“缩小”按钮时图像缩小10%，放大缩小时均需保持图像的纵横比不变，按“结束程序”按钮则结束程序。程序运行界面如下图。10编程实现：在窗体上建立一个文本框（内容如下图所示），另外建立菜单，一级菜单标题分别为“背景颜色”，子菜单标题分别为“白色”、“红色”、“绿色”、“蓝色”。程序运行时，如果单击“白色”子菜 单，则将文本框的背景色设置为白色；如果单击“红色”子菜单，则将文本框的背
17、景色设置为红色；如 果单击“绿色”子菜单，则将文本框的背景色设置为绿色；如果单击“蓝色”子菜单，则将文本框的背 景色设置为蓝色。程序运行界面如下图。W. FotbI回区）白色 红色重床科技学院是一所全日制公办普通本錄色科院校，以工为主，以石油.冶金.机蓝芭电为特色，涵盖理.工.经.管.文.處裁著勃勃生机与较大发展潜另的高等学校.第四部分1 编程计算分段函数,x y,(x 0, y 0)< J|x - y|,(x< 0,厂 0)0,(其他情况)的值。要求用文本框(TextBox)输入 x,y 的值，单击标题为“计算”命令按钮后，利用标签控件上显示z的值。2、在窗体添加一个命令按钮(标
18、题为“开始”),单击该按钮，随机产生10个三位数(100999),在窗体的第一行这10个三位数，在窗体的第二行输出其中的奇数，在窗体的第三行输出其中的偶数。3.编程计算分段函数IX- z,z2, (x - 10,z0),(x -30, z 0)(-30 - x -10, x z)的值。要求用InputBox函数输入x, z的值，单击命令按钮(标题为“计算”)后，利用图形框(PictureBox )输出计算结果y。4 编程计算分段函数(x y 1)z 二0, (x = 0)的值。要求用InputBox函数输入x,yx, (x<-1)的值，单击命令按钮(标题为“计算”)后，用文本框中输出计算
19、结果z。5 编程实现求 Sum=1 + ( 1+2) + (1+2+3) + ( 1+2+3+4) + +(1+2+3+4+ n)。程序运行时,在文本框中输入n的值，点击“计算”命令按钮，将计算的结果显示在标签上。程序运行界面如下图。6编写一个程序，其功能为输入货物的数量及单价，求总价，并输出。窗体上的两个标签的标题分别为”货物的数量（个）:"和"货物的单价（元）:",在两个文本框中输入相应的数据，当按“总价”按钮时，在右下方的图形框中显示原价和折扣价。当原价达到2000元以上时，按8折计算折扣价；当原价达到1000元以上时，按9折计算折扣价。程序运行界面如下图。
20、7编程实现：单击“加密”按钮后，将上方文本框中的字符串加密后显示在下方的文本框中。力卩密的方法是：把明文中的每个字母改为它后面的那个字母 （"z"后面的字母认为是"a","Z"后面的 字母认为是"A"）。程序运行界面如下图。8编程实现：程序运行时，输入一个大于 1的正整数到文本框中，选择 "偶数和"或"奇数和”，单击"计算" 按钮时，则在左下方的标签控件中显示所选的计算类别和计算结果。计算规则：将按照选定的”计算类别"计算小于或等于输入数据的正偶数和或正奇数和。程序运行界面如下图。9编程实现：在窗体上的4个文本框中各输入一个整数作为各数组元素的值, 体上显示出数组元素中的最小值。然后单击命令按钮，在窗10程序运行后，在窗体的文本框中输入有关信息（"密码"文本框中显示”*"字符），然后单击”提交"按钮,则在右边列表框中显示相关信息。单击"重输"按钮，则清空三个文本框和列表框中数据。程序运行界面如下图。