→ mron:何不用 Text 顯示 09/14 20:23
→ sdwufei:因為在解書上的習題XD卡在這步驟不會用～ 09/15 08:56
→ MOONRAKER:看到這種三葉蟲時代的習題就睡著了。 cls? print? 09/15 09:55
→ sdwufei:哈哈，是阿。不過現在問題點是在picturebox不知道怎麼 09/15 11:01
→ sdwufei:搭配Vscroll 09/15 11:01
我現在在做類似金字塔的程式。
目前是用了一個Text跟一個PictureBox來顯示。
例如Text輸入4,PictureBox就顯示
++++
+++
++
+
++
+++
++++
如果Text輸入2，就變成
++
+
++
現在遇到的問題是，當假設我的PictureBox只能顯示五行(自己拉的大小)，那假設我
Text一樣輸入4，在PictureBox裡就只會顯示
++++
+++
++
+
++
在下面的都不會顯示了，翻一下精華區好像很多都是講到Vscroll控制image的，
那以我這種的程式該怎麼搭配Vscroll呢？
補個Text change寫得程式
Private Sub Text1_Change()
Picture1.Cls
For i = 1 To Int(Text1.Text) - 1
Picture1.Print String(Int(Text1.Text) + 1 - i, "+")
Next i
'+由少到多排列
s = ""
For i = 1 To Int(Text1.Text)
s = s & "+"
Picture1.Print s
Next i
End Sub
--
※ 發信站: 批踢踢實業坊(ptt.cc)
◆ From: 118.169.195.55