1、国家二级 VB机试（上机操作）模拟试卷 389及答案解析(总分：6.00，做题时间：90 分钟)一、基本操作题(总题数：1，分数：2.00)1.请根据以下各小题的要求设计 Visual Basic应用程序(包括界面和代码)。 (1)在名称为 Form1的窗体上画一个文本框，名称为 Text1，内容为“VB 程序设计”；再画两个命令按钮，其名称分别为 Command1和 Command2，标题分别为“扩大“和“缩小”，如图 393所示，编写适当的事件过程。程序运行后，每单击 Command1命令按钮一次，文本框中文本的字体扩大 12 倍；每单击 Command2单选按钮一次，文本框中文本的字体缩
2、小 12 倍。 注意：存盘时必须存放在考生文件夹下，工程文件名为 sjt1vbp，窗体文件名为 sjt1frrn。 (2)在名称为 Form1的窗体上画一个列表框，其名称为 List1，通过属性窗口向列表框中输入 9个项目，分别为 10、20、30、40、50、60、70、80、90；画一个文本框，其名称为Text1，初始内容为空白；再画一个水平滚动条，其名称为 HScrol11，Min 属性和 Max属性分别为 0和100，如图 394(a)所示，编写适当的事件过程。程序运行后，如果单击列表框中的某个项目，则在文本框中显示该项目内容，并把滚动条的滚动框移到相应的位置，如图 394(b)所示。
3、要求：不得使用任何变量。 （分数：2.00）_二、简单应用题(总题数：1，分数：2.00)2.(1)在考生文件夹下有一个工程文件 sjt3vbp，相应的窗体文件为 sjt3frm。 在名称为 Form1的窗体上有一个名称为 Text1的文本框和名称为 Command1、标题为“确定”的命令按钮，一个名称为 List1的列表框和两个名称分别为 Option1和 Option2、标题分别为“添加”和“删除”的单选按钮，如图 395(a)所示。 程序运行后，如果选择单选按钮 Option1并在文本框中输入一个字符串，然后单击“确定”命令按钮，则把文本框中的字符串添加到列表框中，并清除文本框，如图 3
4、95(b)所示；如果选择列表框中的一项和单选按钮 Option2，并单击“确定”命令按钮，则删除列表框中所选择的项目，如图 395(c)所示；如果不选择列表框中的项目，或者没有在文本框中输入字符串，则单击“确定”命令按钮后，将显示一个信息框“未输入或未选择项目”，如图 395(d)所示。该程序不完整，请把它补充完整。要求：去掉程序中的注释符，把程序中的?改为正确的内容，使其能正确运行，但不能修改程序中的其他部分。最后用原来的文件名保存工程文件和窗体文件。 (2)在考生文件夹下有一个工程文件sjt4vbp，相应的窗体文件为 sjt4frm。 在窗体上有一个命令按钮，其名称为 Command1，标
5、题为“计算”。程序运行后，如果单击命令按钮，程序将根据下面的公式计算 的值：41131517，所提供的窗体文件已给出了命令按钮的事件过程，程序运行结果如图 396所示。 （分数：2.00）_三、综合应用题(总题数：1，分数：2.00)3.在考生文件夹下有一个工程文件 sjt5vbp，相应的窗体文件为 sjt5frm。 窗体外观如图 35(a)所示。三个命令按钮的名称分别为 Command1、Command2 和 Command3，标题分别为“读取数据”、“首字母大写”和“存盘”。 程序运行后，如果单击“读取数据”命令按钮，则读取考生文件夹下 in5txt 中的全部文本(文本中的单词与单词之间或
6、标点符号与单词之间均用一个空格分开)，并在文本框中显示出来。文本内容如下： TuckeddeepwithinthepromisesandpoliciesofhisStateoftheUnionaddress,PresidentBushuReredthreewordsthatspeakvolumesaboutWashingtonsparalvsisinaddressingtheplightoffhefortymillionAmericanswholackhealthinsurance.InbetweenhisdiscourseonMedicareandhissupportforalow-inco
7、mehealthcaretaxcredit,Bushcaliedforsomethingcalledassociationhealthplans 如果单击“首字母大写”命令按钮，则将文本框中每个单词的第一个字母变为大写字母(如果原来已是大写字母则不改变)，并在文本框中显示出来，如图 397(b)所示；如果单击“存盘”命令按钮，则把文本框中的内容(首字母大写后)保存到考生文件夹下的文件 out5txt 中。窗体文件中已给出了部分程序，请把它补充完整，使其实现上述功能。 （分数：2.00）_国家二级 VB机试（上机操作）模拟试卷 389答案解析(总分：6.00，做题时间：90 分钟)一、基本操作题
8、(总题数：1，分数：2.00)1.请根据以下各小题的要求设计 Visual Basic应用程序(包括界面和代码)。 (1)在名称为 Form1的窗体上画一个文本框，名称为 Text1，内容为“VB 程序设计”；再画两个命令按钮，其名称分别为 Command1和 Command2，标题分别为“扩大“和“缩小”，如图 393所示，编写适当的事件过程。程序运行后，每单击 Command1命令按钮一次，文本框中文本的字体扩大 12 倍；每单击 Command2单选按钮一次，文本框中文本的字体缩小 12 倍。 注意：存盘时必须存放在考生文件夹下，工程文件名为 sjt1vbp，窗体文件名为 sjt1frr
9、n。 (2)在名称为 Form1的窗体上画一个列表框，其名称为 List1，通过属性窗口向列表框中输入 9个项目，分别为 10、20、30、40、50、60、70、80、90；画一个文本框，其名称为Text1，初始内容为空白；再画一个水平滚动条，其名称为 HScrol11，Min 属性和 Max属性分别为 0和100，如图 394(a)所示，编写适当的事件过程。程序运行后，如果单击列表框中的某个项目，则在文本框中显示该项目内容，并把滚动条的滚动框移到相应的位置，如图 394(b)所示。要求：不得使用任何变量。 （分数：2.00）_正确答案：(正确答案：(1)【操作步骤】 步骤 1：新建一卜“标
10、准 EXE”工程，在窗体 Form1中加入一个文本框和两个命令按钮，其相关属性设置如表 458所示。 步骤 2：打开代码编辑窗口，输入如下代码。参考代码： Private Sub Command1_Click() Text2FontSizeText1FontSize*12 End Sub Private Sub Command2_C1ick() Text1FontSizeText1FontSize12 End Sub 步骤 3：按要求将文件保存至考生文件夹中。 (2)【操作步骤】 步骤 1：新建一个“标准 EXE”工程，在窗体上画一个列表框、一个文本框和一个水平滚动条，按表 459设置其相关属
11、性。 )解析：二、简单应用题(总题数：1，分数：2.00)2.(1)在考生文件夹下有一个工程文件 sjt3vbp，相应的窗体文件为 sjt3frm。 在名称为 Form1的窗体上有一个名称为 Text1的文本框和名称为 Command1、标题为“确定”的命令按钮，一个名称为 List1的列表框和两个名称分别为 Option1和 Option2、标题分别为“添加”和“删除”的单选按钮，如图 395(a)所示。 程序运行后，如果选择单选按钮 Option1并在文本框中输入一个字符串，然后单击“确定”命令按钮，则把文本框中的字符串添加到列表框中，并清除文本框，如图 395(b)所示；如果选择列表框中
12、的一项和单选按钮 Option2，并单击“确定”命令按钮，则删除列表框中所选择的项目，如图 395(c)所示；如果不选择列表框中的项目，或者没有在文本框中输入字符串，则单击“确定”命令按钮后，将显示一个信息框“未输入或未选择项目”，如图 395(d)所示。该程序不完整，请把它补充完整。要求：去掉程序中的注释符，把程序中的?改为正确的内容，使其能正确运行，但不能修改程序中的其他部分。最后用原来的文件名保存工程文件和窗体文件。 (2)在考生文件夹下有一个工程文件sjt4vbp，相应的窗体文件为 sjt4frm。 在窗体上有一个命令按钮，其名称为 Command1，标题为“计算”。程序运行后，如果单
13、击命令按钮，程序将根据下面的公式计算 的值：41131517，所提供的窗体文件已给出了命令按钮的事件过程，程序运行结果如图 396所示。 （分数：2.00）_正确答案：(正确答案：(1)【操作步骤】 步骤 1：打开考生文件夹中的本题工程文件 sjt3vbp，在代码编辑窗口中，去掉程序中的注释符“”，将问号“?”改为正确的内容。参考代码： List1AddItem Text1Text If Form1Option2Value True And List1ListIndex0 Then List1RemoveItem List1ListIndex 步骤 2：按要求将文件保存至考生文件夹中。 (2)
14、【操作步骤】 步骤 1：打开考生文件夹中的本题工程文件 sjt4vbp，在代码编辑窗口中，去掉程序中的注释符“”，将问号“?”改为正确的内容。参考代码： Result ResultSign*1i Sign Sign Text1TextResult*4 步骤 2：按要求将文件保存至考生文件夹中。)解析：三、综合应用题(总题数：1，分数：2.00)3.在考生文件夹下有一个工程文件 sjt5vbp，相应的窗体文件为 sjt5frm。 窗体外观如图 35(a)所示。三个命令按钮的名称分别为 Command1、Command2 和 Command3，标题分别为“读取数据”、“首字母大写”和“存盘”。 程
15、序运行后，如果单击“读取数据”命令按钮，则读取考生文件夹下 in5txt 中的全部文本(文本中的单词与单词之间或标点符号与单词之间均用一个空格分开)，并在文本框中显示出来。文本内容如下： TuckeddeepwithinthepromisesandpoliciesofhisStateoftheUnionaddress,PresidentBushuReredthreewordsthatspeakvolumesaboutWashingtonsparalvsisinaddressingtheplightoffhefortymillionAmericanswholackhealthinsurance.
16、InbetweenhisdiscourseonMedicareandhissupportforalow-incomehealthcaretaxcredit,Bushcaliedforsomethingcalledassociationhealthplans 如果单击“首字母大写”命令按钮，则将文本框中每个单词的第一个字母变为大写字母(如果原来已是大写字母则不改变)，并在文本框中显示出来，如图 397(b)所示；如果单击“存盘”命令按钮，则把文本框中的内容(首字母大写后)保存到考生文件夹下的文件 out5txt 中。窗体文件中已给出了部分程序，请把它补充完整，使其实现上述功能。 （分数：2.00
17、）_正确答案：(正确答案：【操作步骤】 步骤 1：打开考生文件夹中的工程文件 sjt5vbp，在代码编辑窗口中，去掉程序中的注释符“”，将问号“?”改为正确的内容。参考代码： chMid(oldSen，i，1) newSennewSen & ch Write #1，Text1Text 步骤 2：编写“读取数据”命令按钮的单击事件。参考代码： Private Sub Command1_Click() Dim s As String Open“in5txt“For Input As 1 Line Input #1，s Close #1 Text1Texts End Sub 步骤 3：按F5键运行程序，先单击“读取数据”按钮，接着单击“首字母大写”按钮，最后单击“存盘”按钮。 步骤 4：按要求将文件保存至考生文件夹中。)解析：
