DTWUJP(建平) '====改变treeview背景色函数申明====== Const TV_FIRST As Long = &H1100 Const TVM_SETBKCOLOR As Long = (TV_FIRST + 29) Private Declare Function SendMessage Lib "user32" _ Alias "SendMessageA" _ (ByVal hwnd As Long, _ ByVal wMsg As Long, _ ByVal wParam As Long, _ ByVal lParam As Long) As Long '=============================================== SendMessage tview.hwnd, ByVal TVM_SETBKCOLOR, 0, ByVal &HE0E0E0 '改变treeview背景色
'====改变treeview背景色函数申明======
Const TV_FIRST As Long = &H1100
Const TVM_SETBKCOLOR As Long = (TV_FIRST + 29)
Private Declare Function SendMessage Lib "user32" _
Alias "SendMessageA" _
(ByVal hwnd As Long, _
ByVal wMsg As Long, _
ByVal wParam As Long, _
ByVal lParam As Long) As Long
'===============================================
SendMessage tview.hwnd, ByVal TVM_SETBKCOLOR, 0, ByVal &HE0E0E0 '改变treeview背景色