ديتا گريد ويو و مقدار عددي

دوستان سلام
توي ديتا گريد يه ستوني هست كه كاربر در آن بايد كد وارد كند چكار كنم كه در آن ستون كاربر فقط بتواند مقدار عددي وارد كند
ممنون

ابتدا دستور زیر رو در بالای فرم تعریف کنید

FriendWithEvents txt_dgv AsNew DataGridViewTextBoxEditingControl

سپش در رویداد EditingControlShowing مربوط به دیتا گرید دستور زیر را بنویسید

PrivateSub DGV1_EditingControlShowing(ByVal sender AsObject, ByVal e As System.Windows.Forms.DataGridViewEditingControlSho  wingEventArgs) Handles DGV1.EditingControlShowing

txt_dgv = e.Control

EndSub

حالا شما میتونید مقدار سلولها رو بررسی کنید مانند خاصیت KeyDown ,KeyPress
به عنوان مثال اگر میخواهید ستون 1 رو کنترل کنید از دستور زیر استفاده کنید

PrivateSub txt_dgv_KeyPress(ByVal sender AsObject, ByVal e As System.Windows.Forms.KeyPressEventArgs) Handles txt_dgv.KeyPress

If DGV1.CurrentCell.ColumnIndex = 1 Then

IfChar.IsNumber(e.KeyChar) = FalseThen

e.Handled = True

EndIf

If e.KeyChar = (vbBack) Then

e.Handled = False

EndIf

If e.KeyChar = (vbTab) Then

e.Handled = False

EndIf

EndIf

با سلام
دوست من اگه يه كمبو باكس توي گريد باشه اين كد خطار مي دهد چطور اونو كنترل كنم

Private Sub Dgv_EditingControlShowing(ByVal sender As Object, ByVal e As System.Windows.Forms.DataGridViewEditingControlSho  wingEventArgs) Handles Dgv.EditingControlShowing

        txt_Dgv = e.Control

    End Sub