首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
(1)在名称为Forml的窗体上添加一个名称为Label1、标题为“添加项目”的标签;添加一个名称为Text1的文本框,初始内容为空;添加一个名称为Combol的下拉式组合框,并通过属性窗口输入若干项目(不少于3个,内容任意);再添加两个命令按钮,名称分别
(1)在名称为Forml的窗体上添加一个名称为Label1、标题为“添加项目”的标签;添加一个名称为Text1的文本框,初始内容为空;添加一个名称为Combol的下拉式组合框,并通过属性窗口输入若干项目(不少于3个,内容任意);再添加两个命令按钮,名称分别
admin
2017-09-20
49
问题
(1)在名称为Forml的窗体上添加一个名称为Label1、标题为“添加项目”的标签;添加一个名称为Text1的文本框,初始内容为空;添加一个名称为Combol的下拉式组合框,并通过属性窗口输入若干项目(不少于3个,内容任意);再添加两个命令按钮,名称分别为Command1、Command2,其标题分别为“添加”、“统计”。在程序运行时,向Text1中输入字符,单击“添加”按钮后,则将Text1中的内容作为一个列表项被添加到组合框的列表中;单击“统计”按钮,则在窗体空白处显示组合框中列表项的个数,如图所示。请编写两个命令按钮的Click事件过程。
注意:程序中不得使用变量,也不能使用循环结构。存盘时必须存放在考生文件夹下,工程文件名保存为sjt3.vbp,窗体文件名保存为sjt3.frm。
(2)在考生文件夹下有一个工程文件sif4.vbp,其窗体如图所示。该程序用来对在上面的文本框中输入的英文字母串(称为“明文”)加密,加密结果(称为“密文”)显示在下面的文本框中。加密的方法为:选中一个单选按钮,单击“加密”按钮后,根据选中的单选按钮后面的数字n,将“明文”中的每个字母改为它后面的第n个字母(“z”后面的字母认为是“a”,“Z”后面的字母认为是“A”),如图所示。窗体中已经给出了所有控件和程序,但程序不完整,请去掉程序中的注释符,把程序中的?改为正确的内容。
注意:不得修改程序中的其他部分和控件的属性。最后将修改后的文件按原文件名存盘。
选项
答案
(1) 【操作步骤】 步骤1:新建一个窗体,按照题目要求建立控件并设置控件属性,如图3.22所示。 [*] 程序中用到的控件及属性设置见表3.15。 [*] 步骤2:打开代码编辑窗口,在指定位置编写如下代码。 Private Sub Commandl_Click() Combo1.AddI tem Text1 End Sub Private Sub Command2_Click() Print Combo1.ListCount End Sub 步骤3:调试并运行程序,关闭程序后按题目要求存盘。 (2) 【操作步骤】 步骤1:打开本题工程文件。 步骤2:打开代码编辑窗口,去掉程序中的注释符"’",将问号改为正确的内容。 Private Sub Commandl Click() Dim n As Integer,k As Integer,m As Integer Dim C As String,a As String For k=0 To 2 If Opl(k).Value Then n=Val(Op1(k).Caption) End If Next k m=Len(Text1.Text) a=”” For k=1 To m C=Mid$(Text1.Text,k,1) C=String(1,Asc(C)+n) If C>”Z”Or c>”Z”And C<” a”Then C=String(1,Asc(C)一26) End If a=a+c Next k Text2.Text=a End Sub 步骤3:调试并运行程序,关闭程序后按题目要求存盘。
解析
转载请注明原文地址:https://jikaoti.com/ti/edy0FFFM
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
若要求输入密码时文本框中只显示“*”号,则应当在文本框的属性窗口中设置______属性。
在鼠标事件过程MouseDown和MouseUp中,参数Button的值为1、2、4时,分别代表按下鼠标的______、______和______按钮。
通过设置何属性可以改变所画图形的形状?
单击命令按钮时,下列程序代码的执行结果为PublicSubProcl(nAsInteger,ByValmAsinteger)n=nMod10m=m\10EndsubPrivateSubComm
下列程序段的执行结果为()。DimA(3,3)ForM=1To3ForN=1To3IfN=MOrN=3-M+1ThenA(M,N)=1ElseA(M,N)=0
有如下程序:PrivateSubcommand1_Click()a=1:b=1Print"a=";a;",b=";bCallmult((a),b)Print"a=";a;",b=";b
在窗体上画一个命令按钮,其名称为Command1,然后编写如下程序:FunctionM(xAsInteger,yAsInteger)M=пf(x>y,x,y)EndFunctionPrivateSub
在窗体上画一个名称为Command1的命令按钮,然后编写如下程序:OptionBase1PrivateSubCommand1_Click()DimcAsIn
在窗体上有一个文本框控件,名称为TextTime;一个计时器控件,名称为Timed。要求每一秒在文本框中显示一次当前的时间。程序为:PrivateSubTimerl_______TextTime.text=TimeEndSu
在VisualBasic中按文件的访问方式不同,可以将文件分为顺序文件,随机文件和【】。
随机试题
巨噬细胞产生的主要细胞因子是
己知z=xy2e-x2y,求
A.低血糖B.胃肠道反应C.水肿D.心律失常胰岛素治疗糖尿病的不良反应主要是
下列关于CT薄层扫描的叙述,正确的是
脑出血以内囊出血最常见,其特征性的临床表现为
对犯罪分子只能判一种主刑;对同一犯罪行为只能在主刑之后判处一个或两个以上的附加刑。()
“劣币驱逐良币”规律发生在()。
①在利益的驱使下,行业内滋生了“流量至上”甚至“流量造假”等现象,亟待规范和引导。②互联网和社交媒体的升级迭代、文化娱乐产业的蓬勃发展,成为“粉丝经济”兴起的深厚土壤。③理性对待粉丝热情、引导粉丝合理消费,同时将明星效应转化为提升商业品牌知名度的契机,
给定资料 1.截至2013年11月13日,已有21个省(区、市)正式公布了2014年高考加分的相关政策和信息。与往年相比,2014年高考加分项目整体缩减,加分分值也相应降低。而其中广东加分改革政策力度较大,加分项目将由23项减为6项,缩减74%;同时大
出席学术讨论会的有三个足球爱好者,四个亚洲人,两个日本人,五个商人。以上叙述涉及了所有晚会参加者,其中日本人不经商。那么,参加晚会的人数是:
最新回复
(
0
)