全国计算机等级考试二级VB上机题库以及解析.docx

晨曦制作 全国计算机等级考试二级?VB?上机题库(一) 图?1 图?2 T1.width=T1.width+1400 T1.Height=T1.Height+400 T1.fontsize=T1.fontsize*3 最后单击保存按钮，工程命名为?sjt1.vbp,窗体命名为?sjt1.frm。 Text1.text=LCase(Text1.text) Text2.text=UCase(Text1.text) 、、 简单应用题（2?小题，每小题?20?分，共计?40?分） 1.在考生目录下有一个工程文件?sjt3.vbp，相应的窗体文件为?sjt3.frm。包含所有 控件和部分程序，如图所示。 要求： 1)利用属性窗口向列表框添加四个项目：Visual?Basic,Turbo?C,C++,Java; 2)请编写适当的程序完成以下功能：当选择列表框中的一项和单选按钮?Option1, 然后单击“确定”命令按钮，则文本框中显示“XXX?笔试”；当选择列表框中的一项 和单选按钮?Option2，然后单击“确定”命令按钮，则文本框中的一项和单选按钮 Option2，然后单击“确定”命令按钮，则文本框中显示“XXX?上机”。其中“XXX”是 在列表框中所选择的项目。 If?Option1.Value=True?then Text1.Text=List1.List(List1.ListIndex)+Option1.Caption 第?1?页?共?11?页 晨曦制作 End?If If?Option2.Value=True?then Text1.Text=List1.List(List1.ListIndex)+Option2.Caption End?If 最后单击保存按钮。 2．在考生目录下有一个工程文件?sjt4.vbp，相应的窗体文件为?sjt4.frm。在窗体上 已经有一个命令按钮。其名称为?Command1,标题为“计算并输出”；程序运行后， 如果单击命令按钮，程序将计算?500?以内两个数之间（包括开头和结尾的数）所 有连续数的和为?1250?的正整数，并在窗体上显示出来，这样的数有多组，程序输 出每组开头和结尾的正整数，并用“～”连接起来,如图所示，这个程序不完整，请 把它补充完整。 要求： 去掉程序中的注释符，把程序中的？该为正确的内容，使其实现上述功能，但不 得修改程序中的其他部分。最后把修改的文件按原文件存盘。 Private?Sub?Command1_Click() Dim?i?As?Integer,?j?As?Integer,?iSum?As?Integer Print?连续和为?1250?的正整数是： For?i?=?1?To?500 isum?=?0 赋初值 For?j?=?i?To?500 iSum?=?j+iSum 进行累加 If?iSum?=?1250?Then?Exit?For Next If iSum?=?1250?Then 和是否为?1250 Print?i;??～?;?j End?If Next End?Sub 答案为： 1）2)j+iSum?3)1250 、、 综合应用题（1?小题，计?40?分） 在窗体上画一个文本框，名称为?Text1,初始内容为空白，并设置多行显示格式； 然后再画两个命令按钮，其名称分别为?Command1?和?Command2,标题分别为“显 示”和“保存”，如图所示，编写适当的事件过程。程序运行后，如果单击“显示”命 令按钮，则读取考生?目录下的?in5.txt?文件，并在文本框中显示出来，该文件是一 种用随机存取方式建立的文件，共有?5?个记录，要求按记录号顺序显示全部记录， 第?2?页?共?11?页 晨曦制作 每个记录一行；如果单击“保存”命令按钮，则把所有记录保存到考生目录下的顺 序文件?out5.txt?中。随机文件?in5.txt?中的每个记录包括?3?个字段，分别为姓名、 性别和年龄，其名称和长度分别为： Name?字符串?8 Sex?字符串?4 Age?Integer 其类型定义为： Private?Type?StudInfo Name?As?String*8 Sex?As?String*4 Age?As?Integer End?Type 要求： 1)?文件?out5.txt?以顺序存取方式建立和保存。 2)?存盘时必须放在考生目录下，工程为?sjt5.vbp，窗体文件名为?sjt5.frm。 Private?Type?StudInfo Name?as?string*8 Sex?as?string*4 Age?as?integer End?Type Dim?pers?as?studinfo Dim?recmum?as?integer 显示按钮脚本： Pr