Foxtable(狐表)用户栏目专家坐堂 → [求助]关于副表关联窗体控件的问题,一样的代码上个版本程序没有问题


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

主题:[求助]关于副表关联窗体控件的问题,一样的代码上个版本程序没有问题

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


加好友 发短信
等级:二尾狐 帖子:530 积分:4520 威望:0 精华:0 注册:2013/4/27 22:20:00
[求助]关于副表关联窗体控件的问题,一样的代码上个版本程序没有问题  发帖心情 Post By:2013/12/6 11:30:00 [显示全部帖子]

各位老师帮我看下问题,谢谢了

 

首先在窗体 AfterLoad

Dim cmd As New SQLCommand
cmd.C
DataTables("费用单_Table1").fill("Select * From {FYD} where 1=0","YZSJ",False)
Tables("费用单_Table1").AllowEdit = False
Tables("费用单_Table1").DataTable.SysStyles("EmptyArea").BackColor=Color.White
e.form.Controls("TextBox1").BindingField = "费用单_Table1.FYDH"
e.Form.Controls("DateTimePicker1").BindingField = "费用单_Table1.RQ"

 

然后一个按钮的代码

Tables("费用单_Table1").AllowEdit = True
Tables("费用单_Table1").AddNew
Tables("费用单_Table1").Current("FYDH")="ZBCDZ"
Tables("费用单_Table1").Current("RQ")=Date.Today

 

这样的话我初始化的内容不会出来

 

Tables("费用单_Table1").AllowEdit = True
Tables("费用单_Table1").AddNew
e.Form.Controls("DateTimePicker1").value=Date.Today
e.Form.Controls("TextBox1").value="ZBCDZ"

这样的话初始值出来了,去Table1查看又没有内容

 

我上一个版本一样的代码都没问题,万分感谢


[此贴子已经被作者于2013-12-6 11:31:31编辑过]

 回到顶部
帅哥哟,离线,有人找我吗?
zhengboxin
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:二尾狐 帖子:530 积分:4520 威望:0 精华:0 注册:2013/4/27 22:20:00
  发帖心情 Post By:2013/12/6 12:25:00 [显示全部帖子]

我知道,现在就是对的反而出不来,我等下上个例子

 回到顶部