我想改变Treeview背景色

renzhennan 2004-04-30 03:13:36
如题
...全文
50 4 点赞 打赏 收藏 举报
写回复
4 条回复
切换为时间正序
当前发帖距今超过3年,不再开放新的回复
发表回复
ryuginka 2004-04-30
up
  • 打赏
  • 举报
回复
supergreenbean 2004-04-30
Private Const TV_FIRST = &H1100
Private Const TVM_SETBKCOLOR = (TV_FIRST + 29)
Private Declare Function SendMessage Lib "user32" Alias "SendMessageA" (ByVal hwnd As Long, ByVal wMsg As Long, ByVal wParam As Long, lParam As Any) As Long

Private Sub Form_Load()
Call SetTreeViewBkColor(TreeView1.hwnd, RGB(100, 0, 100))
End Sub

Sub SetTreeViewBkColor(ByVal hTVWnd As Long, ByVal clr As Long)
SendMessage hTVWnd, TVM_SETBKCOLOR, 0, ByVal clr
End Sub
  • 打赏
  • 举报
回复
renzhennan 2004-04-30
jianeng310@sina.com
thanks
  • 打赏
  • 举报
回复
相关推荐
发帖
VB基础类
加入

7545

社区成员

VB 基础类
申请成为版主
帖子事件
创建了帖子
2004-04-30 03:13
社区公告
暂无公告