大学计算机vb操作题,vb的操作题(有答案)

《vb的操作题(有答案)》由会员分享，可在线阅读，更多相关《vb的操作题(有答案)(50页珍藏版)》请在人人文库网上搜索。

1、1.(1)考生的文件夹中有工程文件sj126.vbp，其表格如图所示。 程序运行时，会生成一个包含10个元素的整数数组。 选中“查找最大值”(或“查找最小值”)单选按钮，然后单击“查找”按钮，查找数组中的最大值(或最小值)，并将其显示在标签Label2中。 请删除程序中的注释，删除程序中的内容。修改为正确的内容。注意：考生不得更改表格文件中已经存在的程序。 最后修改的文件照原文修改保管书名。私有子命令1 _ click ()x=a(1)y=a(1)For i=2 To 10If Option1.Value=True ThenPS PS PR PSx=a(i )最终PSElseIf a(i) y。

2、 Theny=a(i )最终PS下一个If Option1.Value=True Then标签2.caption=xElse标签2.caption=y最终PS终结子2.(2)在名为form 1的表单上绘制名为Shape1的形状控件，并在“属性”窗口中绘制它做成圆形。 呈现名为List1的列表框，并在“属性”窗口中显示列表项的值分别是1、2、3、4、5。 将表单的标题设置为“图形控件”。 列表框，然后单击其中之一，使用选定的值作为形状控件的填充参数。 例如，如果选择3，则形状为控件上会显示竖线。 如图所示。要求：请不要在程序中使用变量。 每个活动只能写一句话。 存货的时候一定要存货。放入考生的文。

3、件夹中，项目文件名为sj107.vbp，表格文件名为sj107.frm。Shape控件允许您使用FillStyle属性设置图形的填充图案。 0 :透明，2 :虚线，3 :虚线，4 :点划线，5 :双点划线，6 :内实线。List控件的Click事件进程如下私有子列表1 _ click ()Shape1.FillStyle=List1.Text终结子3.(1)在名为form 1的表单上绘制名为Text1的文本框，绘制两个命令按钮。 名称分别为C1、C2，标题分别为“隐藏”、“显示”(参照图)。 请创建适当的事件过程，以便在运行时单击“隐藏”按钮，文本框就会消失，单击“显示”按钮，文本框就会显示出。

4、来。 请不要在程序中使用变量。*注意：保存光盘时，必须保管在考生的文件夹下。 项目文件名为sjt3.vbp，表单文件名为sjt3.frm。隐藏： text1.visible=false显示： text1.visible=true4 .在表单上绘制两个文本框： Text1和Text2。 请设置适当的控件属性，并编写适当的事件过程，以便在运行时在Text1中每次输入一个字符就会显示“*”。 此外，您还将看到您输入Text2的内容，如图所示。 请不要在程序中使用变量。*注意：保存光盘时，必须保存在考生的文件夹中。 项目文件名是sjt4.vbp，表格文件名是sjt4.frm。答案：将文本1文本框中的密。

5、码字符属性设为“*”。私有子文本1 _ change ()Text2.Text=Text1.Text终结子5. (1)考生的文件夹中有工程文件wy69.vbp及其表格文件wy69.frm，但该程序不完整。 有吗？在号码里填写正确的内容并删除吗？ 和所有注释符号(符号)都不能修改其他部分。 保存时不能更改文件名和文件夹。本主题说明表单包含名为List1的列表框、名为Text1的文本框、名为C1的命令按钮和名为copy的列表框。请求执行程序时，会在列表框中自动创建“Item1”、“Item2”、“Item3”和“Item4”四个列表项目。 如果选择了列表框的项目，单击“复制”按钮，则该项目被复制到。

6、文本框中(参见图)。私有子命令1 _ click ()Dim i As IntegerFor i=0 To 3Text1.Text=List1下一个终结子6考生的文件夹下有项目文件sj31.vbp，对应的表格文件为sj31.frm还有一个名为datain.txt的文本文件。 其内容如下32 43 76 58 28 12 98 57 31 42 53 64 75 86 97 13 24 35 46 57 6879 80 59 37程序运行后，点击表单，文件datain.txt的数据就会被输入到二维数组Mat中中，在表单上显示为5行、5列矩阵，输出矩阵的左上-右下对角线上面的数据如图所示。 “表单。

7、代码”窗口显示了程序的一部分不完全。 请完全补充，正确地发挥作用。要求：是否要删除程序中的注释，删除程序中的注释？ 改变正确的内容，实现上述工作是的。 但是，不能修改程序的其他部分。 用原始文件名保存上次修改的文件。解题方法：在sjt5.vbp中打开Form1表单并打开代码窗口。 修改后的代码如下所示选项库1私有子表单_ click ()Const N=5Const M=5Dim Mat(M，n )Dim i，jopen app.path datain.txt forinputas # 1For i=1 To NFor j=1 To M输入# 1，Mat(i，j )下一代下一个关闭# 1打印功。

