主题：求助 find为毛没有找到符合条件行

下列代码写在窗口按钮，我登陆表Name列已有我计算机名字段，但find没有找到符合条件行，请问代码问题在那里，谢谢。这段代码目的是参照帮助文件监视器，保存当前计算机扫描仪路径。

'Dim txt1  As String = e.Form.Controls("TextBox1").text
Dim HostName As String
HostName = System.Net.Dns.GetHostName   '获得本机的机器名
Dim dr As DataRow
Dim Index As Integer
dr = DataTables("登录").Find("[Name] = '" & HostName & "'")
Index = Tables("登录").FindRow(dr)
If Index > = 1 Then
    Output.Show("找到了")
             ' 启动扫描仪   
Else
    Output.Show("没有找到")

              '提示写入扫描仪路径C:\Windows\twain_32\escndv\escndv.exe
              'Dim drv As dataRow = dataTables("登录").AddNew()
              'drv("Name") = HostName
              'drv("路径") = txt1
End If

这样测试一下

Dim HostName As String
HostName = System.Net.Dns.GetHostName   '获得本机的机器名
Dim dr As DataRow
dr = DataTables("登录").Find("[Name] = '" & HostName & "'")
msgbox("[Name] = '" & HostName & "'")
msgbox(dr Is Nothing)
If dr IsNot Nothing Then
    Output.Show("找到了")
    ' 启动扫描仪
Else
    Output.Show("没有找到")
End If