重要提示：请勿将账号共享给其他人使用，违者账号将被封禁！
查看《购买须知》>>>
首页 > 大学专科> 电子信息
网友您好，请在下方输入框内输入要搜索的题目：
搜题
拍照、语音搜题，请扫码下载APP
扫一扫 下载APP
题目内容 （请给出正确答案）
[主观题]

在窗体上画两个组合框，其名称分别为Combo1、Comb02，然后画两个标签，名称分别为Label1、 Labe12。要

求程序运行后，如果在某个组合框中选择一个项目，则把所选中的项目在其下面的标签中显示出来。请填空使程序完整。 Private Sub Comb01_Click() Call ShowItem(Combo1，Labe11) End Sub Private Sub Combo2_Click() Call ShowItem(Combo2, Labe12) End Sub Public Sub ShowItem(tmpCombo As ComboBox, tmpLabel As Label) ______.Caption=______.Text End Sub

答案
查看答案
发布时间：2020-08-24
收藏
更多“在窗体上画两个组合框，其名称分别为Combo1、Comb02，然后画两个标签，名称分别为Label1、 Labe12。要”相关的问题

第1题

在窗体上画两个组合框，其名称分别为Combo1、Comb02，然后画两个标签，名称分别为Label1、Label2，如
图所示。程序运行后，如果在某个组合框中选择一个项目，则把所选中的项目在其下面的标签中显示出来。请填空。

在窗体上画两个组合框，其名称分别为Combo1、Comb02，然后画两个标签，名称分别为Label1Privte Sub Combo1_Click() Call Showltem(Comb01.Label1) End Sub Private Sub Combo2_Click() Call Showltem(ComboLabe12) End Sub Public Sub Showhem(tmpCombo As ComboBox，tmpLabd As Label)， 【 】Caption=【 】.Text End Sub

点击查看答案

第2题

在窗体上画一个名称为Combol的组合框，画两个名称分别为Label1和Label2及Caption，属性分别为“城市
名称”和空白的标签。程序运行后，当在组合框中输入一个新项后按回车键(ASCII码为13)时，如果输入的项在组合框的列表中不存在，则自动添加到组合框的列表中，并在Label2中给出提示“已成功添加输入项”，如图16-3所示；如果存在，则在Label2中给出提示“输入项已在组合框中”。请在【 】、【 】和【 】处将程序补充完整。 Private Sub Comhel【 】(KeyAscii As Integer) If KeyAseii=13 Then For i=0 To Combol. ListCount-1 If Combol. Text=【 】Then LabelCaption="输入项已在组合框中" Exit Sub End If Next i LabelCaption="已成功添加输入项" Combol.【 】Combol. Text End If End Sub

在窗体上画一个名称为Combol的组合框，画两个名称分别为Label1和Label2及Caption

点击查看答案

第3题

在窗体上画一个名称为Combol的组合框，画两个名称分别Label1和Label2及Caption属性分别为“城市名
称”和空白的标签。程序运行后，当在组合框中输入一个新项后按回车键(ASCII码为13)时，如果输入的项在组合框的列表中不存在，则自动添加到组合框的列表中，并在Label2中给出提示“已成功添加输入项”如图所示：

在窗体上画一个名称为Combol的组合框，画两个名称分别Label1和Label2及Caption属如果存在，则在Label2中给出提示“输入项已在组合框中”。请在【 】、【 】和【 】处将程序补充完整。 Private Sub Combo1【 】(Key Ascii As Integer) If Key Ascii=13 Then For i=0 TO Comb01.ListCount-1 If Combo1.Text=【 】Then LabelCaption=“输入项已在组合框中” Exit Sub End If Next i LabelCaption=“已成功添加输入项” Combo1.【 】Combo1.Text End If End Sub

点击查看答案

第4题

在窗体上画一个名称为Combo1的组合框，画两个名称分别Labe11和Labe12及Caption属性分别为“城市名
称”和空白的标签。程序运行后，当在组合框中输入一个新项后按(Enter)键(ASCII码为13)时，如果输入的项在组合框的列表中不存在，则自动添加到组合框的列表中，并在Labe12中给出提示“已成功添加输入项”，如图20-3所示；如果存在，则在Labe12中给出提示“输入项已在组合框中”。请在【 】、【 】和【 】处将程序补充完整。

在窗体上画一个名称为Combo1的组合框，画两个名称分别Labe11和Labe12及Caption属Private Sub Combo1【 】(KeyAscii As Integer) If KeyAscii=13 Then For i=0 To Combo1；ListCount-1 If Combo1．Text=【 】Then LabeCaption="输入项已在组合框中" Exit Sub End If Next i LabeCaption="已成功添加输入项" Combo1．【 】Combo1．Text End If End Sub

点击查看答案

第5题

注意：下面出现的“考生文件夹”均为c：\wexam\25160001。 （1) 在名称为Form1的窗体上画一个名称为H1

注意：下面出现的“考生文件夹”均为c：\wexam\25160001。

(1) 在名称为Form1的窗体上画一个名称为H1的水平滚动条，请在“属性”窗口中设置它的属性值，使之满足以下要求：它的最大刻度值为100，最小刻度值为1，在运行时鼠标单击滚动条上滚动框以外的区域(不包括两边按钮)，滚动框移动10个刻度。再在滚动条下面画两个名称分别为L1和L2的标签，并分别显示1和100，运行时的窗体如图19-1所示。

