Private Sub Command1_Click()
n = Val(Text1.Text)

s = 0

i = 1

Do While i <= n

(繼續閱讀...)

a12s23d45f56asdf 發表在 痞客邦 留言(1) 人氣()