如何实现DataGrid单击后被选中单元格所在行改变颜色
编号：QA003881
建立日期: 2001年2月15日 最后修改日期：2001年2月15日
所属类别：
fm:
如何实现单击后被选中单元格所在行改变颜色，并弹出消息框，显示被选中单元格的内容？类似问题：如何实现双击后立即跳出一对话框？
回答:
1、DataGrid控件本身不可能做到象你提到的这种功能。
2、在窗口的DataGrid控件上单击，在弹出菜单上选“折分“页的”记录选择器“每行前有个指示器，击指示器可选中该行。
3、这是个笨方法
（A）在单击事件中取（li_count=DataGrid1.Columns.Count）表总列数。
（B）动态生成一个文本框控件数组(TEXT[li_count]，（最好用LABEL控件， 将其设为透时的也可。）修改每个元素以下属性：APPEARANCE设为0-FLAT， BORDERSTYLE为0-NONE，VISIBLE设为FALSE。
（C）在ROWCOLCHANGE事件中取（DataGrid1.Columns(第几列).Text）各列的值赋 给控件数组，并改控件数组的背景为你想要的颜色。（用LABEL可略此步）
（D）DataGrid1.Columns(0).Left取第一列的左边界， DataGrid1.Columns(0).TOP 取第一列的上边界，
DataGrid1.Columns(0).width
DataGrid1.Columns(0).height 赋给应放在当前行的文本控件的相应属性。
（E）设所有控件是可见的。
4、显示所选中的数据。在DATAGRID1的ROWCOLCHANGE事件中
dim li_data as string
dim li_col as integer
li_col =datagrid1.col
li_data=DataGrid1.Columns(li_col).Text
li_col=msgbox(li_data,vbOKOnly)
5.双击显示对话框
(a)在窗口中放MS common Dialog control 6.0控件
(b)在DATAGRID控件的双击中写
CommonDialog1.ShowOpen可以显示打开文件对话框。
相关问题：
QA000639 "在DBGrid中使满足条件的记录的某一行(列)变色"
此问题由谢中辉回答。
| |
|
|
| |
|
|
