设为首页收藏本站Access中国

Office中国论坛/Access中国论坛

 找回密码
 注册

QQ登录

只需一步,快速开始

返回列表 发新帖
楼主: xinle
打印 上一主题 下一主题

[好东西]ActiveX 控件管理器!!!费了好大的劲才找到的汉化注册版!

[复制链接]
391#
发表于 2010-6-24 23:12:21 | 只看该作者
这个是什么,做什么用的
392#
发表于 2010-6-24 23:12:36 | 只看该作者
这个是什么,做什么用的
393#
发表于 2010-6-25 06:54:09 | 只看该作者
394#
发表于 2012-6-15 23:39:57 | 只看该作者
谢谢,看看好用不
395#
发表于 2011-6-16 22:11:51 | 只看该作者
神马打杀器啊?????
396#
发表于 2011-6-17 22:23:08 | 只看该作者
让窗体启动时,就展开是在FirstDraw事件中
Private Sub ctExplorerBar5_FirstDraw()   
ctExplorerBar5.TitleState(1) = 1   '第一分组展开
ctExplorerBar5.TitleState(2) = 1   '第二分组展开
******
End Sub



ItemClick事件中
ctExplorerBar5.TitleText(nList)   '分组名称
ctExplorerBar5.ItemText(nList, n)  '分组里小项名称

咱家是猫的例子中是这样:
Private Sub ctExplorerBar5_ItemClick(ByVal nList As Integer, ByVal n As Integer)
    If n <> 0 Then
    '提供这个接口,可以通过这里的判断响应不同的动作
   
        MsgBox "您选择的是: " & ctExplorerBar5.ItemText(nList, n)
    Else
       MsgBox "您选择的是: " & ctExplorerBar5.TitleText(nList)
   
    End If

End Sub
397#
发表于 2011-7-6 17:28:31 | 只看该作者
不错 赞一个
398#
发表于 2011-8-11 10:47:09 | 只看该作者
xxyy
399#
发表于 2010-12-28 12:01:40 | 只看该作者
好东东,谢谢

点击这里给我发消息

400#
发表于 2010-12-28 12:13:16 | 只看该作者
看看
您需要登录后才可以回帖 登录 | 注册

本版积分规则

QQ|站长邮箱|小黑屋|手机版|Office中国/Access中国 ( 粤ICP备10043721号-1 )  

GMT+8, 2024-5-29 01:06 , Processed in 0.090943 second(s), 34 queries .

Powered by Discuz! X3.3

© 2001-2017 Comsenz Inc.

快速回复 返回顶部 返回列表