1、二级 VISUAL+BASIC 机试-83 及答案解析(总分：100.00，做题时间：90 分钟)1.在考生文件夹下完成如下基本操作。1新建一个工程。在窗体上画一个文本框，名称为 Text1。设置用户输入的字母一律转换为大写表示，焦点保持在输入文本的最右端。程序运行结果如图 5 所示。程序中不得使用任何变量。注意：存盘时必须存放在考生文件夹下，工程文件名为 ylcl.vbp，窗体丈件名为 ylcl.frm。（分数：25.00）_2.新建一个工程，在窗体中创建一个标签，名字是 Label1。要求实现的功能是：单击窗体后，在标签控件中显示三号字体的字符串“为人民服务”。程序运行结果如图 6 所示。
2、程序中不得使用任何变量。注意：存盘时必须存放在考生文件夹下，工程文件名为 ylc2.vbp，窗体文件名为 ylc2.frm。（分数：25.00）_3.新建一个工程，要求实现的功能是，在窗体中实现从左向右动态显示“为人民服务”这几个字。字符串以 0.1 秒一次的速度移动。程序运行情况如图 7 所示。程序中不得使用任何变量。注意：存盘时必须存放在考生文件夹下，工程文件名为 ylc3.vbp，窗体文件名为 ylc3.frm（分数：25.00）_4.新建一个工程，在窗体中创建上下两个文本框，分别为 Textl 和 Text2。要求实现的功能是：在 Text1中输入字符串，Text2 中显示全部转换为大
3、写字母的相应字符串。程序运行情况如图 8 所示。程序中不得使用任何变量。注意：存盘时必须存放在考生文件夹下，工程文件名为 ylc4.vbp，窗体文件名为 ylc4.frm。（分数：25.00）_二级 VISUAL+BASIC 机试-83 答案解析(总分：100.00，做题时间：90 分钟)1.在考生文件夹下完成如下基本操作。1新建一个工程。在窗体上画一个文本框，名称为 Text1。设置用户输入的字母一律转换为大写表示，焦点保持在输入文本的最右端。程序运行结果如图 5 所示。程序中不得使用任何变量。注意：存盘时必须存放在考生文件夹下，工程文件名为 ylcl.vbp，窗体丈件名为 ylcl.frm
4、。（分数：25.00）_正确答案：(1)Visual Basic 集成环境中，执行“文件”“新建工程”命令，选择“标准 Exe”。创建窗体 Form1。(2)在工具箱中选择文本框控件，在窗体中画出文本框。在属性窗口中设置 Text 属性为空。双击文本框弹出代码编写窗口，添加如下代码：Private Sub Text1_Change()Textl.Text=LCase(Text1.Text)Textl.SelStart=Len(Text1.Text)End Sub(3)按 F5 键运行程序。如图 5 所示。(4)执行“文件”“保存工程”命令，将工程文件命名为 ylcl.vbp，窗体文件命名为 y
5、lcl.frm。)解析：解析 (1)第 1 小题中要使用字符转换函数 LCase，其作用是将所有大写字符转换为小写。 SelStart 属性用来返回或者设置所选择的文本的起始点，可用来处理焦点。2.新建一个工程，在窗体中创建一个标签，名字是 Label1。要求实现的功能是：单击窗体后，在标签控件中显示三号字体的字符串“为人民服务”。程序运行结果如图 6 所示。程序中不得使用任何变量。注意：存盘时必须存放在考生文件夹下，工程文件名为 ylc2.vbp，窗体文件名为 ylc2.frm。（分数：25.00）_正确答案：(1) Visual Basic 集成环境中，执行“文件”“新建工程”命令，选择“
6、标准 Exe”。创建窗体 Form1。(2)在工具箱中选择标签控件，在窗体中画出一个标签。在其属性窗口中，将 Visible 属性改为False，Caption 属性设置为“为人民服务”，双击 Font 属性，将字体大小设置为三号字。(3)双击标签弹出代码窗口，在其中输入如下代码：Private Sub Form_Click()Labell.Visible=TrueEnd Sub(4)按 F5 键运行程序。如图 6 所示。(5)执行“文件”“保存工程”命令，将工程文件命名为 ylc2.vbp，窗体文件命名为 ylc2.frm。)解析：解析 (2)第 2 小题考查的仍然是对 Visible 属性
7、的操作。可参见前面的讲解。3.新建一个工程，要求实现的功能是，在窗体中实现从左向右动态显示“为人民服务”这几个字。字符串以 0.1 秒一次的速度移动。程序运行情况如图 7 所示。程序中不得使用任何变量。注意：存盘时必须存放在考生文件夹下，工程文件名为 ylc3.vbp，窗体文件名为 ylc3.frm（分数：25.00）_正确答案：(Visual Basic 集成环境中，执行“文件”“新建工程”命令，选择“标准 Exe”。创建窗体 Form1。(2)在工具箱中选择 Timer 控件，在窗体中画出一个计时器控件。设置其 Interval 属性值为 100，即 0.1秒。双击 Timer 控件弹出代
8、码窗口，添加如下代码：Private Sub Timer1_Timer()Form1.ClsForm1.ScaleLeft=Form1.ScaleLeft-20Form1.Print(“为人民服务“)End Sub(3)按 F5 键运行程序。如图 7 所示。(4)执行“文件”“保存工程”命令，将工程文件命名为 ylc3.vbp，窗体文件命名为 ylc3.frm。)解析：解析 (3)第 3 小题中，文本显示的水平坐标是通过 ScaleLeft 属性来控制的。4.新建一个工程，在窗体中创建上下两个文本框，分别为 Textl 和 Text2。要求实现的功能是：在 Text1中输入字符串，Text2
9、中显示全部转换为大写字母的相应字符串。程序运行情况如图 8 所示。程序中不得使用任何变量。注意：存盘时必须存放在考生文件夹下，工程文件名为 ylc4.vbp，窗体文件名为 ylc4.frm。（分数：25.00）_正确答案：(Visual Basic 集成环境中，执行“文件”“新建工程”命令，选择“标准 Exe”。创建窗体 Form1。(2)在工具箱中选择标签控件，在窗体中要求位置画出两个标签，其 Caption 属性分别为“初始字符”和“转换后”。(3)在工具箱中选择文本框控件，在窗体中画出两个文本框：Text1 和 Text2，并且在属性窗口中设置Text 属性为空。双击文本框 Text1 弹出代码编写窗口，添加如下代码：Private Sub Text1_Change()Text2.Text=UCase(Text1.Text)End Sub(4)按 F5 键运行程序。如图 8 所示。(5)执行“文件”“保存工程”命令，将工程文件命名为 ylc4.vbp，窗体文件命名为 ylc4.frm。)解析：解析 (4)第 4 小题使用了字符转换函数 UCase，其作用是将所有小写字符转换为大写。
