1樓：炫斯你
private sub form_load()= true
trueend sub
private sub form_mousemove(button as integer, shift as integer, x as single, y as single)
x\y 就是滑鼠的座標啊。
end sub
private sub form_mouseup(button as integer, shift as integer, x as single, y as single)
picture1 裡讀一張**。
x, y, ,end sub
2樓：網友
並且點選時在那個地方載入一張**---這句話不懂，那個地方是什麼意思？
vb中怎麼獲取滑鼠的座標
3樓：匿名使用者
可以在 mousemove 事件中獲得。
vb獲取滑鼠在當前窗體的座標
4樓：匿名使用者
在vb中針對form、text文字輸入框等都有關於滑鼠的三個函式：，_mousedown、_mousemove、_mouseup，如：關於form有如下三個函式，只要在其中寫入針對timer控制項的語句即可，無需理會座標x、y的值。
private sub form_mousedown(button as integer, shift as integer, x as single, y as single) end sub private sub form_mousemove(button as integer, shift as integer, x as single, y as single) end sub private sub form_mouseup(button as integer, shift as integer, x as single, y as single) end sub
5樓：匿名使用者
採用窗體的mousemove事件來獲取滑鼠座標是可以的。如下我在文字框中顯示當前滑鼠的座標程式，滑鼠移動，座標自動更新，只需要乙個文字框控制項，**如下：private sub form_mousemove(button as integer, shift as integer, x as single, y as single)
當前滑鼠座標為，x：" & x & "y:" & y
end sub
vb 獲取滑鼠在視窗內的螢幕座標
6樓：網友
講一下很久以前的設計思路。
1、首先取得全屏的大小。
2、不可能獲取任意視窗，因為不同的系統和軟體的限制。
3、找出看得見的視窗的控制代碼，求出視窗大小。
4、綜上所述建立乙個限制演算法。
5、其它的由你了。
7樓：奪命精神病
不太清楚哦，希望有人幫解答，祝：早日找到答案！
vb 裡面 滑鼠按下 獲取點的座標
8樓：網友
private sub form_load()scalemode = 3 '畫素模式。
end sub
private sub form_mousedown(button as integer, shift as integer, x as single, y as single)
msgbox x & "," & y
end sub
獲取的是相對窗體區域左上角（不含標題欄）
9樓：匿名使用者
病情分析：
檢查出有肺動脈高壓。
指導意見：**方法。
一。藥物**：1.血管舒張藥，2.抗凝。二。肺或者心臟移植。
10樓：裝水的空瓶子
你是要取當前螢幕的座標，還是自己軟體視窗的座標，或者是別的軟體的座標，這些都不一樣的。
在vb60中如何申明全域性變數，在VB 6 0中，如何申明一個全域性變數？
在任意模組中用public定義變數,例如public a as integer,使用時可直接寫a，若在其他模組中有與之重名的變數須在變數前宣告模組,比如 form1.a 在 標準模組 的宣告部分,使用關鍵字public或global宣告,可以被工程中的任一窗體,任一模組中的任一過程或函式使用,陣列和...
VB6 0查詢語句
1 顯示所有清單，其中 uvoltage,ucapacity可任意修改。select uvoltage,ucapacity from supply where ucapacity 你原來的語句 2 僅顯示一行，相當於excel的分類統計計數select uvoltage,min ucapacity ...
vb 6 0的陣列問題
dim e 1 to 12 as integerdim f as integer private sub command1 click dim i as integer static j as integer for i 1 to 12 if e i 0 then 使不為零的元素提取出j j 1 r...