Private Sub DataGrid1_BeforeColUpdate(ByVal ColIndex As Integer, OldValue As Variant, Cancel As Integer)End SubPrivate Sub DataGrid1_BeforeUpdate(Cancel As Integer)End Sub用這兩個應該可以解決問題,具體的怎麼作,自己琢磨
调试欢乐多
或: if val(x)=x then x是数值