'一样的，假如表A第二行第一列为字符“测试”
Dim Doc As new PrintDocDim rt As new prt.RenderTablert.Cells(0,1).text = Tables("表A")(1,0)Doc.Body.Children.Add(rt)Doc.Preview
加好友 
发短信
Post By：2013/4/29 10:37:00 [显示全部帖子]
