PTT數位生活區 / Visual_Basic

Re: [VB6 ] 程式解題查錯

看板Visual_Basic作者 (這是沒有道理的阿)時間19年前 (2006/12/22 00:07), 編輯推噓5(5推 0噓 0→)
留言5則, 4人參與, 最新討論串2/3 (看更多)
Private Sub Command1_Click() Open "ica.txt" For Input As #1 Do While Not EOF(1) Input #1, A, B, C, D, E N = 1 If N <= 10 Then V = (5 - 1) / 2 F = Abs(A - B) G = Abs(B - C) H = Abs(C - D) I = Abs(D - E) W = (F + G + H + I) / (5 - 1) V = (A + B - D - E) / ((1 + 2) * 2 * W) PSet (X, Y) N = N + 1 Loop Close #1 End If End Sub ------------- 現在程式變成這樣子! 但是他怎麼改顯示成 "有LOOP沒有DO" 但是當我把LOOP砍掉後! 又變成 "有DO沒有LOOP" 我被VB玩了嗎.... ---------------------- 我想要將點輸出到圖形阿= = -- 有感情的生物是人，沒感情的生物是妖。 當妖有了感情之後~ 他會是人妖! -- ※ 發信站: 批踢踢實業坊(ptt.cc) ◆ From: 140.130.37.76
推
12/22 02:00, , 1F
有阿，你有DO LOOP迴圈 應該是那邊打錯了吧
12/22 02:00, 1F
推
12/22 02:19, , 2F
所以我才很困擾阿>.<"
12/22 02:19, 2F
推
12/22 03:03, , 3F
同學 你的Do-Loop和If-Endif交叉了...
12/22 03:03, 3F
推
12/22 07:06, , 4F
不能把 do...loop、if...end if 交錯使用啊
12/22 07:06, 4F
推
12/22 13:55, , 5F
Loop Close #1 End If 改成 End If Close #1 Loop
12/22 13:55, 5F
‣ 更多 Cookiecs 的文章
文章代碼(AID): #15Yh4nMw (Visual_Basic)
Visual_Basic 近期熱門文章
更多 近期熱門文章 >>
PTT數位生活區 即時熱門文章
更多 即時熱門文章 >>
‣ 更多 Cookiecs 的文章
文章代碼(AID): #15Yh4nMw (Visual_Basic)