作者me8z7gnk (SONG-SONG)
看板Visual_Basic
標題[.NET] picturebox放大又縮小問題
時間Sun Sep 18 23:57:56 2016
各位高手好
最近小弟 遇到了一個無解的問題
程式碼如下:
'移動
Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
Pic1.Left = Pic1.Left + 10
Call 暫停(1000)
Pic1.Left = Pic1.Left + 10
End Sub
'放大縮小
Private Sub Button2_Click(sender As Object, e As EventArgs) Handles Button2.Click
Pic1.Size = New Point(Pic1.Width * 2, Pic1.Height * 2)
Call 暫停(1000)
Pic1.Size = New Point(Pic1.Width * 2, Pic1.Height * 2)
End Sub
'暫停
Sub 暫停(a As Integer)
Thread.Sleep(a)
End Sub
點擊 Button1時 可以讓pic1 往右移動10格 在停頓一秒 然後再往右移動
但是 點擊Button2時 不能讓pic2 放大2倍 在停頓一秒 在放大2倍
只能 顯示 放大4倍的結果
不知問題出在哪 請各位高手解惑 謝謝
--
※ 發信站: 批踢踢實業坊(ptt.cc), 來自: 111.253.3.54
※ 文章網址: https://webptt.com/m.aspx?n=bbs/Visual_Basic/M.1474214278.A.845.html
1F：推 johnpage: 釋放控制權，doeven 09/19 06:19
2F：推 garyl62327: Application.Doeven() 09/19 06:48
3F：→ me8z7gnk: 謝謝j大跟g大 原來有這個指令 又上了一課 謝謝 09/19 12:10
4F：噓 MOONRAKER: 太厲害了 亂指一通誤人子弟 問人的搞不清楚就感激涕零 09/19 16:10
5F：→ me8z7gnk: 給m大 我知道j大跟g大的給的單字 有小小錯誤 09/20 00:12
6F：→ me8z7gnk: 我在打程式有發現 不過我認為給個方向是非常重要的 09/20 00:12
7F：→ me8z7gnk: 給方向過後 就可以用google查詢 相關指令了 09/20 00:12
8F：→ me8z7gnk: 所以我非常感謝 09/20 00:13