在VB.NET中，比较两个数据表的写法通常涉及使用循环遍历表中的行和列，然后逐个比较相应的数据。以下是一种可能的解决方法的代码示例：

' 假设有两个数据表 dt1 和 dt2
Dim dt1 As New DataTable()
Dim dt2 As New DataTable()

' 假设两个表都有相同的结构和列名

' 在这里填充 dt1 和 dt2 数据

' 比较两个表中的数据
If dt1.Rows.Count = dt2.Rows.Count AndAlso dt1.Columns.Count = dt2.Columns.Count Then
    For i As Integer = 0 To dt1.Rows.Count - 1
        For j As Integer = 0 To dt1.Columns.Count - 1
            ' 逐个比较数据
            If dt1.Rows(i)(j).ToString() <> dt2.Rows(i)(j).ToString() Then
                ' 数据不相等，执行相应的操作
                Console.WriteLine("数据不相等的位置：行 {0} 列 {1}", i, j)
            End If
        Next
    Next
Else
    ' 表结构不一致，执行相应的操作
    Console.WriteLine("表结构不一致")
End If

上述代码首先比较了两个数据表的行数和列数是否相等，如果相等，则通过双重循环逐个比较对应位置的数据。如果数据不相等，则可以执行相应的操作，如输出不相等的位置。如果表结构不一致，则也可以执行相应的操作。

请注意，上述代码仅提供了一种基本的比较方法，如果数据表中包含复杂的数据类型或需要进行更复杂的比较逻辑，可能需要根据具体情况进行修改。