关于toolbar的表示!!!

Depress 2003-12-25 08:31:05
在编程的时候如何单独表示Toolbar工具条的第一个按钮。
...全文
126 3 打赏 收藏 转发到动态 举报
写回复
用AI写文章
3 条回复
切换为时间正序
请发表友善的回复…
发表回复
pcwak 2003-12-25
  • 打赏
  • 举报
回复
Private Sub Toolbar1_ButtonClick(ByVal Button As MSComctlLib.Button)
Select Case Button.Index
Case 1
MsgBox Button.Index
Case 2
MsgBox Button.Index
End Select
End Sub
northwolves 2003-12-25
  • 打赏
  • 举报
回复
Private Sub Command1_Click()
MsgBox Toolbar1.Buttons(1).Caption ‘。。。。。。。。。。like this
End Sub

Private Sub Form_Load()
For i = 1 To 5
Toolbar1.Buttons.Add i, Chr(64 + i), Chr(64 + i)
Next
End Sub
felix 2003-12-25
  • 打赏
  • 举报
回复
Toolbar1.Buttons(0)

7,759

社区成员

发帖
与我相关
我的任务
社区描述
VB 基础类
社区管理员
  • VB基础类社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