在仅包含数值的列中向DataTable添加字母

Question

问题：

  

如何允许DataTable中的列包含“仅数字值”＆＃39;或者只是字母＆＃39;

所以我正在为电影构建一个小型数据库/目录程序，我自然希望包含不同格式的区域（例如DVD区域1,2,3,4,0和蓝光区域A，B ，C，ABC）

我遇到的问题是当我尝试将蓝光区域添加到包含DVD区域的列时。

错误讯息：

快速概述，以便更好地理解：

添加表单

的DataGridView：

代码：

请注意，除非区域包含字母，否则此功能完全正常。

Dim data As New DataTable()

这个子程序是从另一个表单调用的，变量都在模块中声明为Public X As String：

Public Sub Addmovie()
    data.Rows.Add(AID, AShelf, ARow, ATitle, ADirector, ACountry, ALabel, AFormat, ARegion)
    DataGridView1.DataSource = data
End Sub

初始数据表填充：

Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
        Dim name As [String] = "Sheet1"
        Dim constr As [String] = "Provider=Microsoft.ACE.OLEDB.12.0;Data Source=" + My.Settings.MSdbactive + ";Extended Properties='Excel 8.0;HDR=YES;';"

        Dim con As New OleDb.OleDbConnection(constr)
        Dim oconn As New OleDbCommand("Select * From [" + name + "$]", con)
        con.Open()

        Dim sda As New OleDbDataAdapter(oconn)
        sda.Fill(data)

        DataGridView1.DataSource = data

End Sub