datagrid控件的光标问题!!

antimicrosoft 2002-09-04 10:47:36

源代码如下:
Private Sub DataGrid1_Keyup(KeyCode As Integer, Shift As Integer)
If KeyCode = 13 Then
SendKeys "{right}"
End If
End Sub

在应用中按enter键可以转移到下一个单元格,可是没有办法看见光标,有什么办法可以使光标出现呢???

...全文

100 7 打赏收藏转发到动态举报

写回复

用AI写文章

7 条回复

切换为时间正序

请发表友善的回复…

发表回复

chanet 2002-09-05

打赏
举报

试下用循环, for i=0 to col

antimicrosoft 2002-09-05

打赏
举报

运行该程序的时候,按坐或右键,光标会左右单元格移动,可是按回车键之后缺无法看见光标闪烁,这是为什么呢?可不可以使光标重新出现!!

antimicrosoft 2002-09-05

打赏
举报

运行该程序的时候,按坐或右键,光标会左右单元格移动,可是按回车键之后缺无法看见光标闪烁,这是为什么呢?可不可以使光标重新出现!!

antimicrosoft 2002-09-05

打赏
举报

运行该程序的时候,按坐或右键,光标会左右单元格移动,可是按回车键之后缺无法看见光标闪烁,这是为什么呢?可不可以使光标重新出现!!

lllqe 2002-09-05

打赏
举报

在datagrid 的RowColChange事件中
cur_col=datagrid1.col
在keypress中
Static i As Integer
i = 0
If KeyAscii = 13 Then
If i < cur_col + 1 Then
i = i + 1
SendKeys "{right}"
Else
i = i - 1
SendKeys "{down}"
End If
End If

griefforme 2002-09-04