我想对VB6的DataGrid1要这个效果,如果有其它的方法更好。
VB6程序中有一个DataGrid,虽然已经对DataGrid属性设定了对DataGrid不能编辑,但不能阻止用户用鼠标点黑三角,致使这行变成反显色。
即点command1后,用户不能使用鼠标对DataGrid操作(主要是包括黑三角),但此时查询等,DataGrid还是可显示的。点command2后,除了DataGrid不能编辑外,其它可以,包括点黑三角等。
想了一个笨办法,在点command1后,DataGrid上产生一个无色透明的label,点command2后,label隐藏。
但如何使label浮于DataGrid之上,如能实现,请各位帮忙了?
[解决办法]
本帖最后由 bcrun 于 2012-09-19 11:19:44 编辑
Private Sub Command1_Click()
datagrid1.RecordSelectors = False
End Sub
Private Sub Command2_Click()
datagrid1.RecordSelectors = True
End Sub