VB中如何设置下拉列表框,并加入我想选择的内容，求高手解答
如果想加入固定不，可以下拉列的List属性，逐个加入（按Ctrl+Enter）换如果是动态的用以下代码：Combo1.ClearCombo1.Additem 你要添加的内容 '如果多条，可以对这条语句进行循环操作
VB和单片机串口通信
下面是我做的一个测试程序：'TextReceive =' 初始化程序：主要完成对串口的设置，包括选择串口、设置波特率、设置数据格式、打开串口等。
' 注意：在程序开始之前，必须清空发送和接收缓冲区，以免出错。
Private Sub Form_Load() MSComm1.Settings = 9600,n,8,1 ' 设置波特率和发送字符格式 MSComm1.CommPort = 1 ' 设置通讯串口 MSComm1.InputLen = 0 ' 设置或返回一次从接收缓冲区中读取字节数，0表示一次读取所有数据 MSComm1.InBufferSize = 2 ' 设置接收缓冲区2Byte MSComm1.InBufferCount = 0 MSComm1.OutBufferSize = 2 ' 设置发送缓冲区2Byte MSComm1.OutBufferCount = 0 MSComm1.RThreshold = 1 ' 每个字符到接收缓冲区都触发接收事件 MSComm1.SThreshold = 1 MSComm1.InputMode = comInputModeBinary '采用二进制传输 MSComm1.PortOpen = True ' 打开串口End SubPrivate Sub Command1_Click()Dim number As IntegerDim outbyte(0) As Bytenumber = Val(170)outbyte(0) = CByte(number)MSComm1.Output = outbyteLabel4 = outbyte(0)Print outbyte(0)End Sub
VB下拉框怎么添加选项
Private Sub Form_Load() '窗体加载中添加选项i=你要添加的选项Combo.AddItem i '也可以直接在这后面添加，如果要添加多行的话可以再写一个End Sub例如添加1~10这10个数Private Sub Form_Load() '这里是用到循环Dim i As IntegerFor i = 1 To 10Combo2.AddItem iNext iEnd Sub
求vb两级下拉框代码
这里有一个js的多级联动下拉菜单可以自定义位置和样式 比较实用里面有教程和源码
