以文本方式查看主题

-  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=1879)

--  作者:woodiy
--  发布时间:2009/2/20 21:08:00
--  当前表名设置一个变量
Dim dst As WinForm.DataList = e.Form.Controls("DataList1")
Dim dr as DataRow = dst.Current \'获得选定行
dim str as string = CurrentTable.name
Dim r As Row = Tables("#NM#").Current
r("客户名称") = dr("客户名称")
r("省市") = dr("省市")
e.Form.Close()

能否设置一个变量,把当前表名赋值到NM, 代码该如何写,谢谢!

--  作者:狐狸爸爸
--  发布时间:2009/2/20 21:14:00
--  
嘿嘿,看不明白你的意思。
--  作者:ybtxdz
--  发布时间:2009/2/20 23:10:00
--  
那行直接写成

Dim r As Row = Tables(str).Current

不就行了吗?