首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
注意:下面出现的“考生文件夹”均为c:\wexam\25160001。 (1)在考生文件夹中有工程文件sjt3.vbp及其窗体文件sjt3.frm,该程序是不完整的,请在有?号的地方填入正确内容,然后删除?及所有注释符(即’号)但不能修改其他部分。存
注意:下面出现的“考生文件夹”均为c:\wexam\25160001。 (1)在考生文件夹中有工程文件sjt3.vbp及其窗体文件sjt3.frm,该程序是不完整的,请在有?号的地方填入正确内容,然后删除?及所有注释符(即’号)但不能修改其他部分。存
admin
2012-10-09
46
问题
注意:下面出现的“考生文件夹”均为c:\wexam\25160001。
(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所示。要求程序运行后,如果选择某个复选框,当单击命令按钮时在窗体上输出相应的信息。例如:如果选择“程序设计”和“数据库原理”复选框,单击命令按钮后,将在窗体上显示“我选的课程是程序设计数据库原理”。
选项
答案
(1)在窗体上建立好控件后,先设置控件属性,再编写事件过程。 单击命令按钮或窗体触发的是Click事件,因此,程序中应该编写命令按钮的Click事件过程,按钮的标题通过Caption属性设置;要使文本框的内容在输入时显示为“*”,则应该将PasswordChar属性设置为“*”。解题步骤: 第一步:建立界面并设置控件属性。程序中用到的控件及其属性见表5-3。 [*] 第二步:编写程序代码。 程序提供的代码: 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 第三步:调试并运行程序。 第四步:按题目要求存盘。 (2)建立好控件后,先设置控件属性,再编写事件过程。 复选框用来表示状态,在程序运行期间可以改变其状态。复选框的标题由Caption属性来设置,复选框的Value属性用来表示复选框的状态。其取值有如下几种: 0:表示复选框未被选中; 1:表示选中该复选框; 2:表示该复选框被禁止(灰色)。 在窗体上打印信息用Print方法,单击命令按钮触发的是Click事件。解题步骤: 第一步:建立界面并设置控件属性。程序中用到的控件及其属性见表5-4。 [*] 第二步:编写程序代码。 程序提供的代码: Option Explicit Private Sub C1_Click() Dim s As String s=“我选的课程是” If Ch1.Value = 1 Then s=s &“程序设计” End If If Ch2.Value = 1 Then s=s &“数据库原理” End If If Ch3.Value = 1 Then ’s = s & Ch3.? End If ’ Print ? End Sub 参考代码: Option Explicit Private Sub C1_Click() Dim s As String s=“我选的课程是” If Ch1.Value = 1 Then s= s &“程序设计” End If If Ch2.Value=1 Then s=s &“数据库原理” End If If Ch3.Value=1 Then s=s & Ch3.Caption End If Print s End Sub 第三步:调试并运行程序。 第四步:按题目要求存盘。
解析
转载请注明原文地址:https://kaotiyun.com/show/D3hp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
执行以下语句过程,在窗体上显示的内容是 OptionBase0 PrivateSubCommand3_Click() Dimd d=Array("a","b","c","d") Printd(1);d(3)EndSub
阅读下面的程序段:Fora=1To2 Forb=1Toa ForC=bTo2 I=I+1 Next NextNextPrintI执行上面的三重循环后,I的值为
用于将屏幕上的对象分组的控件是
VisualBasic中的控件分为3类,它们是标准控件、【】和可插入对象。
在窗体上画一个名称为Command1的命令按钮和三个名称分别为Label1、Label2、Labet3的标签,然后编写如下代码:PrivatexASIntegerPrivateSubCommand1_Click(
执行如下语句:a=InputBox("Today","Tomorrow","Yesterday","Daybeforeyesterday",5)将显示一个输入对话框,在对话框的输入区中显示的信息是
下面程序的功能是统计字符串中“广的个数,请填空。 SubCOU( ) a$="BeijingUniversityofTechnology" DimnASInteger n=Len(a$) Fori=1T
关于VisualBasic"方法"的概念错误的是
下列事件过程的功能是:通过Form_Load事件给数组赋初值为35、48、15、22、67,Form_Click事件找出可以被3整除的数组元素并打印出来。请在空白处填人适当的内容,将程序补充完整。 Dim Arr() Private Su
源程序中应包含一些内部文档,以帮助阅读和理解程序,源程序的内部文档包括选择合适的标识符、注释和
随机试题
Rememberbooks?Theywerethosepiecesofpaperwithwordsprintedonthem【C1】________inbetweentwo,sometimes,【C2】________cove
简答教育督导的方式有哪些。
出生后卵圆孔解剖上关闭的时间是
当湿陷性黄土的湿陷系数δs为0.05寸,其湿陷程度为()。
拣货方式若为全自动化拣货,即不必人为判断商品,只看编号,人工动作主要为搬运货物及电动拖板车的行进。()
KH公司是一家从事业单位转向公司制运作的全民所有制企业,主要经营基础设施工程项目的咨询、设计和后评估等业务。让KH公司员工们引以为豪多年的较高薪资的优势消失了,薪资缺乏弹性,出现怠工现象,事故增加,纪律涣散,直接影响了服务质量。2003年2月,公司召开了中
【2014.山东济宁】美育的内容有()。
根据下列资料,回答问题。央行2015年3月公布了2014年12月金融统计数据报告。具体如下:①广义货币增长12.2%,狭义货币增长3.2%。12月月末,广义货币(M2)余额122.84万亿元,同比增长12.2%,增速分别比上月月末和上年年
()三重需要理论就是对于需要层次理论的重新划分。
ReinventingtheTableAnearthscientisthasrejiggedtheperiodictabletomakechemistrysimplertoteachtostudents.(46)But
最新回复
(
0
)