作者pk01749276 (GuanTing)
看板Visual_Basic
标题[VBA ] 印出直角三角形 数字要连续
时间Fri Jul 4 02:47:28 2008
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
1F：推 fumizuki:=j+i-1 07/04 07:00