主题：程序的变量值如何输出到表里

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

 

Dim AAA As String = "123456"

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

For Each c As object In e.Form.Controls
    If c.Gettype.name Like "*TabControl*" Then
        For Each dc As object In c.tabpages
            dc.BackColor = Color.FromARGB(255,173,216,230)
        Next
    Else
        c.BackColor = Color.FromARGB(255,173,216,230)
    End If
Next

 或者看看

 

http://www.foxtable.com/bbs/dispbbs.asp?BoardID=2&ID=50129&skin=0

 

 把chart控件放在一个panel容器里面，对应的控制chart控件的宽度和高度即可。

 直接控制chart的大小就行啊，比如

 

e.Form.Controls("Chart1").Width += 50
e.Form.Controls("Chart1").height += 50

  如下例子

 

      

下载信息  [文件大小：   下载次数： ]

点击浏览该文件:控件放大缩小移动例子.table

 1、不是可以移动chart么？

 

 2、你可以加入坐标轴信息啊

 

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

 

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

 

 不能实现这一功能。

 

没有最大行数的问题，如果是foxtable或者access数据库，最大的容量是2G数据。

 

如果是Sqlserver数据库，没有容量限制。

Dim I As Integer
Dim gunarray As String
i=2
For i=2 To 7
    Dim o = e.Form.Controls("TabControl1").TabPages.add("Garray" & i, "Garray" & i)
    Dim cht = e.Form.CreateControl("chart" & i, ControlTypeEnum.Chart)
    cht.Dock = 5
    o.AddControl(cht)
Next