Foxtable(狐表)用户栏目专家坐堂 → 帮忙修改一下代码


  共有5005人关注过本帖平板打印复制链接

主题:帮忙修改一下代码

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


加好友 发短信
等级:幼狐 帖子:171 积分:1292 威望:0 精华:0 注册:2011/8/17 21:12:00
帮忙修改一下代码  发帖心情 Post By:2013/5/1 23:13:00 [只看该作者]

我想在窗口的一个文本框中输入会员编号,点击按纽后姓名、姓别、年龄等能够自动从会员表中填充到窗口的其它几个文本框中,我写的这个肯定不对,帮忙修改一下

Dim wybh As WinForm.TextBox = e.Form.Controls("TextBox1").Text
If DataTables("会员表").DataRows("会员编号") = wybh Then
   
    Dim f As New Filler
    f.SourceTable = DataTables("会员表") 
    f.SourceCols = "会员姓名,性别,年龄,联系电话”
    f.DataTable = DataTables("会员见面表") 
    f.DataCols = "姓名,姓别,年龄,联系电话" 
    f.Fill() '填充
End If


 回到顶部