vb的操作题(有答案)

《vb的操作题(有答案)》由会员上传分享，免费在线阅读，更多相关内容在教育资源-天天文库。

1、1.（1）在考生文件夹中有工程文件sj126.vbp，其中的窗体如图所示。程序刚运行时，会生成一个有10个元素的整型数组。若选中"查找最大值"（或"查找最小值"）单选按钮，再单击"查找"按钮，则找出数组中的最大值（或最小值），并显示在标签Label2中。请去掉程序中的注释符，把程序中的？改为正确的内容。注意：考生不得修改窗体文件中已经存在的程序。最后把修改后的文件按原文件名存盘。PrivateSubCommand1_Click()x=a(1)y=a(1)Fori=2To10IfOption1.Value=TrueThenIfa(i)>xThenx

2、=a(i)EndIfElseIfa(i)

3、序中不得使用变量，每个事件过程中只能写一条语句。存盘时必须存放在考生文件夹下，工程文件名为sj107.vbp，窗体文件名为sj107.frm。在Shape控件中，可以用FillStyle属性设置图形的填充图案，0：透明，2：虚线，3：点线，4：点划线，5：双点划线，6：内实线。List控件的Click事件过程为：PrivateSubList1_Click()　　Shape1.FillStyle=List1.TextEndSub3.（1）在名称为Form1的窗体上画一个文本框，名称为Text1；再画二个命令按钮，名称分别为C1、C2，标题分别为"隐

4、藏"、"显示"（如图所示）。请编写适当的事件过程，使得在运行时，如果单击"隐藏"按钮，则文本框消失，而如果单击"显示"按钮，则文本框显示出来。程序中不得使用任何变量。*注意：存盘时必须存放在考生文件夹下，工程文件名为sjt3.vbp，窗体文件名为sjt3.frm。隐藏：text1.visible=false显示：text1.visible=true4.在窗体上画二个文本框，名称分别为Text1、Text2。请设置适当的控件属性，并编写适当的事件过程，使得在运行时，如果在Text1中每输入一个字符，则显示一个"*"，同时在Text2中显示输入的内容

5、（如图所示）。程序中不得使用任何变量。*注意：存盘时必须存放在考生文件夹下，工程文件名为sjt4.vbp，窗体文件名为sjt4.frm。答案：将Text1的文本框的PasswordChar属性为"*"。PrivateSubText1_Change()Text2.Text=Text1.TextEndSub5.（1）在考生文件夹中有工程文件wy69.vbp及其窗体文件wy69.frm，该程序是不完整的，请在有？号的地方填入正确内容，然后删除？及所有注释符（即'号）但不能修改其他部分。存盘时不得改变文件名和文件夹。本题描述如下：在窗体上有一个列表框，名

6、称为List1，一个文本框，名称为Text1，和一个命令按钮，名称为C1，标题为"复制"。要求程序运行后，在列表框中自动建立四个列表项，分别为"Item1"、"Item2"、"Item3"、"Item4"如果选择列表框中的一项，则单击"复制"按钮时，可以把该项复制到文本框中（如图所示）。PrivateSubCommand1_Click()DimiAsIntegerFori=0To3Text1.Text=List1NextiEndSub6在考生文件夹下有一个工程文件sj31.vbp，相应的窗体文件为sj31.frm，此外还有一个名为datain.t

7、xt的文本文件，其内容如下：32437658281298573142536475869713243546576879805937程序运行后，单击窗体，将把文件datain.txt中的数据输入到二维数组Mat中，在窗体上按5行、5列的矩阵形式显示出来，并输出矩阵左上-右下对角线上的数据，如图所示。在窗体的代码窗口中，已给出了部分程序，这个程序不完整，请把它补充完整，并能正确运行。要求：去掉程序中的注释符，把程序中的？改为正确的内容，使其实现上述功能，但不能修改程序中的其他部分。最后把修改后的文件按原文件名存盘。解题方法：打开sjt5.vbp中的Fo

8、rm1窗体，打开代码窗口，修改后的代码如下：OptionBase1PrivateSubForm_Click()ConstN=5Const