首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
注意:下面出现的“考生文件夹”均为c:\wexam\25160001。 (1)在考生文件夹中有工程文件sjt3.vbp及其窗体文件sjt3.frm,该程序是不完整的,请在有?号的地方填入正确内容,然后删除?及所有注释符(即’号)但不能修改其他部分。存
注意:下面出现的“考生文件夹”均为c:\wexam\25160001。 (1)在考生文件夹中有工程文件sjt3.vbp及其窗体文件sjt3.frm,该程序是不完整的,请在有?号的地方填入正确内容,然后删除?及所有注释符(即’号)但不能修改其他部分。存
admin
2012-10-09
36
问题
注意:下面出现的“考生文件夹”均为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全国计算机二级
相关试题推荐
下列程序段,在运行时最早输出的内容是 a=2 c=1 AAA: c=c+a Ifc<10Then Printc GoToAAA Else Print"10以内的奇数显示完毕。" EndIf
有如下事件过程: PrivateSubForm_KeyDown(KeyCodeAsInteger,ShiftAsInteger) If(ButtonAnd3)=3Then Print"OK" EndIf EndSub
非空的循环单链表head的尾结点(由p所指向),满足
数据库保护分为:安全性控制、【】、并发性控制和数据的恢复。
以下关于过程及过程参数的描述中,错误的是
在数据库管理系统提供的数据语言中,负责数据的模式定义与数据的物理存取构建的是
在关系模型中,把数据看成一个二维表,每一个二维表称为一个【】。
下列关系模型中,能使经运算后得到的新关系中属性个数多于原来关系中属性个数的是
在VisualBasic中,要将一个窗体加载到内存进行预处理但不显示,应使用的语句是
下列说法错误的是
随机试题
读下面这段话,分析它揭示的是艺术活动中的什么现象。江馆清秋,晨起看竹,烟光日影露气,皆浮动于疏枝密叶之间。胸中勃勃,遂有画意。其实胸中之竹并不是眼中之竹也。因而磨墨展纸,落笔倏作变相。手中之竹又不是胸中之竹也。总之,意在笔先者,定则也;趣在法外者,化机也
依据()的规定,出租是出租人将权利租给承租人使用一定的年限,只是自己不直接使用土地。
该银行第一笔业务应纳营业税( )万元该银行第二笔业务应纳营业税( )万元
某企业现着手编制2013年6月份的现金收支计划。预计2013年6月月初现金余额为8000元;月初应收账款4000元,预计月内可收回80%;本月销货50000元,预计月内收款比例为50%;本月采购材料8000元,预计月内付款70%;月初应付账款余额5000元
下列有关辞退福利的表述中不正确的是()。
某企业的人力资源主管调查发现,提高应聘标准并不是引起目前企业员工短缺的主要原因。引起企业员工短缺的主要原因,是近年来企业工作设备的改进缓慢,以及员工的工资增长未能与其他企业同步。以下哪项如果为真,最能加强上述断定?()
有三个关系R、S和T如下:则关系T是由关系R和S通过某种操作得到,该操作为( )。
请在【答题】菜单下选择【进入考生文件夹】命令,并按照题目要求完成下面的操作。注意:以下的文件必须都保存在考生文件夹下。在考生文件夹下打开文档WORD.DOCX。【背景素材】为了更好地介绍公司的服务与市场战略,市场部助理小王需要协助制作完成公司战略规
Incollege,Iencounteredaruleofthumb:Foreverycredithourperweek,youshouldbestudyingtwotothreehours【C1】________
Theuseoffireimprovedearlyman’slifeinmanyways.【B1】______madehisfoodmore【B2】______.Smokingand【B3】______foodmad
最新回复
(
0
)