vb 如果將控件里的絕對坐標換算成屏幕中的絕對坐標?

要用到vb的api函數(shù)ClientToScreen，你可以看看這個方面的內(nèi)容，

10余年建站經(jīng)驗， 做網(wǎng)站、成都網(wǎng)站建設(shè)客戶的見證與正確選擇。創(chuàng)新互聯(lián)公司提供完善的營銷型網(wǎng)頁建站明細報價表。后期開發(fā)更加便捷高效，我們致力于追求更美、更快、更規(guī)范。

這里又一個坐標變換的問題！

vb.net 中怎樣用代碼設(shè)置控件location

控件.location=New Point(X,Y)

X,Y為整數(shù)，即控件坐標，原點在窗體左上角

VB.NET 坐標查找問題

代碼就不寫了,給你思路,默認左上角是原點,所以x的位置=窗口高度-y.

這樣就獲得xy

復雜點的辦法是重寫繪制,繪制十字,

簡單點的辦法就是十字放到picbox或者image里,然后取中,然后隱藏,確定按鈕點擊顯示,中心位置等于坐標點,然后換算左上角控件位置,然后設(shè)置坐標.

VB API如何獲取鼠標在某一控件中的絕對坐標位置值？

在你的窗體代碼最頂上(那就第一行吧，其實就是“聲明”那里)，加入以下代碼：

Private Type POINTAPI

x As Long

y As Long

End Type

Public Declare Function ClientToScreen Lib "user32" Alias "ClientToScreen" (ByVal hWnd As Long, lpPoint As POINTAPI) As Long

Public Declare Function GetCursorPos Lib "user32" Alias "GetCursorPos" (lpPoint As POINTAPI) As Long

然后呢，我告訴你取鼠標相對控件位置的方法(注意注意：這里取得的坐標是以像素為單位的！！！而VB默認單位是“緹”即Twips。1像素=15緹)：

Dim MousePos As POINTAPI

GetCursorPos MousePos

ClientToScreen 控件名.hWnd, MousePos

完了以后，MousePos.x和MousePos.y就是鼠標相對控件的位置的橫縱坐標。去掉“ClientToScreen 控件名.hWnd, MousePos”這句，就是取鼠標在屏幕上的位置。

你原來的代碼里有

Private Sub Picture2_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)

這個過程。實際上，這里的X和Y是鼠標在容器（控件）內(nèi)的位置，以“緹”為單位。要轉(zhuǎn)化成像素（Pixel），你得把原坐標的橫縱值除以15.

VB.NET怎么讓控件往指定坐標移動

Button1.Location?=?New?Point(100,?100)

或

Button1.Left?=?100

Button1.Top?=?100

vb中坐標系是如何定義的？如何表示絕對坐標和相對坐標。

窗體內(nèi)的左上角的座標為（0，0），向右是.Left+，向左是.Left-，向下是.Top+，向上是.Top-；如果要使用相對座標，比如向右移動100，就可以寫成Object.Left=Object.Left+100即可。

網(wǎng)站標題：vb.net控件絕對坐標 vb坐標系統(tǒng)
標題來源：http://chinadenli.net/article6/hehdog.html

成都網(wǎng)站建設(shè)公司_創(chuàng)新互聯(lián)，為您提供小程序開發(fā)、企業(yè)網(wǎng)站制作、搜索引擎優(yōu)化、網(wǎng)站策劃、響應(yīng)式網(wǎng)站、移動網(wǎng)站建設(shè)

廣告

聲明：本網(wǎng)站發(fā)布的內(nèi)容（圖片、視頻和文字）以用戶投稿、用戶轉(zhuǎn)載內(nèi)容為主，如果涉及侵權(quán)請盡快告知，我們將會在第一時間刪除。文章觀點不代表本網(wǎng)站立場，如需處理請聯(lián)系客服。電話：028-86922220；郵箱：631063699@qq.com。內(nèi)容未經(jīng)允許不得轉(zhuǎn)載，或轉(zhuǎn)載時需注明來源： 創(chuàng)新互聯(lián)