作者neplayer (neplayer)
看板Visual_Basic
標題Re: [請益] 在次麻煩各位高手了 = =
時間Wed May 25 00:35:52 2005
※ 引述《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)
1F:推 tevil:ㄏㄏ 對ㄝ 哈哈 原來是我y 沒有RESET 220.132.148.99 05/25