主题：重新用个机子装了FT，ACC，用FT的代码操作不了ACC，请大神看看。

此主题相关图片如下：未命名.png

我有MSG测了一下出现以下提示：

Dim qq As WinForm.TextBox = e.Form.Controls("TextBox1")
If qq.text<> "" Then
    Dim cmd1 As New SQLCommand
    Dim dt1 As DataTable
    cmd1.C
    cmd1.CommandText = "Select * From {入库草稿表}"
    dt1 = cmd1.ExecuteReader(True)
    Dim dr1 As DataRow= dt1.find("[入库单号]= '" & qq.text & "'")
MessageBox.Show(dr1("交货单号"))
    If dr1 IsNot Nothing Then
        MessageBox.Show("单号重复!","提示")
        qq.text= ""
        qq.Select
    End If
End If

此主题相关图片如下：无标题.bmp

出现什么提示?

重新编辑过了，给看看，哪里有问题了，。。。谢谢

检查一下你文本框 的 LEAVE事件

我就换了一台新机子，以前用的ACC2000的数据库，现在装的ACC2003的，以前代码没有问题可以找到重复的单号，现在是重复的也不提示错误了。

检查一下你文本框 的 LEAVE事件  或者例子发上来看看.

谢谢BIN，是BUG，搞定，谢谢