以文本方式查看主题

-  Foxtable(狐表)  (http://www.foxtable.com/bbs/index.asp)
--  专家坐堂  (http://www.foxtable.com/bbs/list.asp?boardid=2)
----  [求助]自动输入  (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=131940)

--  作者:giulioli
--  发布时间:2019/3/9 21:19:00
--  [求助]自动输入
我想增加一行后将前面代码计算得出的两个string变量的值放入到新增加的一行的列中
不知道要用什么方法
试了提取datarow做个变量的方法,但是string变量不能直接赋值给datarow,而且datarow要调用datatables而不是tables,肯定不对
打单引号的就是错误和未写的句子

    Dim cname As String
    Dim record As DataRow
    For Each ccode As String In ccodes
        cname = DataTables("temperorder").getcomboliststring("clientname","[client] = \'" & ccode & "\'")
    Tables("CLIENT").addnew()
    \'record
    \'record("code") = ccode
    \'record("name") = cname
    Forms("addclient").open()
    MessageBox.Show(ccode & cname)
    Next

--  作者:有点甜
--  发布时间:2019/3/10 10:44:00
--  

比如

 

dim nr as row = tables("表A").addnew

nr("第一列") = "abc"

nr("第二列") = 123