1樓:龍志健
private sub form_mousemove(button as integer, shift as integer, x as single, y as single)
text1.text = "x:" & xtext2.text = "y:" & yend sub
2樓:匿名使用者
窗體上新建兩個text控制元件,
private sub form1_mousemove(button as integer, shift as integer, x as single, y as single)
text1.text = "x:" & xtext2.text = "y:" & yend sub
3樓:guoxin愛記錄
private sub form_load()label1.autosize = truelabel2.autosize = trueend sub
private sub form_mousemove(button as integer, shift as integer, x as single, y as single)
label1.caption = "x=" & xlabel2.caption = "y=" & yend sub
4樓:永恆的愛
先新增兩個文字框 在新增如下**
private sub form_mousedown(button as integer, shift as integer, x as single, y as single)
a = val(x)
b = val(y)
text1 = a
text2 = b
vb怎麼讓窗體點選 顯示桌面 後也不最小化
呵呵,取消窗體的最小化功能.然後新增一個timer,每100ms就重新最大化一次程式且再置一次頂.你把視窗風格設為0,自己畫一個標題欄就行了.有這樣的程式嗎?沒有吧,從沒見過,就連置頂的介面,同樣會被隱藏 vb中如何讓命令按鈕實現窗體最小化 vb正常的窗體上有最大化和最小化按鈕。當需要改變這些設定,...
用vb60設計程式,在窗體上的標籤label中
private sub form load label1.caption 歡迎進入vb的程式設計世界 label1.font 文泉驛等寬正黑 不要意思咱機子上沒有 楷體 label1.fontsize 14.25label1.fontbold truelabel1.backcolor vbreden...
VB問題 求最好的更新顯示方法
讀取資料後放到記憶體做緩衝,陣列就行,重新整理資料的時候對比陣列,有差異再重新整理列表.ms的控制元件,加多了資料肯定是要有延遲的,量大表的載入變遲緩,又要不斷重新整理,又要直接反映,只能自己做控制元件.根據重新整理速度的要求,儘可能想辦法解決吧,用原控制元件整個表刷是不可能完美的.直接在記憶體裡比...