| 以文本方式查看主题 - Foxtable(狐表) (http://foxtable.com/bbs/index.asp) -- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2) ---- 不知道哪里错了， (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=57840) |
| -- 作者：qianqian1530 -- 发布时间：2014/10/5 20:52:00 -- 不知道哪里错了， Dim 項目1() As String = {"1", "2", "3", "4"} For a As Integer = 0 To 項目1.Length - 1 Dim 項目2() As String = {"5", "6", "7", "8"} For b As Integer = 0 To 項目2.Length - 1
Dim 項目3() As String = {"a", "b", "c", "d"} For c As Integer = 0 To 項目3.Length - 1 e.Form.Controls("TextBox11").text + = 項目1(a) & "," & 項目2(b) & "," & 項目3(c)& vbCrLf Next Next Next e.Form.Controls("TextBox11").text + 写成这样，就出问题， 但是 换成 output.show 就没事了， 是为什么呢
|
| -- 作者：有点甜 -- 发布时间：2014/10/5 20:56:00 -- 报什么错？那你试试写
e.Form.Controls("TextBox11").text &= 項目1(a) & "," & 項目2(b) & "," & 項目3(c)& vbCrLf |
| -- 作者：qianqian1530 -- 发布时间：2014/10/5 21:00:00 -- 额额～～ 没错， 是我看错了， 因为不能换行，， 但为什么换行符号 不好使呢？
|
| -- 作者：有点甜 -- 发布时间：2014/10/5 21:07:00 -- 方法一：
方法二：e.Form.Controls("TextBox11").text &= vbCrLf & 項目1(a) & "," & 項目2(b) & "," & 項目3(c) [此贴子已经被作者于2014-10-5 21:10:57编辑过]
|
| -- 作者：有点甜 -- 发布时间：2014/10/5 21:11:00 -- 4楼写错了
方法一：文本控件，属性->删除尾空格，设置成false |