首页 > 大学专科> 电子信息

题目内容（请给出正确答案）

[主观题]

在窗体上画一个名称为Label1的标签和一个名称为list1的列表框。程序运行后，在列表框中添加若干列

表项。当双击列表框中的某个项目时，在标签kabel1中显示所选中的项目，如图所示。

在窗体上画一个名称为Label1的标签和一个名称为list1的列表框。程序运行后，在列表框中添加若干请在【】和【】处填入适当内容，将程序补充完整。 Private Sub Form_load() List1.Addltem"北京" List1.Addltem"上海" List1.Addltem"河北" End Sub Private Sub【】() Label1.Caption=【】 End Sub

查看答案

如果结果不匹配，请联系老师获取答案

您可能会需要：

重置密码查看订单联系客服

安装优题宝APP，拍照搜题省时又省心！

更多“在窗体上画一个名称为Label1的标签和一个名称为list1…”相关的问题

第1题

在窗体上画一个名称为Command1的命令按钮和一个名称为Label1的标签，然后编如下事件过程：Privat

A.1

B.5

C.27

D.45

点击查看答案

第2题

在窗体上画一个标签（名称为Label1)和一个计时器（名称为Timer1)，然后编写如下几个事件过程：

在窗体上画一个标签(名称为Label1)和一个计时器(名称为Timer1)，然后编写如下几个事件过程： Private Sub Form_Load() Timer1.Enabled=False Timer1.Interval=【】 End Sub Private Sub Form_Click() Timer1.Enabled=【】 End Sub Private Sub Timer1_Timer() Label1.Caption=【】 End Sub 程序运行后，单击窗体，将在标签中显示当前时间，每隔1秒钟变换一次(见图)。请填空。

在窗体上画一个标签（名称为Label1)和一个计时器（名称为Timer1)，然后编写如下几个事件过程

点击查看答案

第3题

在窗体上画一个标签（名称为Label1)和一个计时器（名称为Timer1)，如图16－11所示，然后编写如下几个

在窗体上画一个标签(名称为Label1)和一个计时器(名称为Timer1)，如图16-11所示，然后编写如下几个事件过程： Private Sub Form_Load() Timer1. Enabled=False Timer1. Interval=【】 End Sub Private Sub Form_Cliek() Timer1. Enabled=【】 End Sub Private Sub Timer1_Timer() Label1. Caption=【】 End Sub 程序运行后，单击窗体，将在标签中显示当前时间，每隔1秒钟改变一次。请填空。

在窗体上画一个标签（名称为Label1)和一个计时器（名称为Timer1)，如图16－11所示，然后

点击查看答案

第4题

在VB窗体上添加一个名称为 Command1的命令按钮，再添加两个名称分别为Label1、Label2的标签，然后

A.13和40

B.13和8

C.5和40

D.5和8

点击查看答案

第5题

在窗体上画一个名称为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

点击查看答案

第6题

在窗体上画一个名称为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

点击查看答案

第7题

在窗体上有一个名称为Label1的标签和一个名称List1的列表框。程序运行后，在列表中添加若干列表项。

当双击列表框中的某个项目时，在标签Labe1中显示所选中的项如图所示。请在空白处填入适当的内容，将程序补充完整。 Private Sub Form. _Load() List1．AddItem"北京" List1．Addltem"上海" List1．AddItem"河北" End Sub Private Sub List1【】() Labe1．Caption=【】 End Sub

在窗体上有一个名称为Label1的标签和一个名称List1的列表框。程序运行后，在列表中添加若干列表

点击查看答案

第8题

在窗体上画一个名为Label1的标签和一个名为List1的列表框。程序运行后，在列表框中添加若干列表项。

当双击列表框中的某个项目时，在标签Label1中显示所选中的项目，如图16-1所示。请在【】和【】处填入适当的内容，将程序补充完整。(2002年9月) Private Sub Form_load() List1. AddItem"北京" List1. AddItem"上海" List1. AddItem"河北" End Sub Private Sub【】 () Label1. Caption=【】 End Sub

在窗体上画一个名为Label1的标签和一个名为List1的列表框。程序运行后，在列表框中添加若干列表

点击查看答案

第9题

在窗体中添加一个名称为Lablel1的标签、两个名称为Text1和Text2的文本框以及名称为Command1的按钮

。程序运行后，在两个文本框中输入数据，当单个按钮时，标签Label1中显示运算的结果。程序的功能是计算，n!+(n+1)!+(n+2)!+…+(n+m)!。请在【】处填入适当的内容，将程序补充完整。 Private Sub Command1_Click() Dim a，b，c，d As Double Dim i，n，m As Integer n=Val(Text1.Text):m=Val(【】) a=0： b=1： c=0： d=1 For i=1 TO m b=b*i a=a+b Next i For i=1 To n d=d*i C=c+d Next i Label1.Caption=a-c End Sub

点击查看答案

第10题

在窗体上画一个标签、一个计时器和…个命令按钮，其名称分别为Label1、Tliner1和Command1，如图1所示。

程序运行后，如果单击命令按钮，则标签开始闪烁，每秒钟“炊迎”二字显示、消失各一次，如图2所示。以下是实现上述功能的程序，请填空。

Prirate Sub Form_L．aad()

Labell．Caption=“欢迎”

Timer1．Enabled=False

Timer1．Interval=【】

Commandl．Caption=“开始闪烁”

End sut)

Private Sub Timer1_rrimer()

Label1．visible=【】

Emi sub

PTivate Sub Commandl_Click()

【】

End sub

在窗体上画一个标签、一个计时器和…个命令按钮，其名称分别为Label1、Tliner1和Comman

点击查看答案

湖南中本聪区块链科技有限公司版权所有 ©2024

湘ICP备20004669号-2 营业执照

违法和不良信息举报电话：400-118-7898

举报/反馈/投诉邮箱：deng＃ujigu.com（请将＃替换成@）