[问答题] 注意：下面出现的“考生文件夹”均为c:wexam25160001。 (1)在考生文件夹中有工程文件sjt3.vbp及其窗体文件sjt3.frm，该程序是不完整的，请在有号的地方填入正确内容

18 查阅

[问答题] 注意：下面出现的“考生文件夹”均为c:wexam25160001。 (1)在考生文件夹中有工程文件sjt3.vbp及其窗体文件sjt3.frm，该程序是不完整的，请在有号的地方填入正确内容，然后删除及所有注释符(即’号)但不能修改其他部分。存盘时不得改变文件名和文件夹。本题描述如下：在窗体上有一个名称为Text1的文本框，一个名称为C1，标题为“校验”的命令按钮。其中文本框用来输入口令，如图5-3所示，要求在文本框中输入的内容都必须以“*”显示(请考生通过属性窗口设置)。要求程序运行后，输入口令，单击命令按钮后，对口令进行校验。如果输入的内容是“ABC”这3个大写字母，则用MsgBox信息框输出“正确”，否则输出“错误”，如图5-4所示。 (2)在考生文件夹中有工程文件sjt4.vbp及其窗体文件sjt4.frm，该程序是不完整的，请在有号的地方填入正确内容，然后删除及所有注释符(即’号)但不能修改其他部分。存盘时不得改变文件名和文件夹。本题描述如下：在窗体上有3个名称分别为Ch1、Ch2和Ch3的复选框，标题依次为“程序设计”、“数据库原理”和“计算机网络”，还有一个名称为C1，标题为“选课”的命令按钮，如图5-5所示。要求程序运行后，如果选择某个复选框，当单击命令按钮时在窗体上输出相应的信息。例如：如果选择“程序设计”和“数据库原理”复选框，单击命令按钮后，将在窗体上显示“我选的课程是程序设计数据库原理”。

参考答案:

第二步：编写程序代码。程序提供的代码： Option Explicit Private Sub C1_Click() ’ If Text1.Text = "" Then MsgBox "" Else MsgBox “错误” End Sub 参考代码： Option Explicit Private Sub C1_Click() If Text1.Text = "ABC" Then MsgBox “正确” Else MsgBox "错误" End Sub 第三步：调试并运行程序。第

(1)在窗体上建立好控件后，先设置控件属性，再编写事件过程。单击命令按钮或窗体触发的是Click事件，因此，程序中应该编写命令按钮的Click事件过程，按钮的标题通过Caption属性设置；要使文本框的内容在输入时显示为“*”，则应该将PasswordChar属性设置为“*”。解题步骤：第一步：建立界面并设置控件属性。程序中用到的控件及其属性见表5-3。

计算机考试