Office中国论坛/Access中国论坛

标题: [求助]表记录赋值于文本框 [打印本页]

作者: sybai 时间: 2007-2-8 21:18
标题: [求助]表记录赋值于文本框
帮我看一下，，如何让附件窗体里面的文本框显示的内容如标签的内容

及文本框= rst1 & chr(13) & chr(10)

rst2 & chr(13) & chr(10) (表1记录某2个字段内容)

TKS[attach]23031[/attach]

[此贴子已经被作者于2007-2-8 13:38:45编辑过]

作者: tz-chf 时间: 2007-2-8 21:21
文本框不能换行

作者: sybai 时间: 2007-2-8 21:38
可以的chr(13)是换行符 chr(10)是回车符刚才忘传附件了现在传上了

[此贴子已经被作者于2007-2-8 13:39:32编辑过]

作者: 一点通 时间: 2007-2-8 22:18
显示结果是否是最右边的内容?用列表框不行吗？

作者: sybai 时间: 2007-2-8 22:55
就是用文本框显示表记录某字段的内容，列表框达不到要的效果。。因为显示内容还会导入到WORD做报表

作者: andymark 时间: 2007-2-8 23:40
[attach]23032[/attach]

作者: sybai 时间: 2007-2-9 01:46
谢谢TKS，，我刚才自己也想到了，但是始终没你出来的效果理想。

Do While Not rst.EOF

Me.GoodsCtns.Value = Me.GoodsCtns.Value & Chr(13) & Chr(10) & " " & rst.Fields(3) & "" & rst.Fields(4) & " "
Me.GoodsName.Value = Me.GoodsName.Value & Chr(13) & Chr(10) & " " & rst.Fields(5) & " "
Me.GoodsWeight = Me.GoodsWeight & Chr(13) & Chr(10) & " " & rst.Fields(6) & " "
Me.GoodsMeas = Me.GoodsMeas & Chr(13) & Chr(10) & " " & rst.Fields(7) & " "
rst.MoveNext

我出来的结果上面会出现一个空行。

呵呵万分感谢！

欢迎光临 Office中国论坛/Access中国论坛 (http://www.office-cn.net/)