頁:
[1]
Excel csv利用vba輸出成txt,想強迫換行?
'Question=「韓」的部首是什麼?&A1=口。&A2=韋。&A3=日。& Answe=2Result = "Question=" & question
For i = 1 To 3
Result = Result & i & "=" & op(i) & "。"
Next
Result = Result & "&Answer=" & answer
最上面那句是csv輸出txt後的結果,底下則是vba寫法
但我想讓答案能強迫換至下一行,如下:
'Question=「韓」的部首是什麼?&A1=口。&A2=韋。&A3=日。
& Answe=2
我該在哪裡加入哪種指令呢?
...<div class='locked'><em>瀏覽完整內容,請先 <a href='member.php?mod=register'>註冊</a> 或 <a href='javascript:;' onclick="lsSubmit()">登入會員</a></em></div><div></div> 試試看 vbcrlf,VBA類似換行指令"Enter"
以前還蠻常用到的指令
換行字元可以用 Chr(13) & Chr(10) 或 VBCrLf
要加入的地方有兩個
Result = "Question=" & question & 換行字元
與
Result = Result & i & "=" & op(i) & "。" & 換行字元
頁:
[1]