注意：存盘时必须存放在考生文件夹下，工程文件名为sjt1.vbp，窗体文件名为sjt1.frm

(2) 在名称为Form1的窗体上画两个文本框，名称分别为Text1和Text2，均无初始内容；再建立一个下拉菜单，菜单标题为“操作”，名称为M1，此菜单下含有两个子菜单项，名称分别为Cooy和Clear、标题分别为“复制”和“清除”。请编写适当的事件过程，使得程序运行时，单击“复制”菜单项，则把 Text1中的内容复制到Text2中，单击“清除”菜单项，则清除Text2中的内容(即在Text2中填入空字符串)。程序运行界面如图19-2所示。要求在程序中不得使用任何变量，每个事件过程中只能写一条语句。

注意：存盘时必须存放在考生文件夹下，工程文件名为sjt2.vbp，窗体文件名为sjt2.frm。

注意：下面出现的“考生文件夹”均为c：wexam25160001。 （1) 在名称为Form1的

点击查看答案

第6题

假定建立了一个工程，该工程包括两个窗体，其名称（Name属性)分别为Form1和Form2，启动窗体为Form1。

假定建立了一个工程，该工程包括两个窗体，其名称(Name属性)分别为Form1和Form2，启动窗体为Form1。在Form1上画一个命令按钮Command1，程序运行后，要求当单击该命令按钮时，Form1窗体消失，显示窗体Form2，请将下面的程序补充完整。 Private Sub Command1_Click() 【 】Form1 Form2.【 】 End Sub

点击查看答案

第7题

在窗体上画一个驱动器列表框、一个目录列表框和一个文件列表框，其名称分别为Dhvel、 Dirl和File1。
为了使它们同步操作，必须触发Drive1_Change()事件和Dir1_Change()事件，在这两个事件中执行的语句分别是【 】和【 】。

点击查看答案

第8题

在窗体上画两个文本框，其名称分别为Text1和Text2，然后编写如下事件过程： Private Sub Form_Load
() Show Text1.Text="" Text2.Text="" Text2.SetFocus End Sub Private Sub Text2_KeyDown(KeyCode As Integer, Shift As Integer) Text1.Text=Text1.Text+Chr(KeyCode-4) End Sub 程序运行后，如果在Text2文本框中输入“efghi”，则Text1文本框中的内容为【 】。

点击查看答案

第9题

在窗体上画两个文本框（名称分别为Text1和Text2)和一个命令按钮（名称为Command1)， 然后编写如

在窗体上画两个文本框(名称分别为Text1和Text2)和一个命令按钮(名称为Command1)， 然后编写如下事件过程： Private Sub Command1 Click() Text1．Text=InputBox("请输入数据1") TextText=InputBox("请输入数据2) End Sub 程序运行后，如果单击命令按钮，将先后显示两个输入对话框，在两个输入对话框中分别输入123和abc，则两个文本框中显示的内容分别为【 】和【 】。

点击查看答案

第10题

在窗体上画一个文本框和一个图片框，然后编写如下两个事件过程： Private Sub Form_Click（) Textl.

在窗体上画一个文本框和一个图片框，然后编写如下两个事件过程：

Private Sub Form_Click()

Textl.Text="VB程序设计"

End Sub

Private Sub Textl_Change()

Picturel.Print"VB programming"

End Sub

程序运行后，单击窗体，则在文本框中显示的内容是【 】，而在图片框中显示的内容是【 】。

点击查看答案
考试指南 全部 >
期货从业资格考试上海考点基金从业资格考试成绩保留多久基金从业资格证与证券从业资格证的区别河南初级银行职业资格报名入口在哪2024证券从业资格考试报名和考试时间汇总（1—6月）2024期货从业人员资格考试内容基金从业资格证颁发单位基金从业资格证备考时间需要多久银行从业考试有用吗证券从业资格考试何时报名2024
违法和不良信息举报 在线客服
    搜题
    下载APP
    关注公众号
    TOP
    重置密码
    账号：
    旧密码：
    新密码：
    确认密码：
    确认修改
    购买搜题卡查看答案 购买前请仔细阅读《购买须知》
    请选择支付方式
    • 微信支付
    • 支付宝支付
    点击支付即表示同意并接受了《服务协议》和《购买须知》
    立即支付 系统将自动为您注册账号
    已付款，但不能查看答案，请点这里登录即可>>>
    联系客服
    找回账号密码
    请使用微信扫码支付(元)

    订单号：

    遇到问题请联系在线客服

    请不要关闭本页面，支付完成后请点击【支付完成】按钮
    遇到问题请联系在线客服
    恭喜您，购买搜题卡成功 系统为您生成的账号密码如下：
    重要提示：请勿将账号共享给其他人使用，违者账号将被封禁。
    发送账号到微信 保存账号查看答案
    怕账号密码记不住？建议关注微信公众号绑定微信，开通微信扫码登录功能
    请用微信扫码测试
    尊敬的用户，您尚未绑定微信号
    扫码关注微信公众号，开通微信扫码登录功能
    您可能还需要：
    重置密码 查看订单 联系客服
    优题宝