DataGridview에서 영숫자 텍스트를 허용하지만 음수는 제외하는 방법

Question

내 datagridview 열에는 영숫자 입력 만 허용하려고합니다. 영숫자 입력을 허용하고 사용자가 음수를 입력하거나 셀을 비워 둘 수 없게하는 방법이 있습니까? 누구든지 제안이나 답변을 가지고 있다면 크게 감사하겠습니다! :) 내 코드는 다음과 같습니다. 이미 음수 및 빈 셀 검증이 작동하지만 비 숫자 입력을 허용하지 않습니다.

If (e.ColumnIndex = 0) Then 'checking value for column 1 only 
     Dim cellData = DataGridView1.Rows(e.RowIndex).Cells(e.ColumnIndex).Value 
     If cellData Is Nothing OrElse IsDBNull(cellData) OrElse cellData.ToString = String.Empty Then ' This will prevent any blank cells 
      MessageBox.Show("Name Cannot Be Empty") 
      DataGridView1.Rows(e.RowIndex).Cells(e.ColumnIndex).Value = "Object" ' This is a default value that I want to supply after the message box 
     ElseIf cellData < 0 Then 
      MessageBox.Show("Negative Numbers Not Allowed") 'This prevents negative numbers 
      DataGridView1.Rows(e.RowIndex).Cells(e.ColumnIndex).Value = "Object" 
      Exit Sub ' Again this a default value I want supplied back to the datagridivewcell 



     End If 
    End If 

아무런 숫자가 아닌 문자를 입력 할 때를 제외하고 내 코드가 작동하므로 프로그램이 중지되고 종료됩니다. 이 같은 TryParse를 사용

Answer 1

시도 :

If (e.ColumnIndex = 0) Then 'checking value for column 1 only 
     Dim cellValue As Integer 
     If (Int32.TryParse(DataGridView1.Rows(e.RowIndex).Cells(e.ColumnIndex).Value, cellValue)) Then 
      If cellValue < 0 Then 
       MessageBox.Show("Negative Numbers Not Allowed") 'This prevents negative numbers 
       DataGridView1.Rows(e.RowIndex).Cells(e.ColumnIndex).Value = "Object" 
       Exit Sub ' Again this a default value I want supplied back to the datagridivewcell 
      End If 
     Else 
      Dim testValue As String = DataGridView1.Rows(e.RowIndex).Cells(e.ColumnIndex).Value 
      If (String.IsNullOrEmpty(testValue)) Then 
       MessageBox.Show("Name Cannot Be Empty") 
      DataGridView1.Rows(e.RowIndex).Cells(e.ColumnIndex).Value = "Object" ' This is a default value that I want to supply after the message box 
      End If 
     End If 

    End If