首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在名称为Forml的窗体上添加一个名称为Label1、标题为“添加项目”的标签;添加一个名称为Textl的文本框,初始内容为空;添加一个名称为Combol的下拉式组合框,并通过属性窗口输入若干项目(不少于3个,内容任意);再添加两个命令按钮,名称分别为Co
在名称为Forml的窗体上添加一个名称为Label1、标题为“添加项目”的标签;添加一个名称为Textl的文本框,初始内容为空;添加一个名称为Combol的下拉式组合框,并通过属性窗口输入若干项目(不少于3个,内容任意);再添加两个命令按钮,名称分别为Co
admin
2020-04-08
31
问题
在名称为Forml的窗体上添加一个名称为Label1、标题为“添加项目”的标签;添加一个名称为Textl的文本框,初始内容为空;添加一个名称为Combol的下拉式组合框,并通过属性窗口输入若干项目(不少于3个,内容任意);再添加两个命令按钮,名称分别为Commandl、Command2,其标题分别为“添加”、“统计”。在程序运行时,向Textl中输入字符,单击“添加”按钮后,则将Textl中的内容作为一个列表项被添加到组合框的列表中;单击“统计”按钮,则在窗体空白处显示组合框中列表项的个数,如图所示。请编写两个命令按钮的Click事件过程。
注意:程序中不得使用变量,也不能使用循环结构。存盘时必须存放在考生文件夹下,工程文件名保存为sjt3.vbp,窗体文件名保存为sjt3.frm。
选项
答案
【操作步骤】 步骤l:新建一个窗体,按照题目要求建立控件并设置控件属性,如图4.22所示。 [*] 程序中用到的控件及属性设置见表4.15 [*] 步骤2:打开代码编辑窗口,在指定位置编写如下代码。 参考答案 PriVate Sub Commandl_Click() Combol.AddItem Textl End Sub PriVate Sub Command2_Click() Print Comb01.ListCount End Sub 步骤3:调试并运行程序,关闭程序后按题目要求存盘。
解析
命令按钮和标签的标题用属性窗口中的Caption属性设置。要使TextI的文本框没有初始内容,需要将属性窗口中的Text属性设为空。要在下拉式组合框中输入内容,可以在属性窗口中对下拉式组合框的List属性进行设置。
转载请注明原文地址:https://kaotiyun.com/show/YATp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
窗体上有一个名称为Framel的框架(如图),若要把榧架上显示的“Framel”改为汉字“框架”,下面正确的语句是()。
有如下程序:PrivateSubForm_Click()DimSAsStringS=InputBox("请输入一个字符串:")Fori=1ToLen(S)\2IfMid(S,
窗体上有一个名称为Timer1的计时器控件,一个名称为Shape1的形状控件,其Shape属性值为3(Circle)。编写程序如下:PrivateSubForm_Load()Shape1.Top=0Timer1.Inter
设a=2,b=3,c=4,d=5,下列表达式的值是()。3>2*bOra=cAndb<>cOrb<>a+c
软件需求规格说明书的作用不包括
设窗体上有一个列表框控件List1,含有若干列表项。以下能表示当前被选中的列表项内容的是( )。
下列描述中,错误的是
以下关于文本框Text1的叙述中,错误的是
与数学式子对应的VisualBasic表达式是
下面属于白盒测试方法的是
随机试题
英国科学家麦克劳德上小学的时候出于对狗的内脏的好奇,偷偷杀死了校长家的狗。校长的惩戒手段是让麦克劳德画出狗的血液循环图和骨骼结构图。校长善意的“惩罚”,使小麦克劳德爱上了生物学,并最终登上了诺贝尔奖的领奖台。案例中校长()。
下面哪项不是宫内节育器取出的适应证
由于计算机处理过程的自动化和程序化,保证凭证的正确性成了会计信息可靠性的关键。()
其他会计核算资料是指与会计核算、会计监督密切相关,由会计部门负责办理的有关数据资料。不包括()。
台湾珊瑚颜色五彩缤纷,以()色品质最优。
互联网上每一个网络或每一台主机所分配的逻辑地址称为IP地址。目前,IP地址主要有IPv4地址和IPv6地址两大类别。下列对应错误的是:
栈和队列的主要区别在于()。
“泰西诸大国,自俄罗斯而外,无不有议院。……议院者,所以通君民之情者也。凡议政事,以协民心为本。大约下议院之权,与上议院相维制,上下议院之权与君权、相权相维制。”这个观点的提出者应该是
减少指令执行周期数是RISC计算机性能提高的基础,它是通过(7)、指令控制部件(8)微代码和(9)等来实现的。
Haveyouevernoticedthatthereisnoshortageofpeoplewillingtogiveyouadvice,whetherornotyouaskforit?I’ve【T1】___
最新回复
(
0
)