首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在名称为Forml的窗体上画一个名称为Labell、标题为”添加项目:”的标签;画一个名称为Textl的文本框,没有初始内容;画一个名称为Combol的下拉式组合框,并通过属性窗口输入若干项目(不少于三个,内容任意);再画两个命令按钮,名称分别为Comma
在名称为Forml的窗体上画一个名称为Labell、标题为”添加项目:”的标签;画一个名称为Textl的文本框,没有初始内容;画一个名称为Combol的下拉式组合框,并通过属性窗口输入若干项目(不少于三个,内容任意);再画两个命令按钮,名称分别为Comma
admin
2019-06-11
15
问题
在名称为Forml的窗体上画一个名称为Labell、标题为”添加项目:”的标签;画一个名称为Textl的文本框,没有初始内容;画一个名称为Combol的下拉式组合框,并通过属性窗口输入若干项目(不少于三个,内容任意);再画两个命令按钮,名称分别为Commandl、Command2,标题分别为”添加”、”统计”。在运行时,向Textl中输入字符,单击”添加”按钮后,则Textl中的内容作为一个列表项被添加到组合框的列表中:单击”统计”按钮,则在窗体上显示组合框中列表项的个数,如图2-144所示。请编写两个命令按钮的Click事件过程。
注意:程序中不得使用变量,也不能使用循环。存盘时必须存放在考生文件夹下,工程文件名为sjt3.vbp,窗体文件名为sjt3.frm。
选项
答案
步骤1:新建一个”标准EXE”工程,如表3-8l在窗体中画出控件并设置其相关属性。 [*] 步骤2:打开代码编辑窗口,编写两个命令按钮的Click事件过程。 参考代码: Private Sub Commandl_Click( ) Combol.AddItem Textl.Text End Sub Private Sub Command2_Click( ) Print Combol.ListCount End Sub 步骤3:按要求将文件保存至考生文件夹中。
解析
转载请注明原文地址:https://jikaoti.com/ti/WtN0FFFM
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
假定有如下程序:PrivateSubForm_Click()Dima(4)AsInteger,b(4)AsIntegerFork=0To2a(k+1)=Val(InputBox("请输入一个整数:"))b(3-k)=a(k+1)Ne
窗体上有一个名称为Command1的命令按钮。要求编写程序,把文件f1.txt的内容写到文件f2.txt中,然后将f1.txt删除。命令按钮的单击事件过程如下:PrivateSubCommand1_Click()Open"c:\f1.txt"For
下列数组定义中错误的是
设有如下数组定义语句:Dima(-1To4,3)AsInteger以下叙述中正确的是
语句Dima(-3To4,3To6)AsInteger定义的数组的元素个数是
在标准模块中用Public关键字定义的变量,其作用域为
要求如果x被7除余2,则输出x的值,下列语句中不能实现此功能的语句是
窗体上有名称分别为Text1、Text2的文本框,名称为Command1的命令按钮。运行程序,在Text1中输入“FormList”,然后单击命令按钮,执行如下程序:PrivateSubCommand1_Click()Text2.Text=UCa
有如下过程代码:Subvar_dim()StaticnumaAsIntegerDimnumbAsIntegernuma=nurna+2:numb=numb+1:printnuma;numbEndSub连续3次调用vardim过
下列说法中,错误的是
随机试题
郁达夫是现代文学史上_________社的成员。中国现代文学史上第一部小说集是《_________》。
在社会主义初级阶段,发展多种所有制经济的根本原因是【】
口服药治疗甲亢的适应证是
经济分析主要是通过经济费用效益对项目进行评价,作为决策的依据。经济费用效益分析应从资源合理配置的角度,分析项目投资的(),评价项目的经济合理性。
下列项目中,不允许计算进项税额进行抵扣的是()。(2012年)
据有关资料报道,我国物流成本在GDP中的比重大约是()%。
胡锦涛同志在党的十八大报告中指出,面对人民的信任和重托,面对新的历史条件和考验,全党必须()。
在学前儿童的同伴交往中,有的孩子很受同伴欢迎,有的比较一般,也有存在交友困难的问题儿童。阿莲就是其中的一例。阿莲是个体质较弱,个子较小的女孩,她性格内向,胆子小,不爱说话,不喜欢交往,也不善交往。她孤独感较重,没有小伙伴同自己玩,心里感到很难过。
完全竞争条件下的某一厂商在其当前的产出水平下,其索要的价格、边际成本和平均成本都是1元。边际成本将随着产出的增加而提高,则这一厂商()。
WhytheEarth’ssurfacetemperaturehasn’twarmedasexpectedoverthepastdecadecontinuestobeapuzzleforscientists.One
最新回复
(
0
)