Ok, I've narrowed my code down to just figuring out the SQL statement. Now I just need to figure out the syntax of selecting one of each version while keeping all the columns. I will open a new post, seeing how it's a completely different question, but in case you still want to help I will post it here on this thread too. Here is my updated code:

Code:
Dim ofd As New OpenFileDialog
        With ofd
            .Filter = "DBASE File (*.dbf)|*.dbf"
            .Multiselect = False
            .CheckFileExists = True
        End With

        If ofd.ShowDialog() = DialogResult.OK Then
            Dim fi As New IO.FileInfo(ofd.FileName)
            Dim cn As New OleDb.OleDbConnection("Provider=Microsoft.Jet.OLEDB.4.0;Extended Properties=dBase IV;Data Source='" _
                                                & fi.DirectoryName & "'")
            Dim TableName As String = fi.Name.Substring(0, fi.Name.Length - fi.Extension.Length)
            Dim cmd As New OleDb.OleDbCommand(TableName, cn)
            cmd.CommandType = CommandType.TableDirect

            cn.Open()
            Dim rdr As OleDb.OleDbDataReader = cmd.ExecuteReader
            dt.Load(rdr)

            SelectField.ShowDialog()


            Dim dBaseConnection As New System.Data.OleDb.OleDbConnection(“Provider=Microsoft.Jet.OLEDB.4.0;” & “Data Source=” & path & “;” & “Extended Properties=dBase IV”)

            dBaseConnection.Open()

            Dim SQLCreateCommand As String

            Dim sql2 = "SELECT DISTINCT " & Field1 & " INTO NewTable " & " from " & TableName

            Dim dBaseCommand As New System.Data.OleDb.OleDbCommand(sql2, dBaseConnection)

            dBaseCommand.ExecuteNonQuery()
            dBaseConnection.Close()

            cn.Close()
            cn.Dispose()
        End If