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

在窗体上画一个列表框、一个命令按钮和一个标签。程序运行后,在列表框中选择一个项目,然后单击命令

按钮,即可将所选择的项目删除,并在标签中显示列表框当前的项目数。 下面是实现上述功能的程序,请填空。 Private Sub Form_Load() List1.AddItem "AAAAA" List1.AddItem "BBBBB" List1.AddItem "CCCCC" List1.AddItem "DDDDD" End Sub Private Sub Command1_Click() Dim L1 As Integer L1=【 】 If L1 >=0 Then List1.RemoveItem【 】 Labell.Caption=【 】 Else MsgBox("请选择要删除的项目") End If End Sub

答案
查看答案
更多“在窗体上画一个列表框、一个命令按钮和一个标签。程序运行后,在列表框中选择一个项目,然后单击命令”相关的问题

第1题

在窗体上画一个列表框、一个命令按钮和一个标签,其名称分别为List1、Command1和Label1,通过属性窗
口把列表框中的项目设置为:“第一个项目”、“第二个项目”、“第三个项目”、“第四个项目”。程序运行后,在列表框中选择一个项目,然后单击命令按钮。即可将所选择的项目删除,并在标签中显示列表框当前的项目数,运行情况如图16-5所示(选择“第三个项目”的情况)。下面是实现上述功能的程序,请填空。 Private Sub Command1_C1ick() If List1. List1adex>=【 】Then List1. Removeltem【 】 Label1. Caption=【 】 Else MsgBox "请选择要删除的项目" End If End Sub

在窗体上画一个列表框、一个命令按钮和一个标签,其名称分别为List1、Command1和Label1

点击查看答案

第2题

在窗体上画一个列表框、一个命令按钮和一个标签,其名称分别为List1、Command1和Labe11,通过属性窗
口把列表框中的项目设置为:“第一个项目”、“第二个项目”、“第三个项目”、“第四个项目”。程序运行后,在列表框中选择一个项目,然后单击命令按钮,即可将所选择的项目删除,并在标签中显示列表框当前的项目数,运行情况如图20-8所示(选择“第三个项目”的情况)。下面是实现上述功能的程序,请填空。

在窗体上画一个列表框、一个命令按钮和一个标签,其名称分别为List1、Command1和Labe11Private Sub Command1_Click() If List1.ListIndex>=0 Then List1.RemoveItem【 】 LabeCaption=【 】 Else MsgBox“请选择要删除的项目” End If End Sub

点击查看答案

第3题

在窗体上画一个列表框、一个命令按钮和一个标签,其名称分别为List1、Commandl和Label1,通过属性窗
口把列表框中的项目设置为:“第一个项目”、“第二个项目”、“第三个项目”、“第四个项目”。程序运行后,在列表框中选择一个项目,然后单击命令按钮,即可将所选择的项目删除,并在标签中显示列表框当前的项目数,运行情况如图所示(选择“第三个项目”的情况)。下面是实现上述功能的程序,请填空。 Pfivme Sub Command1_Click() If List1.List1ndex>=【 】Then List1.Removehem【 】 Label1.Caption=【 】 Else MsgBox“请选择要删除的项目”

在窗体上画一个列表框、一个命令按钮和一个标签,其名称分别为List1、Commandl和Label1End If End Sub

点击查看答案

第4题

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

A.1

B.5

C.27

D.45

点击查看答案

第5题

在窗体上画一个命令按钮,编写如下事件过程: Private Sub Command1_Click() a=InputBox ("

在窗体上画一个命令按钮,编写如下事件过程: Private Sub Command1_Click() a=InputBox ("Enter FirstInteger") b=InputBox ("Enter SecondInteger") Print EndSub 程序运行后,单击命令按钮,先后在两个输入对话框中分别输入 456 和123,输出结果为()。

A、579

B、123

C、456

D、123456

点击查看答案

第6题

在窗体上画一个命令按钮,然后编写如下事件过程: Private Sub Command1_Click() a=0

在窗体上画一个命令按钮,然后编写如下事件过程: Private Sub Command1_Click() a=0 For i=1 To 2 For j=1 To 4 If j Mod 2<>0 Then a=a+1 End If a=a+1 Next j Next i Print a End Sub 程序执行后,单击命令按钮,输出结果是【 】。

点击查看答案

第7题

在窗体上画一个命令按钮,然后编写如下程序:(假定变量x是一个窗体级变量) Dim x As Intege

在窗体上画一个命令按钮,然后编写如下程序:(假定变量x是一个窗体级变量) Dim x As Integer Sub inc(a As Integer) x=x+a End Sub Private Sub Command1_Click() inc 2 inc 3 inc 4 Print x; End Sub 程序执行后,单击Command1命令按钮,输出的结果是【 】。

点击查看答案

第8题

在窗体上画一个名称为Command1的命令按钮和一个名称为Text1的文本框。程序运行后,Command1为禁用(

在窗体上画一个名称为Command1的命令按钮和一个名称为Text1的文本框。程序运行后,Command1为禁用(灰色)。当向文本框中输入任何字符时,命令按钮Command1变为可用。请在【 】处填入适当的内容,将程序补充完整。 Private Sub Form_Load() Command1.Enabled=False End Sub Private Sub Text1【 】() Command1.Enabled=True End Sub

点击查看答案

第9题

在窗体上画一个命令按钮,然后编写如下单击命令按钮事件过程:option base 0Private Sub Command

A.1

B.2

C.3

D.4

点击查看答案

第10题

在窗体上画—个命令按钮,然后编写如程序: (假定变量x是一个窗体级变量) Dim x As Integer

在窗体上画—个命令按钮,然后编写如程序: (假定变量x是一个窗体级变量) Dim x As Integer Sub inc(a As Integer) x=x+a End Sub Private Sub Command1_Click() inc 2 inc 3 inc 4 Print x; End Sub 程序执行后,单击Command1命令按钮,输出的结果是【 】 。

点击查看答案
下载APP
关注公众号
TOP
重置密码
账号:
旧密码:
新密码:
确认密码:
确认修改
购买搜题卡查看答案 购买前请仔细阅读《购买须知》
请选择支付方式
  • 微信支付
  • 支付宝支付
点击支付即表示同意并接受了《服务协议》《购买须知》
立即支付 系统将自动为您注册账号
已付款,但不能查看答案,请点这里登录即可>>>
请使用微信扫码支付(元)

订单号:

遇到问题请联系在线客服

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