vb.net做下拉菜单 vb下拉菜单代码

请问vb.net高手一个下拉菜单的问题

comboBox 、 赋值是什么意思。？里面的数据么。？ 属性的list添加 或者 Combo1Combo1.AddItem "XXXX"

相关问答

Q1: .net中怎么实现下拉框多选，然后获取选中的值

您可以选择使用CheckListBox控件。CheckListBox支持多选。

由于不清楚您用什么语言，所以我写了VB.net 、C#.net

vb.net Code

' Determine if there are any items checked.

If CheckedListBox1.CheckedItems.Count  0 Then

' If so, loop through all checked items and print results.

Dim x As Integer

Dim s As String = ""

For x = 0 To CheckedListBox1.CheckedItems.Count - 1

s = s  "Checked Item "  (x + 1).ToString  " = "  CheckedListBox1.CheckedItems(x).ToString  ControlChars.CrLf

Next x

MessageBox.Show(s)

End If

C#.net Code

// Determine if there are any items checked.

if(checkedListBox1.CheckedItems.Count != 0)

{

// If so, loop through all checked items and print results.

string s = "";

for(int x = 0; x = checkedListBox1.CheckedItems.Count - 1 ; x++)

{

s = s + "Checked Item " + (x+1).ToString() + " = " + checkedListBox1.CheckedItems[x].ToString() + "\n";

}

MessageBox.Show (s);

}

vb.net Code

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

Dim selectstr As String = ""

For i As Integer = 0 To Me.CheckedListBox1.Items.Count - 1

If Me.CheckedListBox1.GetItemChecked(i) Then

selectstr = Me.CheckedListBox1.Items(i).ToString

End If

Next

MsgBox(selectstr)

End Sub

希望能帮到您。

Q2: vb.net2010 menustrip控件下拉菜单属性

这就是普通vb.net做下拉菜单的菜单vb.net做下拉菜单，向上弹出vb.net做下拉菜单，还是向下弹出vb.net做下拉菜单，是操作系统自动判断vb.net做下拉菜单的（根据可视的空间区域大小）打勾，很简单，只要将菜单的CheckOnClick设为True就可以了

Q3: （高分悬赏）用vb.net 做个类似DateTimePicker控件的东西，有调整日期的下拉菜单，但是时间要会动的

继承一下DateTimePicker,内置个timer 不断刷新显示

得到焦点停止timer,失去焦点继续timer

把代码贴到项目就会多出一个控件vb.net做下拉菜单了

拖出来就能使用

显示格式可以自己设置

---------------------------------------------------------------------------------

''' summary

''' 自动更新vb.net做下拉菜单的 DateTimePacker

''' /summary

Public Class MyDateTimePacker

Inherits DateTimePicker

Public Sub New()

Me.components = New Container

Me.m_tmrUpdate = New Timer(Me.components)

Me.m_tmrUpdate.Interval = 1000

AddHandler Me.m_tmrUpdate.Tick, New EventHandler(AddressOf Me.m_tmrUpdate_Tick)

MyBase.Format = DateTimePickerFormat.Custom

MyBase.CustomFormat = "yyyy 年 MM 月 dd 日 hh:mm:ss"

End Sub

''' summary

''' 释放资源

''' /summary

Protected Overrides Sub Dispose(ByVal disposing As Boolean)

If (disposing AndAlso (Not Me.components Is Nothing)) Then

Me.components.Dispose

End If

MyBase.Dispose(disposing)

End Sub

Private Sub m_tmrUpdate_Tick(ByVal sender As Object, ByVal e As EventArgs)

MyBase.Value = DateTime.Now

End Sub

Protected Overrides Sub OnEnter(ByVal e As EventArgs)

If Me.AutoUpdateByFocu Then

Me.m_tmrUpdate.Stop

End If

MyBase.OnEnter(e)

End Sub

Protected Overrides Sub OnLeave(ByVal e As EventArgs)

If Me.AutoUpdateByFocu Then

Me.m_tmrUpdate.Start

End If

MyBase.OnLeave(e)

End Sub

' Properties

''' summary

''' 更新定时器状态

''' /summary

Public Property AutoUpdate As Boolean

Get

Return Me.m_tmrUpdate.Enabled

End Get

Set(ByVal value As Boolean)

Me.m_tmrUpdate.Enabled = value

End Set

End Property

''' summary

''' 根据焦点状态开始、停止更新定时器

''' /summary

DefaultValue(False) _

Public Property AutoUpdateByFocu As Boolean

Get

Set(ByVal value As Boolean)

End Property

''' summary

''' 组件容器

''' /summary

Private components As IContainer = Nothing

''' summary

''' 更新定时器

''' /summary

Private m_tmrUpdate As Timer

End Class

---------------------------------------------------------------------------------

(用C#写vb.net做下拉菜单的,然后反编译成VB.NET,有图有真相-.-真蛋疼,学C#吧...)

Q4: VB界面设计中下拉菜单的分隔条怎么做

可以在VB软件中的标准工程中创建

材料＼工具：带有VB软件电脑一台

1、启动VB6．0，创建一个标准工程。

2、在窗体上右键选择“菜单编辑器”

3、在弹出的“菜单编辑器”窗口中，输入标题和名称，在标题括号内用“”表示可以调出此功能，输入完毕，保存之后，就能在下面的显示区看见我们刚才编辑的菜单名称

4、在显示区中单击已经建好的菜单下面，再创建一个菜单

5、创建的菜单是否是原来新建的一级子菜单，或是二级子菜单，我们就可以通过编辑区上的方向键来实现

6、创建完毕后，确定即可，现在在窗体上就可以看见刚才我们创建的下拉菜单了

Q5: 请问vb.net中有支持多列显示的下拉框吗?

就用ComboBox，ComboBox由一个List和一个text组成，List里是一个个的对象有ValueMember和DisplayMember两个属性。你将DisplayMember属性改成usercode,username 即可。

vb.net做下拉菜单的介绍就聊到这里吧，感谢你花时间阅读本站内容，更多关于vb下拉菜单代码、vb.net做下拉菜单的信息别忘了在本站进行查找喔。