Re: [VBA ] 印出直角三角形 數字要連續
後來將程式改成dim i,j,k as integer
textbox1.text=""
for i=0 to 5
for j=0 to i
textbox1.selectedtext=i+k
next
textbox1.selectedtext=vbnewline
next
textbox1.selectionlength=0
結果印出
1
34
678
10111213
※ 引述《pk01749276 (GuanTing)》之銘言:
: Dim i,j as integer
: textbox1.text=""
: for i =1 to 10
: for j =1 to i
: textbox1.selectedtext=j
: next
: textbox1.selectedtext=vbnewline
: next
: textbox1.selectionlength=0
: 我只會打這樣
: 可是他出來的結果數字沒有連續
: 變成
: 1
: 12
: 123
: 1234
: 12345
: 請問各位我該怎改呢?
--
※ 發信站: 批踢踢實業坊(ptt.cc)
◆ From: 123.204.55.115
→
07/04 11:29, , 1F
07/04 11:29, 1F
→
07/04 13:06, , 2F
07/04 13:06, 2F
→
07/04 13:08, , 3F
07/04 13:08, 3F
討論串 (同標題文章)
本文引述了以下文章的的內容:
完整討論串 (本文為第 2 之 2 篇):