8、能打印初始矩阵为“”打印功能For i=1 To NFor j=1 To M打印塔b (5* j ) mat (I，j )下一代打印功能下一个打印功能Print 左上-右下对角线上的数量为“”For i=1 To NFor j=1 To Mifi=j打印塔b (5* j ) mat (I，j )下一代下一个终结子7 .请根据以下主题的要求设计Visual Basic应用程序(包括接口和代码)。(名为Form1的表单上有两个标签(名称为Label1、Label2，标题为“名称”和“年龄”)，两个文本框(名称为Text1、Text2，Text属性为空)和命令按钮(名称为Command1 然后，编写。

9、命令按钮的Click事件过程。 运行程序后，在两个文本框中输入名称和年龄，然后单击命令按钮，两个文本框的内容就会显示在表单中，如图所示。 不要在程序中使用变量。*注意：必须保管在考生文件夹下。 项目文件名为sj39.vbp，表单文件名为sj39.frm。私有子命令1 _ click ()打印文本1.text，现在文本2.text岁终结子在名为Form1的表单上绘制图片框(名为Picture1)、水平滚动条(名为HScroll1)和命令按钮(名为Command1，标题名为“设置属性”)，并显示“属性”窗口图片框的高度与图形的高度相同，图片框的宽度是任意的(图1 )。 如果创建了适当的事件过程，并。

10、在程序运行后单击命令按钮，则会设置水平滚动条的以下属性Min 100Max 1500大变更100小型变更10然后，可以通过移动滚动条上的滚动块来放大或缩小图像的边框。 执行后的表单如图2所示。 不要在程序中使用变量。*注意：必须保管在考生文件夹下。 项目文件名为sj40.vbp，表单文件名为sj40.frm。图1的图2私有子命令1 _ click ()HScroll1.Max=1500HScroll1.Min=100hscroll1.小变更=10hscroll1.大变更=100终结子私有子hscroll1_ change ()Picture1.width=HScroll1.value终结子9 。

11、.考生的文件夹下有工程文件wy54.vbp和表格文件wy54.frm。 这个程序不完整。 有吗？在号码里填写正确的内容并删除吗？ 和所有注释符号(符号)都不能修改其他部分。 保存时，不能更改文件名和文件名。 相应的dat文件也保存在考生的文件下。 不那样做成绩就提高不了。本主题的说明如下：Form1表格中有5个标签控件和2个命令按钮，数据文件stud1.dat，保存着考生的考号、名字、成绩。1 )数据类型stu被定制，字符类型数据固定为10。2 )按下“开始”按钮，就可以从考生文件夹下的stu1.dat中读出所有数据，写入考生文件夹下的stud.dat文件中3 )执行完成，“开始”按钮变为“完。

12、成”，变为无效(灰色)私有类型stunum As Longnam As String * 10score As Single结束类型。私有子命令1 _ click ()Dim rec As stuDim i As Integermy file1=app.path student.dat my file2=app.path student1. dat 开放我的文件1 for输入as # 1开放我的文件2 for输入as # 2For i=1 To 8输入# 1，rec.num，rec.nam，rec.scoreWrite #2，rec.num，rec.nam，rec.score下一个克罗斯Com。

13、mand1.Caption=完成command1.启用=假终结子10 .将form 1的表单标记为Lab1，然后绘制另一个列表框。 其名称为L1，通过属性窗口向列表框中添加几个项目。 各项内容不受限制，建立适当的事件流程。 执行程序后，双击列表框中的某个项目，列表中的项目数就会显示在标签上。 程序的动作状况如图所示。 请不要使用变量。*注意：保存光盘时，必须保存在考生的文件夹中。 项目文件名是sjt14.vbp，表格文件名是sjt14.frm。私有sub L1 _ dblclick ()Lab1.Caption=L1.ListCount终结子11 .考生的文件夹下有项目文件wy55.vbp和表。

14、格文件wy55.frm。 这个程序不完整。 有吗？在号码里填写正确的内容删除吗？ 和所有注释符号(符号)都不能修改其他部分。 保存时不可以更改文件名和文件名。 相应的dat文件也保存在考生的文件下。 不那样做成绩就提高不了。本主题的说明如下：名为Form1的表单包含五个标签控件和两个命令按钮、数据文件worker.dat、工人编号、名称、性别和体重。1 )按下“开始”按钮，就可以从考生文件夹下的worker.dat中读出数据，并将体重大于平均体重的工人的所有数据写入考生文件夹下的worker1.dat文件中2 )执行完成，“开始”按钮变为“完成”，无效。私有子com exit _ click ()结束终结子私有sub comstart _ click ()Dim i As IntegerDim total As IntegerDim aver As SingleDim num(10 )，namstring(10 )，sexstring(10 )，wages(10 )my file1=app.path “工作器. dat”我的文件2=app.path。