请教,如何设置使得ListView能够一次选择整行记录
在VC中对ListCtrl可以调用SetExtendedStyle函数制定LVS_EX_FULLROWSELECT 做到上面这点,但在VB中没有找到相关函数和属性,请教各位,先谢了 问题点数：50、回复次数：4Top
1 楼tmd007（学而时习之，不亦乐乎。姓菜名了字灌之号蹭之。）回复于 2006-03-18 18:31:00 得分 0
ListView1.FullRowSelect = TrueTop
2 楼vansoft（Vansoft Workroom）回复于 2006-03-18 18:39:22 得分 0
右击Listview控件，
选择属性菜单。
整行选择 前打上勾就行了。Top
3 楼xDAVIDx（DAVID）回复于 2006-03-18 19:40:45 得分 50
这个要看你用的是哪个版本的ListView了,如果是6.0版本的则如上面两位所说.如果是5.0版本的ListView,则需要写代码设置,具体如下:
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 Const LVM_FIRST As Long = &H1000
Private Const LVM_SETEXTENDEDLISTVIEWSTYLE As Long = LVM_FIRST + 54
Private Const LVM_GETEXTENDEDLISTVIEWSTYLE As Long = LVM_FIRST + 55
Private Const LVS_EX_FULLROWSELECT As Long = &H20
Public Function LVSetStyleEx(lv As ListView, ByVal NewStyle As LVStylesEx, ByVal NewVal As Boolean) As Boolean
Dim nStyle As Long
' get the current ListView style
nStyle = SendMessage(lv.hWnd, LVM_GETEXTENDEDLISTVIEWSTYLE, 0&, ByVal 0&)
If NewVal Then
' set the extended style bit
nStyle = nStyle Or NewStyle
Else
' remove the extended style bit
nStyle = nStyle Xor NewStyle
End If
' set the new ListView style
LVSetStyleEx = CBool(SendMessage(lv.hWnd, LVM_SETEXTENDEDLISTVIEWSTYLE, 0&, ByVal nStyle))
End FunctionTop
4 楼laokhao（Liming）回复于 2006-03-20 08:03:05 得分 0
多谢xDAVIDx(DAVID)
我用的是5.0版的,6.0版的那么简单也就不会上来问了,多谢几位Top
相关问题
- 隐藏EXCEL的整行的记录
- dataGrid控件选择整行记录问题
- 谁知道怎么能让listview或listctrl能被整行选择?
- 如何使listview （report型）能够实现整行选择
- 如何实现ListView 选取整行，而不是第一列
- 请教各位兄弟：如何实现在 ListView 的 vsReport 中选中一整行？
- ListView,怎么动态地改变一个ListItem一整行的背景色？
- 【问】如何让ListView单击选择整行？（包含一行里的所有列）
- 请教：MsHFlexGrid控件 我想在我选中一个单元格的时候 选择整行记录？
- 在listview中使用整行选择,单击时选择整行,双击时要选中鼠标所点击的那个单元格
关键词
得分解答快速导航
相关链接
广告也精彩
反馈
