protected overrides sub onmousemove(byval e as system.windows.forms.mouseeventargs)
dim hti as datagrid.hittestinfo = me.hittest(new point(e.x, e.y))
'如果鼠标事件类型为改变列宽则返回
if hti.type = datagrid.hittesttype.columnresize then
cursor.current = cursors.default
return
end if
mybase.onmousemove(e)
end sub
end class
