史萊姆論壇 - for 另一個很奇怪的問題

史萊姆論壇 (http://forum.slime.com.tw/)

- 程式語言討論區 (http://forum.slime.com.tw/f76.html)

- - for 另一個很奇怪的問題 (http://forum.slime.com.tw/thread239998.html)

u8810329

2008-12-06 08:26 PM

for 另一個很奇怪的問題

這串程式碼希望無聊人士可以試試看
至於執行的樣子我也不知道為什麼會這樣
知道原理的人能否告訴我謝謝嚕
Dim i, j As Integer
TextBox1.Text = ""
For i = 1 To 7
For j = 1 To i
MsgBox(i, j)
Next
Next

rank	2008-12-06 11:16 PM

語法:

 Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

        Dim i, j As Integer

        For i = 1 To 7

            For j = 1 To i

                MsgBox(i, j)

            Next

        Next

    End Sub

j 是MsgBox的樣式

1 001 確定,取消
2 010 中止,重試,略過
3 011 是,否,取消
4 100 是,否
5 101 重試,取消
6 110 確定
7 111 確定

所以才會跑出那樣的結果

Living

2008-12-07 03:00 AM

MSGBOX是VB當中的一個預設指令
不同的MSGBOX(X)會出現不同的訊息方塊

建議你看看書本裡有關MSGBOX的使用你就可以知道為什麼會出現不同的訊息

u8810329

2008-12-07 08:42 AM

謝謝大家給我的指點

所有時間均為台北時間。現在的時間是 02:55 PM。

SEO by vBSEO 3.6.1