如何在select case语句中包含数字和字符串

时间:2013-06-25 23:40:20

标签: vb.net datagridview select-case

我正试图找到一种方法,只允许用户在我的datagridviewcell中输入“.32”或“Not Used”。现在我的代码如下所示。当我运行代码时,它所做的就是将所有内容更改为“未使用”。即使我输入“.32”,它也会将其更改为“未使用”。有没有什么办法解决这一问题?我感谢任何人给予的任何帮助或建议。

If (e.ColumnIndex = 6) Then ' This specifies the column number
        Dim cellData = DataGridView1.Rows(e.RowIndex).Cells(e.ColumnIndex).Value.ToString
        If cellData Is Nothing OrElse IsDBNull(cellData) OrElse cellData.ToString = String.Empty Then
            MessageBox.Show("Cannot Be Empty") ' This will prevent blank datagridviewcells
            DataGridView1.Rows(e.RowIndex).Cells(e.ColumnIndex).Value = "Not Used"
        End If

        Select Case cellData
            Case 0.32
                DataGridViewSize.Rows(e.RowIndex).Cells(e.ColumnIndex).Value = 0.32
            Case Else
                DataGridViewSize.Rows(e.RowIndex).Cells(e.ColumnIndex).Value = "Not Used"
        End Select
    End If

1 个答案:

答案 0 :(得分:0)

我认为没有必要使用选择字符串

最好更改为Dim cellData = DataGridView1.Rows(e.RowIndex).Cells(e.ColumnIndex).Value