老子曰

Private Sub Form_Load()
    Dim n As Integer, i As Integer
    n=10000
    Label1.Caption="老子曰:道生1,"
    For i=1 To n-1
        Label1.Caption=Lable1.Caption & i & "生" & i+1 & ","
    Next i
    Label1.Caption=Lable1.Caption & n & "生万物。"
End Sub
Advertisements

3 thoughts on “老子曰

  1. 同学,程序是不是这样?老子曰:道生1老子曰:道生2老子曰:道生3老子曰:道生4老子曰:道生5老子曰:道生6…..老子曰:道生生万物有BUG哦..最后一句多写了一个"生"字

  2. 呵呵,大哥,你还真研究起我写的这段无聊代码来了。这是 VB6 的代码。首先,Label1.Caption="老子曰:道生1,"使得 Label1 显示的字为“老子曰:道生1,”,然后才开始循环。所以“老子曰:”就一个。然后是一个重复9999次的循环。比如说,第一次时 i=1 ,那么Label1.Caption=Lable1.Caption & i & "生" & i+1 & ","效果就是说让 Label1 显示的字为当前这些字,以及i的值(即1),和“生”字,和i+1的值(即2),和逗号“,”。也就是说 Label1 的显示的字为“老子曰:道生1,1生2,”。Next i 之后 i 就加了1。直到 i 到了 9999 。此时 Label1 的字为“老子曰:道生1,1生2,2生3,3生4,……,9998生9999,9999生10000,”。最后循环外面的一句话是Label1.Caption=Lable1.Caption & n & "生万物。"意思是让 Label1 显示的字变成 Label1 当前的字和 n 的值(即10000)以及“生万物。”。最终 Label1 显示的字就是“老子曰:道生1,1生2,2生3,3生4,……,9998生9999,9999生10000,10000生万物。”。

发表评论

Fill in your details below or click an icon to log in:

WordPress.com Logo

You are commenting using your WordPress.com account. Log Out / 更改 )

Twitter picture

You are commenting using your Twitter account. Log Out / 更改 )

Facebook photo

You are commenting using your Facebook account. Log Out / 更改 )

Google+ photo

You are commenting using your Google+ account. Log Out / 更改 )

Connecting to %s