首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在名称为Form1的窗体上添加一个名称为L1的标签,标题为“口令”;添加两个文本框,名称分别为Text1、Text2,初始内容为空;再添加三个命令按钮,名称分别为C1、C2、C3,标题分别为“显示口令”、“隐藏口令”、“复制口令”。在程序开始运行时,向Te
在名称为Form1的窗体上添加一个名称为L1的标签,标题为“口令”;添加两个文本框,名称分别为Text1、Text2,初始内容为空;再添加三个命令按钮,名称分别为C1、C2、C3,标题分别为“显示口令”、“隐藏口令”、“复制口令”。在程序开始运行时,向Te
admin
2016-06-23
56
问题
在名称为Form1的窗体上添加一个名称为L1的标签,标题为“口令”;添加两个文本框,名称分别为Text1、Text2,初始内容为空;再添加三个命令按钮,名称分别为C1、C2、C3,标题分别为“显示口令”、“隐藏口令”、“复制口令”。在程序开始运行时,向Textl中输入的所有字符,都显示为“*”,单击“显示口令”按钮后,在Tex1中显示所有字符,再单击“隐藏口令”按钮后,Text1中的字符不变,但显示的都是“?”,单击“复制口令”后,把Text1中的实际内容复制到Text2中,如图所示。
要求:
①在属性窗口中,将窗体的标题改为“口令窗口”;
②建立适当的事件过程,完成上述功能。每个过程中只允许写一条语句,且不能使用变量。
注意:存盘时,工程文件名保存为sjt3.vbp,窗体文件名保存为sjt3.frm。
选项
答案
[操作步骤] 步骤1:新建一个窗体,按照题目要求建立控件并设置相应的属性,程序中用到的控件及其属性见表3.26和表3.27。 [*] 步骤2:打开代码编辑窗口,在指定位置编写如下代码。 参考代码 Private Sub C1 Click()’显示口令 Text1.PasswordChar=""’清空PasSWOrd Char的设置使密码显示 End Sub Private Sub C2 Click()’隐藏口令 Text1.PasswordChar="?"’将Password Char设置为?则密码显示? End Sub Private Sub C3 Click()’复制口令 Text2.Text=Text1.Text End Sub 步骤3:调试并运行程序,关闭程序后按题目要求存盘。
解析
转载请注明原文地址:https://kaotiyun.com/show/ESLp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
软件按功能可以分为应用软件、系统软件和支撑软件(或工具软件)。下面属于应用软件的是
设有关系R和s,关系代数表达式为R-(R-S)表示的是
设有下面的循环:i=0Whilei<=1 i=i+3 PrintiWend则运行后的输出结果是
在窗体上画一个命令按钮(其Name属性为Command1),然后编写如下代码:PrivateSubCommand1_Click()Dima(5,5) Fori=1To3 Forj=1To4
inputBox函数返回值的类型为()。
执行下列语句后整型变量a的值是()。If(3-2)>2Thena=10ElseIf(10/2)=6Thena=20Elsea=30EndIf
在用通用对话框控件建立“打开”或“保存”文件对话框时,如果需要指定文件列表框所列出的文件类型是文本文件(即.txt文件),则正确的描述格式是
在Selectcase结构中,使用“To表达式”来指定一个范围时,必须把______的值写在前面。
下面表达式中,()的运算结果与其他三个不同。
随机试题
下列医嘱属于临时医嘱的是()。
肠梗阻3天,呕吐频繁,小便少,头晕、疲乏,心率120次/分,血压70/45mmHg
若小陈以违约为由提起诉讼,下列有管辖权的单位是()。若小陈以侵权为由提起诉讼,下列有管辖权的单位是()
下列经济业务中,能够引起资产类项目和负债类项目同时增加的是()。
(2014年真题)期刊社变更名称应当办理的手续有()等。
基础教育课程改革要求实行国家、地方、学校三级课程管理。()
督察人员应当具备什么条件?
用于实现五条件的转移的是()。
A、Tostopeveryactofviolence.B、Tomarkawfulanniversaries.C、Toraisemorepeople’swages.D、Tohelpreducegunviolence.D
Impressionismisaformofartthatbeganinthe1870’s.Whenyoulookcloselyatanimpressionistpainting,youseelittledots
最新回复
(
0
)