<DllImport("user32.dll", EntryPoint := "SetCursorPos")> _ Public Function SetCursorPos(x As Integer, y As Integer) As Boolean
End Function
调用代码
Dim t As Table = Tables("表A") Dim rc As C1FlexGrid.CellRange = t.grid.Selection Dim cellrect As System.Drawing.Rectangle = t.grid.RectangleToScreen(t.grid.GetCellRect(rc.r1,rc.c1)) SetCursorPos(cellrect.x, cellrect.y)