主观题

窗体上有一个名称为Combo1的组合框,其初始内容为空,有一个名称为Command1、标题为“添加项目”的命令按钮, 程序运行后,如果单击命令按钮,会将给定数组中的项目添加到组合框中,如图所示,请填空。 Option Base 1 Private Sub Command1_Click() Dim city As Variant city=______("北京","天津","上海","武汉","重庆

查看答案
该试题由用户104****11提供 查看答案人数:49726 如遇到问题请 联系客服
正确答案
该试题由用户104****11提供 查看答案人数:49727 如遇到问题请联系客服

相关试题

换一换
单选题
设在窗体上有一个名称为Combo1的组合框,要删除最后一项,下列正确的语句是______。
A.Combo1.RemoveItem Combo1.List(5) B.Combo1.RemoveItem Combo1.Text C.Combo1.RemoveItem Combo1.ListCount D.Combo1.RemoveItem Combo1.ListCount-1
答案
主观题
窗体上有一个名称为Combo1的组合框,其初始内容为空,有一个名称为Command1、标题为“添加项目”的命令按钮。程序运行后,如果单击命令按钮,会将给定数组中的项目添加到组合框中,如图所示。请填空。Option Base1Private Sub Command1_Click(Dim city As Variantcity= (1) (“北京”,&l
答案
主观题
窗体上有一个名称为Combo1的组合框, 其初始内容为空,有一个名称为Command1、标题为“添加项目”的命令按钮。程序运行后,如果单击命令按钮,会将给定数组中的项目添加到组合框中,如图所示。请填空。 Option Base 1 Private Sub Command 1_ Click(Dim city As Variant city=_【6】_("北京","天津","上海","武汉","重庆
答案
主观题
窗体上有一个名称为Combo1的组合框,其初始内容为空,有一个名称为Command1、标题为“添加项目”的命令按钮, 程序运行后,如果单击命令按钮,会将给定数组中的项目添加到组合框中,如图所示,请填空。 Option Base 1 Private Sub Command1_Click() Dim city As Variant city=______("北京","天津","上海","武汉","重庆
答案
主观题
通过选择组合框中的选项来改变文本框的字体。在窗体中添加一个组合框 (Combo1)和一个文本框(Text1),代码如下。请填入适当的内容,将程序补充完整。 Private Sub Combo1_Cliek() Text1. FontName=Combo1. List(Combo1. Listlndex) End Sub Private Sub Form_Load() With Combol Add
答案
主观题
在窗体上画两个组合框,其名称分别为Combo1、Combo2,然后画两个标签,名称分别为Label1、 Label2。要求程序运行后,如果在某个组合框中选择一个项目,则把所选中的项目在其下面的标签中显示出来。请填空使程序完整。 Private Sub Combo1_Click() Call ShowItem(Combo1,Label1) End Sub Private Sub Combo2_Cli
答案
主观题
在窗体上画两个组合框,其名称分别为Combo1、Combo2,然后画两个标签,名称分别为Label1、Label2,如图所示,程序运行后,如果在某个组合框中选择一个项目,则把所选中的项目在其下面的标签中显示出来。请填空。 Private Sub Combo1_Click() Call ShowItem(Combo1, Label1) End Sub Private Sub Combo2_Clic
答案
主观题
在窗体上画两个组合框,其名称分别为Combo1、Combo2,然后画两个标签,名称分别为Label1、Label2,如图所示,程序运行后,如果在某个组合框中选择一个项目,则把所选中的项目在其下面的标签中显示出来。请填空。[*]Private Sub Combo1_Click() Call ShowItem(Combo1, Label1) End Sub Private Sub Combo2_Cl
答案
主观题
在窗体上画两个组合框,其名称分别为Combo1、Combo2,然后画两个标签,名称分别为Label1、Label2。要求程序运行后,如果在某个组合框中选择一个项目,则把所选中的项目在其下列的标签中显示出来。请填空使程序完整。 Private Sub Combol_Click()Call ShowItem(Combo1,Label1) End Sub Private Sub Combo2_Click
答案
单选题
能够将组合框Combo1中最后一个数据项删除的语句为()
A.Combo1.RemoveItemCombo1.ListCount B.Combo1.RemoveItemCombo1.ListCount-1 C.Combo1.RemoveItemCombo1.ListIndex D.Combo1.RemoveItemCombo1.ListIndex-1
答案
热门试题
组合框Combo1的Style属性值为()时,组合框右边有下拉箭头按钮。 清除 List1列表框对象内容的语句是List1.Cls, 清除Combo1组和框对象内容的语句是Combo1.Clear。 窗体上有一个组合框,编写下列程序:Private Sub Command1_ Click () Combo1. RemoveItem 2End subPrivate Sub form Load() Combo1. AddItem “上海” Combo1. AddItem “北京” Combo1. AddItem “天津” Combo1. AddItem “重庆”End Sub程序执行时,单击Command1,则在组合框中将不再出现______。 能输出组合框Combo1中现有项目数的语句是( )。 在窗体上画一个组合框、一个命令按钮和一个文本框,其名称分别为Combo1,Command1和Text1,然后编写如下事件过程:程序运行后,如果单击命令按钮,则在文本框中显示组合框的项目“CCCCC”。为了实现该操作,在命令按钮的Click事件过程中应使用的语句为() 在窗体上画两个组合框,其名称分别为Combo1、Combo2,然后画两个标签,名称分别为Label1、Label2,如图所示。程序运行后,如果在某个组合框中选择一个项目,则把所选中的项目在其下面的标签中显示出来。请填空。 Private Sub Combol Click() Call Showltem(Combol, Labell) End Sub Private Sub Combo2 Click 在窗体上画两个组合框,其名称分别为Combo1、Comb02,然后画两个标签,名称分别为Label1、Label2,如 图所示。程序运行后,如果在某个组合框中选择一个项目,则把所选中的项目在其下面的标签中显示出来。请填空。 Privte Sub Combo1_Click()Call Showltem(Comb01.Label1) End Sub Private Sub Combo2_Click( 设组合框Combo1中有3个项目,则下列能删除最后一项的语句是( )。 设组合框Combo1中有3个项目,则以下能删除最后一项的语句是()。 设组合框Combo1中有三个项目,则以下能删除最后一项的语句是()。 在窗体上画一个名称为Combo1的组合框,名称为Text1的文本框,以及名称为Command1的命令按钮,如图运行程序,单击命令按钮,将文本框中被选中的文本添加到组合框中,若文本框中没有选中的文本,则将文本框中的文本全部添加到组合框中。命令按钮的事件过程如下:程序中横线处应该填写的是() 完成下列问题:在名称为Form1的窗体上画一个名称为Label1、标题为“添加项目:”的标签;画一个名称为Text1的文本框,其中没有初始内容;画一个名称为Combo1的下拉列表框,并通过属性窗口输入若干项目(不少于3个,内容任意);再画两个命令按钮,名称分别为Command1、Command2,标题分别为“添加”、“统计”。运行时,向Text1中输入字符,单击“添加”按钮后,则Text1中的内容 窗体上有一个名称为Cb1的组合框,程序运行后,为了输出选中的列表项,应使用的语句是() 在窗体上有一个文本框,其名称为Text1,编写下列事件过程:Private() 窗体上有一个名称为Vscroll1的垂直滚动条,要求程序运行时,滚动框的初始位置在最下端,应该使VScroll1.Value的值等于() 窗体上有一个名称为Label1的标签和一个名称为Command1的命令按钮() 在窗体上有一个文本框控件,名称为TextTime,一个计时器控件,名称为Timer1。要求每一秒在文本框中显示一次当前的时间。 窗体上有一个通用对话框控件 窗体上有一个名称为Picture1的图片框控件。一个名称为Label1的标签控件,如图所示。现有如下程序:对以上程序,下列叙述中错误的是() 窗体上有一个组合框,其中已输入了若干项目。程序运行时,单击其中一项,即可把该项与最上面的一项交换。例如:单击图5中的“重庆”,则与“北京”交换,得到图6的结果。下面是可实现此功能的程序,请填空。 Private Sub Combo1_Click() Dim temp temp=Combo1.Text ______=Combo1.List(0) Combo1.List(0)=temp End Sub
购买搜题卡 会员须知 | 联系客服
会员须知 | 联系客服
关注公众号,回复验证码
享30次免费查看答案
微信扫码关注 立即领取
恭喜获得奖励,快去免费查看答案吧~
去查看答案
全站题库适用,可用于E考试网网站及系列App

    只用于搜题看答案,不支持试卷、题库练习 ,下载APP还可体验拍照搜题和语音搜索

    支付方式

     

     

     
    首次登录享
    免费查看答案20
    微信扫码登录 账号登录 短信登录
    使用微信扫一扫登录
    登录成功
    首次登录已为您完成账号注册,
    可在【个人中心】修改密码或在登录时选择忘记密码
    账号登录默认密码:手机号后六位