看板 [ Visual_Basic ]
討論串[VB6 ] 如何在PictureBox上用滑鼠點兩點畫線?
共 6 篇文章
內容預覽： 開啟 | 關閉 | 只限未讀
首頁
上一頁
1
2
下一頁
尾頁
#6
Re: [VB6 ] 如何在PictureBox上用滑鼠點兩點畫線?
推噓0(0推 0噓 0→)留言0則，0人參與, 最新作者tpjobp (月之殤)時間19年前 (2006/05/02 17:12), 編輯資訊
0
0
0
內容預覽:
引言恕刪. 在下提供兩種寫法 都是由閣下的程式修改而成 也都或有利弊...謹供參考指教. 第一種寫法. Dim X1,X2,Y1,Y2,Length as Single. Dim Counter as Boolean. Private Sub Form_Load(). Picture1.DraWid
(還有878個字)
#5
Re: [VB6 ] 如何在PictureBox上用滑鼠點兩點畫線?
推噓0(0推 0噓 0→)留言0則，0人參與, 最新作者tpjobp (月之殤)時間19年前 (2006/05/02 16:47), 編輯資訊
0
0
0
內容預覽:
要多宣告一個全域變數counter這一個拿掉..... 這兩行改成. counter=counter mod 2. counter=counter+1. 如果可以的話 把你的全域變數counter設為Boolean型態. 這樣的話. 那兩行只要以 counter=not(counter) 就可以取代
#4
Re: [VB6 ] 如何在PictureBox上用滑鼠點兩點畫線?
推噓0(0推 0噓 0→)留言0則，0人參與, 最新作者cppkiller (cppkiller)時間19年前 (2006/05/02 00:49), 編輯資訊
0
0
0
內容預覽:
現在Sub or Function not defined的問題已經解決了！. 但是現在按CommandButton它只會對原點作直線，要如何才能做兩點間的直線？. 謝謝！. --. ※ 發信站: 批踢踢實業坊(ptt.cc). ◆ From: 140.115.214.56.
#3
Re: [VB6 ] 如何在PictureBox上用滑鼠點兩點畫線?
推噓0(0推 0噓 0→)留言0則，0人參與, 最新作者cppkiller (cppkiller)時間19年前 (2006/05/01 21:42), 編輯資訊
0
0
0
內容預覽:
那再請問我接下來的做法對不對？. 我要在一張圖上用滑鼠點兩點，然後按CommandButton就顯示兩點間的直線及長度！. 一開始我先在form1建立一個PictureBox並放入圖片，然後雙擊圖片進入code。再打入. Dim x1, y1, x2, y2, length As Single. P
(還有483個字)
#2
Re: [VB6 ] 如何在PictureBox上用滑鼠點兩點畫線?
推噓1(1推 0噓 0→)留言1則，0人參與, 最新作者cppkiller (cppkiller)時間19年前 (2006/05/01 12:06), 編輯資訊
0
0
0
內容預覽:
再請問我這樣的做法對不對？. 一開始我先在form1建立一個PictureBox並放入圖片，然後雙擊圖片進入code。再打入. Private Sub Form_Load(). End Sub. Private Sub Picture1_MouseDown(Button As Integer, Sh
(還有67個字)
首頁
上一頁
1
2
下一頁
尾頁