以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  [求助] 变量的引用比较 怎么写  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=105445)

--  作者:堕落的后天
--  发布时间:2017/8/19 15:47:00
--  [求助] 变量的引用比较 怎么写
我写了这样语句  但是变量怎么也行使不了 作用  

怎么可以将定义的变量  引用到比较里面,用于搜索.


(dt是我定义的变量,取得是Textbox1的当前值,来模糊查找用户权限表的满足行,从而定位)

Dim dt As String = e.Form.Controls("TextBox1").Text


With Tables("用户权限表")
    Dim r As Integer
    r = .FindRow("[用户名] =  dt")  \'  从第一行开始查找
    If     r >= 0 Then  \'如果找到的话
        .Position = r  \' 定位到找到的行.
        
    End If
    
End With



If   Tables("用户权限表").Current("密码") = "888"   Then
    PopMessage("送货单" & dt & "已由" & dt & "审核通过!")
Else
End If



--  作者:有点蓝
--  发布时间:2017/8/19 15:53:00
--  
r = .FindRow("[用户名] =  \'" & dt & "\'")


--  作者:堕落的后天
--  发布时间:2017/8/19 19:09:00
--  
谢谢