国家二级VB机试（上机操作）模拟试卷600
基本操作题
1.在名称为Form1的窗体上添加两个名称分别为Framel、Frame2的框架，标题分别为“字号”、“修饰”；在Framel中添加两个单选按钮，名称分别为Optionl、Option2，标题分别为“10号字”、“20号字”，且标题显示在单选按钮的左边；在Frame2中添加一个名称为Checkl的复选框，标题为“下划线”。程序运行后的窗体如图所示。
注意：存盘时必须存放在考生文件夹下，工程文件名保存为sjtl．vbp，窗体文件名保存为sjt1．frm。
【操作步骤】
步骤1：建立界面，添加相应的控件并设置控件的属性。程序中的控件及属性见表4．43。
[*]
步骤2：调试并运行程序，关闭程序后按题目要求存盘。
解析：通过框架的Name和Caption属性设置框架的名称和标题，通过单选按钮的Name和Caption属性设置单选按钮的名称和标题，通过复选框的Name和Caption属性设置复选框的名称和标题。
2. 在名称为Forml的窗体上从上到下添加两个文本框，名称分别为Textl、Text2；再添加一个命令按钮，名称为Commandl，标题为“选中字符数是”。程序运行时，在Textl中输入若干字符，选中部分内容后，单击“选中字符数是”按钮，则选中的字符个数显示在Text2中(如图所示)。请编写按钮的Click事件过程。
要求：程序中不得使用变量，事件过程中只能写一条语句。
注意：存盘时必须存放在考生文件夹下，工程文件名保存为sjt2．vbp，窗体文件名保存为sjt2．frm。
【操作步骤】
步骤l：建立界面，添加相应的控件并设置控件的属性。程序中涉及的控件及属性见表4．44。
[*]
步骤2：打开代码编辑窗口，在指定位置编写如下代码。
参考答案
PriVate Sub Commandl_Click()
Text2=Textl．SelLength
End Sub
步骤3：调试并运行程序，关闭程序后按题目要求存盘。
【易错提示】SelLength属性与SelStart和SelText属性容易混淆，SelStart属性是返回／设置选定文本的起始点，SelText属性是返回／设置当前选定文本的字符串。
解析：selLength属性用于返回／设置选定的字符数，通过文本框的Name和Caption属性设置文本框的名称和标题，通过命令按钮的Name和Cap．tion属性设置命令按钮的名称和标题。
简单应用题
3.在考生文件夹下有一个工程文件sjt3．vbp。程序运行后，单击“读入数据”按钮，可将考生文件夹下in3．1xt文件中的所有英文单词读入，并在Textl文本框中显示；单击“插入列表框”按钮，则按顺序将每个单词作为一项添加到List1列表框中(如图所示)。
在in3．txt文件中，每个单词之间用一个空格字符隔开，最后一个单词的后面没有空格。已经给出了所有控件和程序，但程序不完整。
要求：请去掉程序中的注释符，把程序中的?改为正确的内容，使其能正确运行，但不能修改程序中的其他部分和控件属性。最后用原来的文件名保存工程文件和窗体文件。
【操作步骤】
步骤l：打开本题工程文件。
步骤2：打开代码编辑窗口，去掉程序中的注释符“′”，将问号改为正确的内容。
参考答案(阴影部分是需考生填入的内容)
Private Sub Commandl_C1ick()
Dim st$．ch$
Open App．Path＆＂＼in3．txt＂For In—
put As#’打开文件
Do While Not EOF(1)′文件指针是否到达文件末尾
Input#1，ch′达到文件末尾返回true．否则返回false
st=st＆ch′将读出的数据加到原有数据末尾
Loop
Close#1′关闭文件
Textl=st′将内容显示在文本框中
End Sub
Private Sub Command2_Click()
Dim st$，word$，C$
St=Textl
n=Len(St)
For k=1 TO n
c=Mid(st，k，1)′从st中依次取
出1个字符进行比较
If c＜＞＂＂Then
word=word＆C
E1Se
Listl．AddItem word
word=＂＂将word清空，为下一次作准备
End If
Next
LiStl．AddItem word
End Sub
步骤3：调试并运行程序，关闭程序后按题目要求存盘。
解析：本题首先要从文件中读入数据，再逐一检查文本框中每一个字符，如果发现空格则将其之前或两个空格之间的字符串作为一个单词用Addltem方法添加到列表框中。循环语句的上限为Len(st)，赋值给变量n，判断语句的判断条件应为Mid(st，k，1)＜＞＂＂，其中st=Textl．Text。每添加一个单词后清空变量word，将所取字符的起始位置加I，再次执行循环得到下一个单词。
4. 在考生文件夹下有一个工程文件sjt4．vbp，窗体上已经添加所有控件，如图所示。在程序运行时，如果单击“开始”按钮，则每隔0．1秒窗体上的汽车图标向右移动一次(初始状态下不移动)；如果单击“停止”按钮，则停止移动。
请完成以下工作：
①设置适当控件的适当属性，使得每O．1秒汽车图标向右移动一次，而初始状态下不移动。
②请去掉程序中的注释符，把程序中的?改为正确的内容。
③为两个命令按钮编写适当的事件过程，最后以原文件名存盘。
注意：不得修改已经给出的程序。编写事件的过程中不能使用变量，每个事件过程中只能有一条语句。
【操作步骤】
步骤1：打开本题工程文件，设置计时器Interval的属性为100，将Enabled属性设置为False。
步骤2：打开代码编辑窗口，在指定位置编写如下代码。
参考答案
Privat
本文档预览：3600字符，共5328字符，源文件无水印，下载后包含无答案版和有答案版，查看完整word版点下载
