《VB考试练习题(上机操作).docx》由会员分享,可在线阅读,更多相关《VB考试练习题(上机操作).docx(15页珍藏版)》请在taowenge.com淘文阁网|工程机械CAD图纸|机械工程制图|CAD装配图下载|SolidWorks_CaTia_CAD_UG_PROE_设计图分享下载上搜索。
1、第一部分1 在窗体上添加一个命令按钮(名称为Cmd1,标题为输出平均值)。程序运行后,单击命令按钮完成以下工作:随机产生20个0到1000的整数,将其放入一个一维数组中求出所有元素的平均值,并显示在窗体上(如下图所示)2 请在名称为Form1的窗体上添加一个名称为Text1的文本框和一个名称为C1、标题为转换的命令按钮,如下图所示。在程序运行时,单击转换按钮,可以把Text1中的小写字母转换为大写,把大写字母转换为小写,其他字符不变。3 在窗体上添加一个命令按钮(名称为MyCmd1,标题为输出最大值)。程序运行后,单击命令按钮完成以下工作:随机产生30个01000的整数,将其放入一个一维数组中
2、求出其中的最大值,并显示在窗体上。4 请设计如下图所示窗体界面。程序运行时,在选中一个或两个复选框和一个单选按钮时,单击命令按钮,则对文本框中的文本内容做相应的设置。请编写适当的事件过程,完成上述功能。 5 在名称为Form1的窗体上添加一个名称为Text1的文本框;添加两个标题分别为对齐方式、字体,名称分别为Fm1、Fm2的框架;在Fm1框架中添加三个单选按钮,标题分别为左对齐、居中、右对齐,名称分别为Opt1、Opt2、Opt3;在Fm2框架中添加两个单选按钮,标题分别为宋体、黑体,名称分别为Opt4、Opt5。 要求:编写五个单选按钮的Click事件过程,使程序运行时,单击这些单选按钮,
3、可以对文本框中的内容实现相应的操作(如图所示)。6 请设计如下图所示窗体界面。运行程序时,先向左侧文本框中输入一个不超过10的正整数,然后选择N的阶乘或(N+2)的阶乘单选钮,即可进行计算,计算结果在右侧文本框中显示。请编写程序完成上述功能。 7 在窗体上添加两个文本框和三个标签,设置它们的属性,达到下图效果。程序运行时,在第一个文本框输入一串字符,在第二个文本框中输入一个字符,然后单击统计命令按钮,统计第二个文本框中字符(大小写被认为是不同的字母)在第一个文本框中出现的次数,统计结果在标签Label3中显示。 8 在窗体上添加一个文本框和一个命令按钮。程序运行后,单击命令按钮,即可计算出02
4、00范围内能被3或7整除的所有整数的和,并显示在文本框中。程序运行界面如下图所示。9 请设计如下图所示界面(文本框名称为:Txt1,按钮名称为:Cmd1)。程序运行时在文本框中输入字符串,点击命令按钮,判断文本框中的字符串是否是回文,将判断结果显示在窗体上。所谓回文是指字符串正序和逆序的结果相同,如“aBCCBa”是回文,“aBCcBa”不是回文。10 编程实现求(n为小于等于20的整数)。程序运行界面如下图所示。程序运行时,在文本框中输入n的值,点击“计算”命令按钮,将计算结果显示在标签上。 第二部分1 已知在同一个笼子里有总数M只鸡和兔,鸡和兔的总脚数为N只,编程求出鸡和兔各有多少只。要求
5、:程序运行后,在两个文本框中分别输入M和N的值,单击“计算”命令按钮,在两个标签框中分别输出鸡和兔的数量。程序运行界面如下图。提示:N2M的偶数。2 若一个3位正整数中各位数字的立方和等于该数字本身,则该数称之为“水仙花数”。例如153是水仙花数,因为 153 = 1*1*1 + 5*5*5 + 3*3*3。编程求出100999之间所有的“水仙花数”。要求:程序运行后,单击“查找”按钮,在窗体上显示找到的“水仙花数”。 程序运行界面如下图。3 编写程序,要求程序运行后,单击“开始”按钮,随机产生20个学生的成绩(0100的整数),并在左边图片框中输出 (一行5个成绩),并在右边图片框中输出平均
6、分和及格的人数,程序运行界面如下图。4 编写程序实现:程序运行时,单击窗体则显示如下图所示的图案。5 编程实现:在窗体中有一个文本框,一个计时器和两个命令按钮。其功能是:程序的运行时,单击“开始计数”按钮,就开始计数,每间隔1秒,文本框中的数增加1;单击“停止计数”按钮,则计数停止。6 以下程序运行界面如下图所示。其功能如下: 1) 单击读数据按钮(Command1),可将随机产生100个三位正整数存到数组a中; 2) 单击计算按钮(Command2),则根据从组合框Combo1中选中的项目,对数组a中的数据计算平均值,并将计算结果四舍五入取整后显示在文本框Text1中。 题目提供的程序代码不
7、完整,请设计下图界面并录入代码,将程序中的 ? 改为正确的内容。注意:不能修改程序的其他部分。15题目提供的程序代码:Dim a(100) As IntegerPrivate Sub Command1 Click()Dim n As IntegerFor n = 1 To 100a(n)=Int(Rnd * ? )Next nEnd SubPrivate Sub Command2 Click() Dim x& ,y& , z& ,i% , j% , k%For i = 1 To 100If a(i) Mod ? Thenx = x + a(i):j = j + 1Elsey = y + a(i
8、) ?End IfNext kx = Int(x / j + 0.5):y = Int(y / k + 0.5)z = Int(x + y) / (j + k) + 0.5)Select Case Combo1.TextCase 所有偶数 Text1 = ?Case 所有奇数 Text1 = ?Case 所有数 Text1 = ?End SelectEnd Sub7 编写程序。要求:程序运行后,单击“开始”按钮,则随机产生20个2位数输出到窗体上,每行10个数。同时对所产生的20个数从小到大排序,将排序后的数再次输出在窗体上。程序运行界面如下图。8 编写程序,程序的功能是:程序运行后,在文本框
9、中输入一串字符, 单击标题为统计的命令按钮,分别统计输入字符串中大写字母、小写字母以及其他字符的个数,并将统计结果分别在相应的标签框中显示。程序运行界面如下图。9 编写程序。程序功能是:程序运行后在文本框中输入一个正整数,单击“判断”按钮,在标签框中输出“该数是一个素数”或“该数不是一个素数”的信息。程序运行界面如下图。10 编写程序,程序的功能是:程序运行后,单击“开始”按钮,在窗体上显示出10个小于100的随机正整数,单击“查找”按钮,则在窗体的下一行显示出这10个数中的最大的数以及最大数在此数列中的位置号。程序运行界面如下图。第三部分1 在窗体Form1上添加两个文本框,一个“转换”命令
10、按钮和三个单选按钮(名称分别为Opt1、Opt2、Opt3,标题分别为“大小写转换”、“全部大写”、“全部小写”)。程序功能:在上方文本框Text1中输入一字符串,选中“大小写转换”,单击“转换”按钮后,Text2中显示大小写相反的字符串;选中“全部大写”,单击转换按钮后,Text2中显示全部大写字符串,选中“全部小写”,单击转换按钮后,Text2中显示全部小写字符串 。程序运行界面如下图。 要求: 请按要求完成窗体界面设计 程序的部分代码已给出如下,但不完整。请录入下面代码,并将“?”处补充完整。Private Sub Command1_Click()Dim n As Integer, k
11、As Integer, ch As String, a As Stringch = If Opt1.Value = True Then n = Len(?) For k = 1 To n a = Mid$(Text1, k, ?) If a = a And a = A And a = Z Then ch = ch + LCase(a) Else ch = ch + a End If Next kEnd IfIf Opt2.Value = True Then ch = UCase(Text1) If Opt3.Value = True Then ch = ?(Text1) Text2 = chE
12、nd Sub2 编写程序,演示列表框控件的基本操作。在窗体上建立两个列表框,两个命令按钮。程序运行后,在左边列表框中选中所需要的项目,单击“添加”按钮,则把所选中的项目移到右边列表框中。如果单击“删除”按钮,则删除左边列表框中选中的项目。程序运行时的窗体界面如图。3 编程实现:单击“输出最大值”按钮,随机产生8个大于或等于10小于100的整数,显示在窗体的第一行,然后在窗体第二行显示其中的最大值。程序运行时的效果如图。4 在Form1的窗体上有一个名称为Text1的文本框和两个命令按钮,命令钮标题分别为“显示A”和“显示B”。要求程序运行后,如单击“显示A”命令按钮,则弹出对话框,输入要显示的
13、个数,根据输入的数值在文本框中显示相应数量A构成的字符串;如单击“显示B”命令按钮,也弹出对话框,输入要显示的个数,根据输入的数值在文本框中显示相应数量B构成的字符串。程序运行时的窗体界面如图所示。 5 已知十个数为:67, 45, 34, 28, 49, 37, 87, 76, 27, 83。编程实现:按“开始”按钮,则在窗体的第一行显示这十个数,在窗体的第二行按从大到小的顺序显示这十个数。6 界面设计如下图所示,单击“确定”按钮,在文本框中显示一句话,说明用户选择的综合情况。7 编程实现:在窗体上的4个文本框中各输入一个整数作为各数组元素的值,然后单击命令按钮,在窗体上显示出数组元素中的最
14、大值。8 编程实现:在窗体的两个文本框中分别输入一个正整数,单击“求最大公约数”按钮后,在窗体第一行显示它们的最大公约数。程序运行界面如下图所示。9 编程实现:在窗体的左上角有一个图像框,通过属性窗口任选一张图片装入到图像框的Picture属性中,每按一次“放大”按钮时图像放大10%,同理,每按一次“缩小”按钮时图像缩小10%,放大缩小时均需保持图像的纵横比不变,按“结束程序”按钮则结束程序。程序运行界面如下图。10 编程实现:在窗体上建立一个文本框(内容如下图所示),另外建立菜单,一级菜单标题分别为“背景颜色”,子菜单标题分别为“白色”、“红色”、“绿色”、“蓝色”。程序运行时,如果单击“白
15、色”子菜单,则将文本框的背景色设置为白色;如果单击“红色”子菜单,则将文本框的背景色设置为红色;如果单击“绿色”子菜单,则将文本框的背景色设置为绿色;如果单击“蓝色”子菜单,则将文本框的背景色设置为蓝色。程序运行界面如下图。 第四部分1编程计算分段函数的值。要求用文本框(TextBox)输入x,y的值,单击标题为“计算”命令按钮后,利用标签控件上显示z的值。2、在窗体添加一个命令按钮(标题为“开始”),单击该按钮,随机产生10个三位数(100999),在窗体的第一行这10个三位数,在窗体的第二行输出其中的奇数,在窗体的第三行输出其中的偶数。3编程计算分段函数的值。要求用InputBox函数输入
16、的值,单击命令按钮(标题为“计算”)后,利用图形框(PictureBox)输出计算结果y。4编程计算分段函数的值。要求用InputBox函数输入x,y的值,单击命令按钮(标题为“计算”)后,用文本框中输出计算结果z 。5 编程实现求Sum=1+(1+2)+(1+2+3)+(1+2+3+4)+ +(1+2+3+4+ + n) 。程序运行时,在文本框中输入n的值,点击“计算”命令按钮,将计算的结果显示在标签上。程序运行界面如下图。6 编写一个程序, 其功能为输入货物的数量及单价,求总价,并输出。窗体上的两个标签的标题分别为货物的数量(个):和货物的单价(元):, 在两个文本框中输入相应的数据, 当
17、按“总价”按钮时,在右下方的图形框中显示原价和折扣价。当原价达到2000元以上时,按8折计算折扣价;当原价达到1000元以上时,按9折计算折扣价。程序运行界面如下图。7 编程实现:单击“加密”按钮后,将上方文本框中的字符串加密后显示在下方的文本框中。加密的方法是:把明文中的每个字母改为它后面的那个字母(z后面的字母认为是a,Z后面的字母认为是A)。程序运行界面如下图。8 编程实现:程序运行时,输入一个大于1的正整数到文本框中,选择偶数和或奇数和,单击计算按钮时,则在左下方的标签控件中显示所选的计算类别和计算结果。计算规则:将按照选定的计算类别计算小于或等于输入数据的正偶数和或正奇数和。程序运行界面如下图。9 编程实现:在窗体上的4个文本框中各输入一个整数作为各数组元素的值,然后单击命令按钮,在窗体上显示出数组元素中的最小值。10 程序运行后,在窗体的文本框中输入有关信息(密码文本框中显示*字符),然后单击提交按钮,则在右边列表框中显示相关信息。单击重输按钮,则清空三个文本框和列表框中数据。程序运行界面如下图。