说三道四技术文摘-感悟人生的经典句子
说三道四 > 文档快照

放一个Combo到Toolbar中 -VB资料

HTML文档下载 WORD文档下载 PDF文档下载
放一个Combo到Toolbar中 -VB资料
1. 放一个 ComboBox 到表单.
2. 放一个 Toolbar?在表单.
3. 增加下面的代码到 Form1 :
Private Sub Form_Load()
Dim btn As Button
Me.Show
Set btn = Toolbar1.Buttons.Add()
btn.Style = tbrSeparator
Set btn = Toolbar1.Buttons.Add()
btn.Style = tbrPlaceholder
btn.Key = "ComboBox"
btn.Width = 2000
With Combo1
.ZOrder 0
.Width = Toolbar1.Buttons("ComboBox").Width
.Top = Toolbar1.Buttons("ComboBox").Top
.Left = Toolbar1.Buttons("ComboBox").Left
End With
End Sub



备案号:鲁ICP备13029499号-2 说三道四 www.s3d4.cn 说三道四技术文摘