首页 >> 读书频道 >> 电脑 >> ToolBar上加ComboBox
 
· 使两个ListBox项目
· 如何动态设定TextBo
· 使TextBox按Mou
· AutoRedraw与I
· TextBox中文字如何
· 确定谁引发Lostfoc
· 创建无 Icon 的窗口
· VB.NET面向对象的实
· VB.NET面向对象的实
· VB.NET面向对象的实
· VB.NET面向对象的实
· VB.NET面向对象的实
 
· 电视剧《刁蛮公主》下载和
· 美容养颜手册
· 加油金顺剧情分集介绍完整
· 红楼梦:120回全本[清
· 素质教育在美国
· 全唐诗卷四十六
· 韩剧《布拉格恋人》剧情介
· 夜航船[作者:明·张岱]
· 局外人[作者:韩·可爱淘
· 现场流行病学
· 源氏物语[日本:紫式部]
· 武林寓言故事
 
· (出租)中动商场部分及写
· (出租)中动动漫基地&#
· 喜剧学院
· 《善德女王》剧情介绍
· 魔女18号 剧情
· 丑女无敌剧情介绍
· 魔女幼熙剧情介绍
· 龙游天下剧情介绍
· 震撼世界的七日剧情介绍
· 静静的白桦林剧情介绍
· 心情日记—老公今天我想对
· 旗舰剧情介绍
欢迎来到月影社区!如果您觉得这里不错,请推荐给您的朋友们。月影社区:http://wf66.com/

ToolBar上加ComboBox


查看有无更新版本

关键字:VB 2006-9-18

 

其实不只是ComboBox,其他的Control项也可以加入
' Need a Combox, Toolbar
Private Sub Form_load()
Dim btn As Button
Combo1.AddItem "Item1"
Combo1.AddItem "Item2"
Combo1.AddItem "Item3"
Combo1.Text = "Item1"
Me.Show
Set btn = Toolbar1.Buttons.Add()
btn.Style = tbrSeparator
Set btn = Toolbar1.Buttons.Add()
btn.Style = tbrPlaceholder
btn.Key = "ComboBox"
btn.Width = 1000

Set btn = Toolbar1.Buttons.Add
btn.Style = tbrDefault

Set btn = Toolbar1.Buttons.Add
btn.Style = tbrDefault


With Combo1
    Set .Container = Toolbar1
    .ZOrder 0
    .Width = Toolbar1.Buttons("ComboBox").Width
    .Top = Toolbar1.Buttons("ComboBox").Top
    .Left = Toolbar1.Buttons("ComboBox").Left
End With
Combo1.Visible = True

End Sub


ToolBar上加ComboBox

[ 1 ]
ToolBar上加ComboBox num

打印本页 关闭

关于我们版权声明本站导航友情连结作品演示 TOP↑