Re: [請益] 在次麻煩各位高手了 = =

看板Visual_Basic作者 (neplayer)時間19年前 (2005/05/25 00:31), 編輯推噓1(100)
留言1則, 1人參與, 最新討論串2/2 (看更多)
※ 引述《tevil (dd)》之銘言: : 哈哈 小弟我又來了~.~ : 這次是如果一個FORM 裡面有 IMAGE1 image2 還有一個BUTTON : image 1,2裡面都有自己的圖片 : 當我按下BUTTON的時候 希望能夠指定 : 去分析其中一個IMAGE的圖片 : 將裡面凡是屬於某一個顏色的地方 都改變成其他顏色 : 下面是我寫的程式 : Private Sub Command1_Click() : o = Image2.Left : p = Image2.Top : q = Image2.Left + Image2.idth : r = Image2.Top + Image2.Height : While o < q : While p < r : If Point(o, p) = vbRed Then : PSet (o, p), vbGreen : End If : p = p + 50 : Wend : o = o + 50 : Wend 這邊的迴圈邏輯上有錯誤 我不知道怎麼說 while x < image.width while y < image.height // do something 你的迴圈長這樣 但是你第一次的外層迴圈跑完之後, y沒有reset 因此後來的迴圈都不會執行到裡面的程式碼 因為這時候y已經大於image.height 所以你只有一條線會變色 : End If : End Sub : 可是這樣好像是分析FORM裡面的顏色 因為image2都沒反應 : 我就把form的顏色全變 結果form有反應 可是還有一點很怪 = = : 我是希望分析一個區域 在這是分析image2的區域 : 可是他都只會有一條線變成綠色 我回圈哪裡有問題ㄚ : 這次問題很多 在次拜託大家了 = = -- ※ 發信站: 批踢踢實業坊(ptt.cc) ◆ From: 211.73.191.98 ※ 編輯: neplayer 來自: 211.73.191.98 (05/25 00:37)

220.132.148.99 05/25, , 1F
ㄏㄏ 對ㄝ 哈哈 原來是我y 沒有RESET
220.132.148.99 05/25, 1F
文章代碼(AID): #12arRHR6 (Visual_Basic)
討論串 (同標題文章)
文章代碼(AID): #12arRHR6 (Visual_Basic)