以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  程序的变量值如何输出到表里  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=65747)

--  作者:cglsg5076
--  发布时间:2015/3/21 21:17:00
--  程序的变量值如何输出到表里
各位大侠,菜鸟我有个问题,就是如何将程序运行时的变量值输入到表里。

多谢啦。急盼回音。

--  作者:cglsg5076
--  发布时间:2015/3/21 21:21:00
--  
我有多个变量值,比如,x,y,z,u,v,w,将这些变量值输入到表里,怎么实现?我用过export不行,其他foxtable语句也不行。
--  作者:有点甜
--  发布时间:2015/3/22 9:44:00
--  

 不明白你想表达什么。如果往某行填数据就这样写

 

Dim AAA As String = "123456"

Dim r As Row = Tables("表A").Rows(1)
r("第一列") = AAA


--  作者:cglsg5076
--  发布时间:2015/3/22 16:23:00
--  
非常感谢您的指导,我试试。


--  作者:cglsg5076
--  发布时间:2015/3/23 16:41:00
--  
终于可以了,衷心感谢版主的指导。

我还有个问题,就是如何给不同窗体的文本框赋值?
比如:
guns=“aaaaa”
Forms("rawdatadisplay").Controls("TextBox1").text=guns
这段程序不能执行。不知为什么。
我从主窗口,向rawdatadisplay窗口的TextBox1控件的text属性赋值,但foxtable不允许,这在VB里是很容易的事,但在foxtable不行,为什么?


--  作者:Bin
--  发布时间:2015/3/23 16:43:00
--  
要先打开这个窗口

最好加入代码判断一下,窗口已经打开再执行赋值

if orms("rawdatadisplay").Opened then
   Forms("rawdatadisplay").Controls("TextBox1").text=guns
end if



--  作者:狐狸爸爸
--  发布时间:2015/3/23 16:52:00
--  

用value属性赋值更好:

 

 

if Forms("rawdatadisplay").Opened then
   Forms("rawdatadisplay").Controls("TextBox1").Value = guns
end if

 

http://www.foxtable.com/help/topics/0751.htm

 


--  作者:cglsg5076
--  发布时间:2015/3/23 17:36:00
--  
衷心感谢版主的指导,是可以赋值了。
有个问题是foxtable好像不可以单步跟踪,只能用outshow的办法输出吗?还是可以用其他办法单步跟踪。这在vb里很方便。foxtable要是能象vb的F8键单步调试,就好了,那很方便。


--  作者:cglsg5076
--  发布时间:2015/3/23 20:31:00
--  
再请教版主一个问题,我有一个文本文件,该文件有N行数据(行数是变化的),我该如何按行读入数据,并赋值给变量。
在VB里很容易实现,但用foxtable我不会。感觉foxtable 和VB有很多的不同。
多谢啦。不好意思,总给您填麻烦。

--  作者:Bin
--  发布时间:2015/3/24 8:44:00
--  
http://www.foxtable.com/help/topics/0331.htm

我建议你静下心来,按部就班看一遍帮助先