Foxtable(狐表)用户栏目专家坐堂 → [求助]代码出错,帮改正一下


  共有8079人关注过本帖树形打印复制链接

主题:[求助]代码出错,帮改正一下

帅哥哟,离线,有人找我吗?
曈飞双燕
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:婴狐 帖子:17 积分:268 威望:0 精华:0 注册:2012/3/7 11:16:00
[求助]代码出错,帮改正一下  发帖心情 Post By:2012/5/23 11:15:00 [只看该作者]

在窗口中单击按键后执行的代码,出错,请帮修改,谢谢

 

Dim dr As DataRow
Dim C2 As WinForm.TextBox
C2 = e.Form.Controls("TextBox1")

dr = DataTables("注册内容").Find("用户名=e.Form.Controls("TextBox1") ") '找用户名为文本框TextBox1的用户

If dr IsNot Nothing Then '如果找到的话
    dr("真实姓名") = "一"


End If


 回到顶部
帅哥,在线噢!
狐狸爸爸
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:管理员 帖子:47497 积分:251403 威望:0 精华:91 注册:2008/6/17 17:14:00
  发帖心情 Post By:2012/5/23 11:32:00 [只看该作者]

Dim dr As DataRow
Dim C2 As WinForm.TextBox
C2 = e.Form.Controls("TextBox1")

dr = DataTables("注册内容").Find("用户名='" & c2.Value & "'")

If dr IsNot Nothing Then
     dr("真实姓名") = "一"

End If

 

建议看看:

http://www.foxtable.com/help/topics/1284.htm

 


 回到顶部