1、国家二级 VB机试（上机操作）模拟试卷 371及答案与解析 一、基本操作题 1 (1)在名称为 Form1的窗体上画出如图 3-46所示的三角形。下表给出了直线Line1、 Line2的坐标值，请按此表画 Linel、 Line2，并画出直线 Line3，从而组成如图 3-46所示的三角形。 注意：存盘时必须存放在考生文件夹下，工程文件名为 sjtl vbp，窗体文件名为 sjtl frm。 (2)在名称为 Form1的窗体上画一个名称为 List1的列表框，并任意输入若干列表项；再画一个名称为 Text1的文本框，无初始内容。 请编写 List1和 Text1的 Click事件过程。程序运行
2、后，如果单击列表框中的某一项，则在文本框中显示该项相应的顺序号，若单击第一项，则在文本框中显示 1；若单击第二项，则在文本框中显示 2，以此类推 (如图 347所示 )：如果单击文本框，则把该列表项的内容显示在文本框中。 注意：要求程序中不得使用变量，事件过程中只能写一条语句。存盘时必须存放在考生文件夹下，工程文件名为 sjt2 vbp，窗体文件名为 sjt2 frm。二、简单应用题 2 (1)在考生目录下有一个工程文件 sjt3 vbp，窗体上有一个圆和 一条直线 (直线的名称为 Linel)构成一个钟表的图案；有两个命令按钮，名称分别为 Command1、Command2，标题分别为 “开
3、始 ”、 “停止 ”；还有一个名为 Timerl的计时器。程序运行时，钟表指针不动，单击 “开始 ”按钮，则钟表上的指针 (即 Linel)开始顺时针旋转(每秒转 6，一分钟转一圈 )；单击 “停止 ”按钮，则指针停止旋转。运行时的窗体如图 3 114所示。请设置计时器的适当属性，使得每秒激活计时器的 Timer事件一次，并编写两个按钮的 Click事件过程。 文件中已经给出了所有控件和部分程序，不得修改已 有程序和其他控件的属性：编写的事件过程中不得使用变量，且只能写一条语句。最后把修改后的文件按原文件名存盘。(2)在考生文件夹下有一个工程文件sjt4 vbp，窗体上有两个文本框、三个单选按
4、钮和一个命令按钮。运行时，在Text1中输入若干个大写和小写字母，并选中一个单选按钮，再单击 “转换 ”按钮，则按选中的单选按钮的标题进行转换，结果放入 Text2(如图 3 115所示 )。在给出的窗体文件中已经给出了全部控件，但程序不完整，要求：去掉程序中的注释符，把程序中的。 “?”改为正确的内容。 注意：不能修改程序中的其 他部分。最后把修改后的文件按原文件名存盘。 三、综合应用题 3 考生文件夹下有一个工程文件 sjt5 vbp，窗体界面如图 3-23所示。程序功能如下：单击 “读文件 ”按钮，可将考生文件夹下 in5 dat文件的内容 (文件中仅含有用空格隔开的英文单词 )显示在
5、Text1文本框中。单击 “转换 ”按钮，可以把文本框中所有单词的第一个字母转换为大写。单击 “写文件 ”按钮则把文本框中的文本存到考生文件夹下的 out5 dat文件中。将事件过程中的注释符去掉，把 “?”改为正确的内容，以实现上述功能。 注意：考生不得修改窗体文件 中已经存在的控件和程序。程序运行结束前，必须单击 “写文件 “按钮保存转换后的文本内容，最后将程序按原文件名存盘，否则无成绩。 国家二级 VB机试（上机操作）模拟试卷 371答案与解析 一、基本操作题 1 【正确答案】 (1)步骤 1：新建一个 “标准 EXE”工程，按表 4-29在窗体中画出控件并设置其相关属性。 步骤 2：按
6、要求将文件保存至考生文件夹中。 (2)步骤 1：新建一个 “标准 EXE”工程，按表 430在窗体中画出控件并设置其相关属性。步骤 2：打开代码编辑窗口，编写列表框和文本框的单击事件过程。参考代 码： Private Sub List1_Click()Text1 Text=List1 LiStIndex+1End SubPrivate Sub Text1 Click()Text1 Text =List1 List(List1 LiStIndex)End Sub 步骤 3：按要求将文件保存至考生文件夹中。 【试题解析】 (1)本题只需按要求画出控件并设置相关属性。 (2)列表框的 List1nd
7、ex可用于设置或返回在列表框中当前选择项目的索引号，该索引号是从 0开始的。要实现本题所要求的功能，应在列表框的单击事件中，令文本框中的内容等于列表框的 List1ndex属性加 1；在文本框的单击事件中，令文本框的内容等于列表框的对应选中项的内容，即 List1 List(List1 List1ndex)。 二、简单应用题 2 【正确答案】 (1)步骤 1：打开考生文件夹中的本题工程文件 sjt3 vbp，在属性设置窗口，设置计时器的 Interval属性值为 1000， Enabled属性值为 False。 步骤 2：在代码编辑窗口，编写 “开始 ”和 “停止 ”按钮的单击事件过程。参考代
8、码： Private Sub Command1_Click() Timerl Enabled=True End Sub PriVate Sub Command2_Click() Timerl Enabled=FalSe End Sub 步骤 3：按要求将文件保存至考生文件夹中。 (2)步骤 1：打开考生文件夹中的本题工程文件 sjt4 vbp，在代码编辑窗口，去掉程序中的注释符 “”，将问号 “?”改为正确的内容。参考代码： a=Mid$(Text1 Text， k， 1) ch=ch+LCase(a) Text2=ch 步骤 2：按要求将文件保存至考生文件夹中。 【试题解析】 (1)本题通过
9、计时器的 Timer事件来控制直线控件的位置，从而实现钟表上的指针旋转的功能。为使计时器的 Timer事件每秒激活一次需将计时器的 Interval属性值设置为 1000；为使程序刚运行时钟表指针不动需将 Enabled属性值设置为 False。在 “开始 ”按钮的单击事件过程中，通过设置计时器的 Enabled属性值为 Tme来启动计时器。在 “停止 “按钮的单击事件过程中，通过设置计时器的 Enabled属性值为 False来停止计时器。 (2)本题源程序是在命令按钮的单击事件过程中，用 For循环语句和 Mid函数逐一取出文本框 Text1中的字符后，根据单选按钮的选择进行相应转换；当选
10、择 “大写转小写小写转大写 ”时，如果是小写字母就用 UCase函数转换为大写，如果是大写字母就用 LCase函数转换为小写，如果不是字母就不用转换；当选择 “全部大写 ”时，就用 UCase函数将文本框中所有字母转换为大写；当选择 “全部小写 ”时，就用 LCase函数将文本框中所有字母转换为小写。将转换结果显示在文本框 Text2中。 三、综合应用题 3 【正确答案】 步骤 1：打开考生文件夹中的工程文件 sjt5 vbp，在代码编辑窗口中，去掉程序中的注释符 “p”，将问号 “?”改为正确的内容。参考代码： ch$=Input(n， #1) =Len(chl)、或 n=Len(Text1
11、 Text) c=Mid(chl， k， 1) ch2$=ch2$ & c 步骤 2：按 键运行程序，单击各个按钮测试验证。 步骤 3：按要求将文件保存至 考生文件夹中。 【试题解析】 分析题目可知，在 Command1的 Click事件处理过程中，从in5 dat里面读取数据并显示在 Text1文本框上。因此第一个 “?”从文件读取数据， Input函数的第二个参数是文件号，即 “#1”；在 Command2的 Click事件处理过程中，完成字符转换，首先把文本框的内容保存到变量 ch1中，再通过循环修改每个单词的首字母，循环从 1到 n，因此 n保存的字符串的长度；第三个 “?”处是从 chl里面取出一个字符，接下来判断该字符是否是空格；根据“Text1 Text=ch2”可知 变量 oh2保存了转换后的字符串，因此在循环里面 ch2需要把转换后的字符 c加进来。
