主题：[求助]

 1、表标题还是列标题啊？http://www.foxtable.com/help/topics/2373.htm

 

 2、你要什么格式，你就设置好excel模板，然后导出 http://www.foxtable.com/help/topics/0195.htm

 

 填充？

 

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

 

 去设置该列的列属性->逻辑格式->True;False

 

 

f.Filter = Tables("物料表").Filter

Dim f As New  Filler
f.SourceTable = DataTables("物料表") '指定数据来源
f.SourceCols = "产品,客户"  '指定数据来源列

f.Filter = Tables("物料表").Filter

f.DataTable = DataTables("圆片陶瓷电容_独石电容") '指定数据接收表
f.DataCols = "产品,客户"  '指定数据接收列
f.Fill() '填充数据

Dim sCols() As String = {"第一列", "第二列", "第三列"}
Dim dCols() As String = {"第一列", "第二列", "第三列"}

Dim nr As DataRow = DataTables("表B").AddNew()
For i As Integer =0 To sCols.Length -1
    nr(dCols(i)) = Tables("表A").Current(sCols(i))
Next

 直接写

 

Dim sCols() As String = {"规格型号","默认工艺路线_FInterID","默认工艺路线_FRoutingName"}
Dim dCols() As String = {"ggxh","mrgylx_id","mrgylx_mc"}
Dim nr As DataRow = DataTables("圆片陶瓷电容_独石电容料号表").AddNew()
For i As Integer =0 To sCols.Length -1
    nr(dCols(i)) = Tables("物料表").Current(sCols(i))
Next

 那就是你的表名有问题

 

Dim sCols() As String = {"规格型号","默认工艺路线_FInterID","默认工艺路线_FRoutingName"}
Dim dCols() As String = {"ggxh","mrgylx_id","mrgylx_mc"}
Dim nr As Row = Tables("圆片陶瓷电容_独石电容料号表").Current
For i As Integer =0 To sCols.Length -1
    nr(dCols(i)) = Tables("物料表").Current(sCols(i))
Next