Private Sub DataGrid1_AfterColEdit(ByVal ColIndex As Integer)End SubPrivate Sub DataGrid1_Change()End SubPrivate Sub DataGrid1_RowColChange(LastRow As Variant, ByVal LastCol As Integer)End Sub 在这些事件里面还不能记录原值和判断当前值??
先把那一列数据保存起来。然后判断输入,譬如只能输入数字 if IsNumeric(...) ...//replace else ...//recover endif
在这些事件里面还不能记录原值和判断当前值??
if IsNumeric(...)
...//replace
else
...//recover
endif