1、国家二级 VB机试（上机操作）模拟试卷 237及答案与解析 一、基本操作题 1 请根据以下各小题的要求设计 Visual Basic应用程序 (包括界面和代码 )。 (1)在名称为 Forml、标题为 “鼠标光标形状示例 ”的窗体上画 1个名称为 Textl的文本框。请通过属性窗口设置适当属性，使得程序运行时，鼠标在文本框中时，鼠标光标为箭头 (Arrow)形状，如图 2 37所示；在窗体中其他位置处，鼠标光标为十字 (Cross)形状加图 2-38所示。 注意：存盘时必须存放在考生文件夹下，工程文件名为 vbsil vbp，窗 体文件名为vbsil frm。 (2)在名称为 Forml的窗体
2、上画两个名称分别为 Label1、 Label2，标题分别为 “开始位置 ”、 “选中字符数 ”的标签；画三个文本框，名称分别为 txtlnput、txtBegin、 txtNum；再画一个名称为 cmdDisplay，标题为 “显示选中文本 ”的命令按钮。程序运行时，在 txtlnput中输入若干字符，并用鼠标选中一些字符后，单击“显示选中文本 ”按钮，则把选中的第一个字符的顺序号显示在 txtBegin中，选中的字符个数显示在 txtNum中，如图 2 39所示。 要求：画 出所有控件，编写命令按钮的 Click事件过程。 注意：要求程序中不得使用变量，事件过程中只能写两条语句，分别用于显
3、示第一个字符的顺序号和显示选中的字符个数。存盘时必须存放在考生文件夹下，工程文件名为 vbs j2 vbp，窗体文件名为 vbsi2 frm。二、简单应用题 2 (1)在考生目录下有一个工程文件 sit3 vbp，窗体上由一个单选按钮数组，含三个单选按钮，均没有标题，请利用属性窗口，为单选按钮依次添加标题为 “北京 ”、 “上海 ”、 “广州 ”；再添加一个标题为 “显示 ”的命令按钮，如图 218所示。程 序的功能是在运行时，如果选中一个单选按钮后，单击 “显示 ”按钮，则根据单选按钮的选中情况，在窗体上显示 “我的出生地是北京 ”、 “我的出生地是上海 ”或 “我的出生地是广州 ”。要求如
4、下： 依次添加单选按钮标题为 “北京 ”、 “上海 ”、 “广州 ”；设初始选中的是 “上海 ”，添加命令按钮标题为 “显示 ”。 去掉程序中的注释符，把程序中的 ?改为正确的内容，使其实现上述功能，但不能修改程序中的其他部分，也不能修改控件的其他属性。 最后把修改后的文件按原文件名存盘。 (2)。在考生目录下有一个工程文件 sit4 vbp，请在 Forml窗体中画三个标签，名称分别为B1、 B2、 L1，标题分别为 “字号 ”、 “字体 ”、 “计算机等级考试 ”，其中 L1的高为500，宽为 3000；再在 B1、 B2标签的下面画两个组合框，名称分别为 Cb1、Cb2，并为 Cbl添加
5、项目： “10”、 “15”、 “20”，为 Cb2添加项目： “黑体 ”、 “隶书 ”、 “宋体 ”。请编写适当的事件过程，使得在运行时，当在 Cbl中选一种字号、Cb2中选一种字体时，标签 L1中的文字立即变为选定的字号和字体。如图 2 19所示。 注意：考生不得修改窗体文件中已经存在的程序，在结束程序运行之前，必须 选择一种字号和字体。必须用窗体右上角的关闭按钮结束程序，否则无成绩。最后，按原文件名存盘，程序中不得使用任何变量。 三、综合应用题 3 在考生文件夹下有文件 in5 txt，文件中有几行汉字。请在 Form1的窗体上画一个文本框，名称为 Text1，能显示多行；再画一个命令按
6、钮，名称为 C1，标题为“存盘 ”。编写适当的事件过程，使得在加载窗体时，把 in5 txt文件的内容显示在文本框中，然后在文本的最前面手工插入一行汉字 “计算机等级考试 ”(如图 2 197所示 )。最后单击 “存盘 ”按钮，把文奉框中修改过的内容存到文件 out5 txt中。 注意：只能在最前面捅入文字，不能修改原有文字。文件必须存放在考生文件夹下，以 sjt5,vbp为文件名存储工程文件 ，以 sit5 frm为文件名存储窗体文件。国家二级 VB机试（上机操作）模拟试卷 237答案与解析 一、基本操作题 1 【正确答案】 第 1小题 【操作步骤】 步骤 1：新建 “标准 EXE”工程，在
7、窗体Forml中画一个文本框，按表 3-23设置文本框及窗体属性。步骤 2：按要求将文件保存至考生文件夹中。 【特别提示】当窗体中控件的 MousePointer属性值为 0时，鼠标经过该控件时光标的形状类犁由窗体的 MousePointer属性值决定。 第 2小题 【操作步骤】 步骤 1：新建一个 “标准 EXE”工程，按表 324在窗体中画出控件并设置其相关属性。 步骤 2：在代码编辑窗口，编写命令按钮的单击事件过程。 参考代码： Private Sub cmdDisplayClick() txtBegin Text=txtInput SelStart+1 txtNum Text=txtI
8、nput SelLength End Sub 步骤 3：按要求将文件保存至考生文件夹中。 二、简单应用题 2 【正确答案】 第 1小题 【操作步骤】 步骤 1：打开考生文件夹中的本题工程文件 sjt3 vbp，依次选中窗体中的各单选按钮和命令 按钮，设置它们的相关属性，其属性及值如表 3 12所示。 步骤 2：双击 “显示 ”命令按钮，打开代码编辑窗口，去掉程序中的注释符 ” ，将问号 “?”改为正确的内容。参考代码： PriVate Sub C1一 Click() FOr 1=0 To 2 If Opl(i) Value=True Then Print“我的出生地是 ”+Opl(i).Cap
9、tion End If Next End Sub 步骤 3：按要求将文件保存至考生文件夹中。 第 2小题 【操作步骤】 步骤 1：打开考生文件夹中的本题工程文件 sjt4 vbp，如表 313画出三个标签和两个组合框并设置属性。 步骤 2：在代码编辑窗口，编写两个组合框的单击的单击事件过程。 参考代码： Private Sub CblClick() L1 FontSize=Cbl Text End Sub Private Sub Cb2一 Click() L1 Font=Cb2 Text End Sub 步骤 3：按键运行程序并选择一个字号和字体，然后单击窗体右上角的关闭按钮结束程序。 步骤
10、4：按要求将文件保存至考生文件夹中。 三、综合应用题 3 【正确答案】 【操作步骤】 步骤 1：新建一个 “标准 EXE”工程，如表 3 103在窗体中画出控件并设置其相关属性。步骤 2：打开代码编辑窗口，编写相应事什过程。 参考代码： Private Sub C1一 C1ick() Open”out5 txt”For Output As#1 Print#1， Text1 Text Close#1 End Sub Private Sub FormLoad() Open“in5 txt”For Input As#1 Textl Text=“” Do While Not EOF(1) Line Input#1， as Textl Text=Text1 Text+a$+ Chr(13)+Chr(10) Loop Ciose#1 End Sub 步骤 3：按要求将文件保存至考生文件夹中。 步骤 4：按键键运行程序，存文奉的最前面手工插入一行汉字： “计算机等级考试 ”，然后单击 “存盘 ”按钮保存结果。
