以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  [求助]求将文本控件的值赋给表内某列的代码!  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=100146)

--  作者:pladic
--  发布时间:2017/5/5 15:08:00
--  [求助]求将文本控件的值赋给表内某列的代码!
A表为父表,B表为子表,RKC为窗口内的一个文本控件。
需求:

在保存A表时,在B表内增加一行;
把字符型变量RKC的内容,赋值给B表的“入口词”列。

怎样写代码?

--  作者:有点色
--  发布时间:2017/5/5 15:10:00
--  

Dim nr As Row = Tables("子表").addNew

nr("入口词") = forms("窗口1").Controls("TextBox1").Text


--  作者:pladic
--  发布时间:2017/5/5 15:55:00
--  回复:(有点色)Dim nr As Row = Tables("子表").add...
谢谢!上述问题解决了。

还有两个问题请教:
一、在代码中输入全角字符“、”,显示出来的是“?”。如何判断字符串中包含顿号呢?

二、在子表中新增行后,如何使窗口中的控件焦点回到父表?以便在父表中编辑数据。

--  作者:有点色
--  发布时间:2017/5/5 16:23:00
--  

1、http://www.foxtable.com/webhelp/scr/1273.htm

 

2、

 

Dim nr As Row = Tables("子表").addNew

nr("入口词") = forms("窗口1").Controls("TextBox1").Text

 

e.Form.Controls("Table1").Select