一.在名称为FORM1的窗体上画1个名称为Label1,标题为“列表框的使用”的标签。再画一个名称为List1的列表

一.在名称为FORM1的窗体上画1个名称为Label1,标题为“列表框的使用”的标签。再画一个名称为List1的列表框,列表中含有5个表项,表项内容分别为“北京”,“山西”,“辽宁”,“浙江”,“广东”,并且可以在列表中同时选择多个表项。

Private Sub Form_Load()
List1.AddItem "北京"
List1.AddItem "山西"
List1.AddItem "辽宁"
List1.AddItem "浙江"
List1.AddItem "广东"
Label1 = "列表框的使用"

'属性栏里设置MultiSelect为2
End Sub

Private Sub List1_Click()
Dim tmp As String
For i = 0 To List1.ListCount - 1
If List1.Selected(i) Then
tmp = tmp + List1.List(i) & vbCrLf
End If
Next
MsgBox tmp

End Sub
温馨提示:内容为网友见解,仅供参考
无其他回答

在名称为Form1的窗体上画一个标签(名称为Label1,标题为"输入信息"),
1、首先我们新建一个项目。2、在项目管理器中,我们右击,选择"添加",选择"windows窗体"。3、输入窗体名,点击"确定"。4、我们给form1拖入按钮控件。5、在项目管理器中,我们找到"Form1.Designer.cs",双击打开代码窗口。6、我们找到按钮的定义,然后把private改为public。7、把以下代码填入代码窗品中Form...

. 在名为form1的窗体上绘制一个标签(名称为lab1,标题为input)、一个文 ...
从工具箱拖出Label控件,右键点Label控件,打开属性框,设置Name属性为lab1,设置Caption属性为input。再拖一个TextBox。

在名称为Form1的窗体上画一个文本框,名称为Text1;画两个命令按钮,名称...
在名称为Form1的窗体上画一个文本框,名称为Text1;画两个命令按钮,名称分别为Cmd1、Cmd2、标题分别为“隐藏”、“显示”。要求:(1)请编写适当的事件过程,使得在运行时,如果单击... 在名称为Form1的窗体上画一个文本框,名称为Text1;画两个命令按钮,名称分别为Cmd1、Cmd2、标题分别为“隐藏”、“显示”。要...

在名称为Form1的窗体上,画一个标签、一个命令按钮和一个计时器。标签...
在按钮中写以下代码 timer1.enable=false 在计时器中写 在计时器的属性中设置interval为1000 lbl1.caption=time()这样就可以了

vb 在名称为Form1的窗体上,画1个名称为Label1的标签,其标题为"等级考试...
Private Sub Form_Load()Timer1.Interval = 1000 Label1.AutoSize = True Label1.Caption = "等级考试"End Sub Private Sub Timer1_Timer()Label1.Visible = Not Label1.Visible End Sub

...在名称为Form1的窗体上画一个文本框,名称为Text1,其初始内容为0;画...
LinkTopic = "Form1"ScaleHeight = 3090 ScaleWidth = 4680 StartUpPosition = 3 '窗口缺省 Begin VB.CommandButton C1 Caption = "Command1"Height = 375 Left = 1200 TabIndex = 1 Top = 960 Width = 2175 End Begin VB.TextBox ...

在窗体上画一个文本框,其名称为Text1,为了程序运行后隐藏该文本框,应使...
在窗体上画一个文本框,其名称为Text1,为了程序运行后隐藏该文本框,应使用  我来答 分享 微信扫一扫 网络繁忙请稍后重试 新浪微博 QQ空间 举报 浏览8 次 可选中1个或多个下面的关键词,搜索相关资料。也可直接点“搜索资料”搜索整个问题。 文本框 程序运行 窗体 名称 隐藏 搜索资料 本地图片 图片链接...

在窗体Form1上画一个文本框,名称为Text1,内空。再画一个命令按钮,名称...
新建窗体Form1,放置一个按钮Command1和一个文本框Text1 代码编写如下:Private Sub Command1_Click()Text1.Text = InputBox("请输入数值")End Sub

全国计算机二级vb考试内容全国计算机二级考试VB操作试题及答案_百度知 ...
(2)在名称为Forml的窗体上添加两个名称分别为Textl和Text2的文本框,初始内容均为空;再建立一个下拉菜单,菜单标题为“操作”,名称为M1,此菜单下含有两个菜单项,名称分别为Copy和Clear,标题分别为“复制”、“清除”,请编写适当的事件过程,使得在程序运行时,单击“复制”选项菜单,则把Textl中的内容复制到Text2...

关于VB的几道编程题 谢谢帮忙·
要求程序中不得使用任何变量。private sub command1_click()me.caption = text1.text & text2.text end sub 1-9:在名称为Form1的窗体上画一个标签(名称为Label1,标题为“输入信息”)、一个文本框(名称为Text1,Text属性为空白)和一个命令按钮(名称为Command1,标题为“显示”),如图1...

相似回答