首页 > 大学专科> 电子信息
题目内容 (请给出正确答案)
[主观题]

在窗体上画一个名称为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题
在窗体上画一个名称为Command1的命令按钮, 一个名称为Label1、 Label2的标签, 然后编写如下的事件过程:

Private x As Integer

Private Sub Command1_Click()

x = 5: y = 3

Call Proc(x, y)

Label

1.Caption = x

Label

2.Caption = y

End Sub

Private Sub Proc(ByVal a As Integer, ByVal b

As Integer)

x = a * a

y = b + b

End Sub

运行程序后, 则两个标签中显示的内容分别是

A.5和3

B.25和3

C.25和6

D.5和6

点击查看答案
第5题
在VB窗体上添加一个名称为 Command1的命令按钮,再添加两个名称分别为Label1、Label2的标签,然后

A.13和40

B.13和8

C.5和40

D.5和8

点击查看答案
第6题
在窗体上画一个名称为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

点击查看答案
第7题
在窗体上画一个名称为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

点击查看答案
第8题
在窗体上有一个名称为Label1的标签和一个名称List1的列表框。程序运行后,在列表中添加若干列表项。
当双击列表框中的某个项目时,在标签Labe1中显示所选中的项如图所示。请在空白处填入适当的内容,将程序补充完整。 Private Sub Form. _Load() List1.AddItem"北京" List1.Addltem"上海" List1.AddItem"河北" End Sub Private Sub List1【 】() Labe1.Caption=【 】 End Sub

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

点击查看答案
第9题
在窗体上画一个名为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的列表框。程序运行后,在列表框中添加若干列表

点击查看答案
第10题
在窗体中添加一个名称为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

点击查看答案
退出 登录/注册
发送账号至手机
密码将被重置
获取验证码
发送
温馨提示
该问题答案仅针对搜题卡用户开放,请点击购买搜题卡。
马上购买搜题卡
我已购买搜题卡, 登录账号 继续查看答案
重置密码
确认修改