首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
(1)在考生文件夹中有一个工程文件sjt3.vbp。程序的功能是输入用户名和密码。程序运行时,当输入密码到文本框Text2中时,如果“显示密码”复选框没有被选中,则在文本框Text3中同时显示“#”(如图所示);如果“显示密码”复选框被选中,再重新输入密码
(1)在考生文件夹中有一个工程文件sjt3.vbp。程序的功能是输入用户名和密码。程序运行时,当输入密码到文本框Text2中时,如果“显示密码”复选框没有被选中,则在文本框Text3中同时显示“#”(如图所示);如果“显示密码”复选框被选中,再重新输入密码
admin
2016-08-24
65
问题
(1)在考生文件夹中有一个工程文件sjt3.vbp。程序的功能是输入用户名和密码。程序运行时,当输入密码到文本框Text2中时,如果“显示密码”复选框没有被选中,则在文本框Text3中同时显示“#”(如图所示);如果“显示密码”复选框被选中,再重新输入密码时,则在Text3中同时显示的是密码字符本身。
在给出的窗体文件中已经添加了全部控件,但程序不完整。要求:去掉程序中的注释符,把程序中的?改为正确的内容。
注意:不能修改程序的其他部分和控件属性,最后将修改后的文件按原文件名进行存盘。
(2)考生文件夹中有一个工程文件sjt4.vbp。该程序的功能是:程序运行时,向文本框控件数组Text1(有5个文本框)中任意输入5个数,单击名称为Command1的命令按钮,则找出其中最小数并在标签lblRe.suit中显示。给出的窗体文件中已经有了全部控件,但程序不完整,其中函数FindMin的作用是返回两个数中的较小数。要求:去掉程序中的注释符,把程序中的?改为正确的内容。
注意:不能修改程序的其他部分和控件属性,最后将修改后的文件按原文件名进行存盘。
选项
答案
(1)步骤1:打开本题工程文件。 步骤2:分析并编写程序代码。 程序提供代码 Private Sub Text2_Change() ’If?=l Then ’Text3.PasswordChar=? Else ’Text3.PasswordChar=? End If ’Text3.Text=? End Sub 程序结束 参考答案 第1个?处填入:Checkl.Value 第2个?处填入:"" 第3个?处填入:"#" 第4个?处填入:Text2 步骤3:调试并运行程序,关闭程序后按题目要求存盘。 (2)步骤1:打开本题工程文件。 步骤2:分析并编写程序代码。 程序提供代码 Private Sub Command1_Click() Dim x As Integer.k As Integer x=Val(Text1(1).text) ’For k=2 To ? x=FindMin(Val(Text1(k).Text),?) Next ’lblResult.Caption=? End Sub Public Function FindMin(x As Integer,y As Integer) ’If x?y Then FindMin=y Else FindMin=x End If End Function 程序结束 参考答案 第1个?处填入:5 第2个?处填入:x 第3个?处填入:x 第4个?处填入:> 步骤3:调试并运行程序,关闭程序后按题目要求存盘。
解析
(1)在Text2 Change事件过程中,当向文本框Text7.中输入密码时,通过Checkl的Value属性判断“显示密码”复选框是否被选中,如果没有被选中,Text3的Password-Char属性设置为“#”,则在文本框Text3中同时显示“#”;若“显示密码”复选框被选中,Text3的PasswordChar属性设置为””,再重新输入密码时,则在Text3中同时显示的是密码字符本身。
(2)默认情况下文本框里的内容(包括数字)都是当作字符串来处理的。如果要参与数据运算,则需先用Val()函数将其转化为数字(如Val(Text1.Text))。根据题意,首先把第一个文本框的值赋给变量x,通过循环语句和调用过程函数FindMin,获得最小值,并显示在标签lblResult中。函数:FindMin用来返回两个数中的较小数。
转载请注明原文地址:https://kaotiyun.com/show/a4Lp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
在窗体上画两个文本框和一个命令按钮,然后在代码窗口中编写如下事件过程:PrivateSubCommand1_Click()Text1.Text="VBProgramming"Text2.Text=Text1.TextT
有一个过程如下:SubSub1(mAsInteger,totalAsLong)DimiASInteger total=1 Fori=1Tom total=total*i Ne
假设变量bool_x是一个布尔型(逻辑型)的变量,则下面正确的赋值语句是()。
可以用作其他控件容器的控件是
在窗体上画一个文本框(其Name属性为Text1),然后编写如下事件过程:PrivateSubForm_Load()Text1.Text=""Text1.SetFocusFori=1To9Sum=Sum+i
设用复制、粘贴的方法建立了一个命令按钮数组Command1,以下对该数组的说法错误的是()。
已知数组A(4,4),各个元素在运行程序时被赋值并打印,形成四除非方阵。请在________和________处填所需的内容,使其产生一个转置矩阵(即行列互换),仍放在数组A中,并打印出来。例如:1234123
表达式Right("Beijing",4)的值是
以下语句用于打开一个顺序文件Open“C:\MyFile.txt”ForOutPut,但是该语句的一个重要错误是没有
设a=2,b=3,c=4,d=5,下列表达式的值是()。Nota
随机试题
A.PGE2B.PGF2αC.PGl2D.TXA2E.TXB2血小板合成的是:
假膜性炎是发生于
患者眩晕,头痛头胀,头重脚轻,面红目赤,急躁易怒,口苦,舌红苔黄,脉弦数。其证型是
对于二级评价项目,地面气象观测资料调查要求是:距离项目最近的地面气象观测站,()的常规地面气象观测资料。
某项目单因素敏感性分析,评价指标为财务净现值,不确定性因素为投资额,产品价格、经营成本,由下表所示计算结果可知,项目对三个因素的敏感程度由高到低依次为()。
某建设单位欲新建一座大型综合市场,于2006年3月20日领到工程施工许可证。开工后因故于2006年10月15日中止施工。根据建筑法施工许可制度的规定,该建设单位向施工许可证发证机关报告的最迟期限应是2006年()。
a>2,则双曲线的离心率的取值范围是()。
具体迁移是指一种学习中的具体的经验直接迁移到另一种学习中去。()
说明人类历史上存在的“超越”现象与五种社会形态演进规律的一致性。
数据库应用系统中的核心问题是()。
最新回复
(
0
)