仅在D盘根目录上新建dbf文件时报错

仅在D盘根目录下新建dbf文件时报错我写了一个新建dbf的小程序,指定新建的dbf路径在其他目录或C盘根目录都

仅在D盘根目录下新建dbf文件时报错
我写了一个新建dbf的小程序,指定新建的dbf路径在其他目录或C盘根目录都可以成功,但是偏偏在D盘根目录就报错,提示表Barcode#dbf已存在。也不知道这个#号是怎么回事,分明是Barcode.dbf,却提示Barcode#dbf,哪位知道原因

附原代码:
If objDailog.ShowDialog() = DialogResult.OK Then

            Me.TextBox1.Text = Path.Combine(objDailog.SelectedPath, "Barcode.dbf")

            File.Copy("D:\Temp\Barcode_Blank.dbf", Me.TextBox1.Text, True)

            ' 去掉只读属性
            SetAttr(Me.TextBox1.Text, FileAttribute.Normal)

            'dbf文件操作            
            Dim objDbfconn As OleDb.OleDbConnection = New OleDb.OleDbConnection
            Dim strFilePath As String = ""
            Dim strFileName As String = ""
            strFileName = Me.TextBox1.Text
            strFilePath = strFileName.Substring(0, strFileName.LastIndexOf("") + 1)

            objDbfconn.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & strFilePath & ";Extended Properties=dBASE 5.0;User ID=;Password=;"

            Dim DbfCmd As OleDb.OleDbCommand = objDbfconn.CreateCommand()
            objDbfconn.Open()
            File.Delete(strFileName)
            DbfCmd.CommandText = " CREATE TABLE " & strFileName & "(ITEM VARCHAR(30),BARCODE VARCHAR(16),COSC VARCHAR(16),PRICE VARCHAR(16),PHOTO1 VARCHAR(100),PHOTO2 VARCHAR(100))"
            DbfCmd.ExecuteNonQuery()

            objDbfconn.Close()

          
        End If

[解决办法]
检查一下 objDailog.SelectedPath,strFileName,strFilePath 的值。
是否出现了没有斜杠的 "D:" 路径,这样表示当前目录而不是根目录。
[解决办法]
检查一下Me.TextBox1.Text 内容是什么