2. 计算机
  3. 在名称为Forml的窗体上添加一个名称为．Labell，标题为“口令”的标签；添加一个名称为Textl的文本框；再添加三个命令按钮，名称分别为Commahd1、Command2、Command3，标题分别为“显示口令”、“隐藏口令”、“重新输入”。

在名称为Forml的窗体上添加一个名称为．Labell，标题为“口令”的标签；添加一个名称为Textl的文本框；再添加三个命令按钮，名称分别为Commahd1、Command2、Command3，标题分别为“显示口令”、“隐藏口令”、“重新输入”。

admin2020-04-08  38
问题  在名称为Forml的窗体上添加一个名称为．Labell，标题为“口令”的标签；添加一个名称为Textl的文本框；再添加三个命令按钮，名称分别为Commahd1、Command2、Command3，标题分别为“显示口令”、“隐藏口令”、“重新输入”。
    程序运行时，在Textl中输入若干字符，单击“隐藏口令”按钮，则只显示与字符同样数量的“*”(如图2所示)；单击“显示口令”按钮，则正常显示输入的字符(如图l所示)，单击“重新输入”按钮，则清除Textl中的内容，并把光标定位到Textl中。
    要求：请按要求添加所有控件，编写命令按钮的Click事件过程，程序中不得使用变量，在“显示口令”、“隐藏口令”按钮的事件过程中只能写l条语句。存盘时必须存放在考生文件夹下，工程文件名为sjt2．vbp，窗体文件名为sjt2．frm。
选项
答案【操作步骤】 步骤l：新建一个窗体，按照题目要求建立标控件，程序中用到的控件及属性见表4．34和表4．35。 [*] 步骤2：打开代码编辑窗口，去掉程序中的注释符“′”，将问号改为正确的内容。 参考答案(阴影部分是需考生填入的内容) Private Sub Commandl_Click() Textl．PaSswordChar=＂＂′当Pass- wordChar属性设置为空时，Textl文本框显示内容 End Sub Private Sub Command2_Click() Textl．PasswordChar=＂*＂′当PasS． wordChar属性设置为*时，用*代替Textl文本框中的字符显示 End Sub Private Sub Command3click() Textl=＂＂′清空文本框 Textl．SetFocusTextl获得焦点 End Sub 步骤4：调试并运行程序，关闭程序后按题目要求存盘。
解析 PasswordChar属性用来设置是否在控件中显示用户输入的字符。如果该属性设置为某一字符，那么无论Text属性值是什么，在文本框中都只显示该字符。另外，MuhiLine属性必须设置为False。运用SetFocus方法使文本框获得焦点。
转载请注明原文地址:https://kaotiyun.com/show/tNTp777K
本试题收录于： 二级VB题库NCRE全国计算机二级分类
0

二级VB

NCRE全国计算机二级

相关试题推荐
随机试题
最新回复(0)