這么難的問題才5分?給你思路:VB.NET改變鼠標形狀的唯一方法就是加載圖片,但是因為你要求“橫向和縱向都到達PictureBox的邊界”,也就是說,這個圖片必須跟著鼠標移動而變化,顯然這是無法做到的。
成都創(chuàng)新互聯(lián)公司服務項目包括哈爾濱網(wǎng)站建設、哈爾濱網(wǎng)站制作、哈爾濱網(wǎng)頁制作以及哈爾濱網(wǎng)絡營銷策劃等。多年來,我們專注于互聯(lián)網(wǎng)行業(yè),利用自身積累的技術優(yōu)勢、行業(yè)經(jīng)驗、深度合作伙伴關系等,向廣大中小型企業(yè)、政府機構等提供互聯(lián)網(wǎng)行業(yè)的解決方案,哈爾濱網(wǎng)站推廣取得了明顯的社會效益與經(jīng)濟效益。目前,我們服務的客戶以成都為中心已經(jīng)輻射到哈爾濱省份的部分城市,未來相信會繼續(xù)擴大服務區(qū)域并繼續(xù)獲得客戶的支持與信任!
因此,可以先將鼠標指針隱藏,然后根據(jù)鼠標的當前位置,在PictureBox中畫十字線,鼠標移動后,將前面畫的線擦除,然后在新位置重新畫。
為了不擦除PictureBox中已有的圖像,在畫十字線之前,先保存十字線所覆蓋像素點的值,擦除的時候,恢復這些值就可以了。
屬性里面先把UseWaitCursor改為true然后再改Cursor的屬性。選擇一個你要的形狀
click事件中獲取鼠標相對于chart控件的坐標:chart.PointToClient(MousePosition)
控件是可以顯示在里面的,你只要加個label,把label的屬性設為visualble=fause就行。設置鼠標經(jīng)過頭像的mouseHover和mouseLeave事件,當mouseHover時label的屬性visualble=true,當mouseLeave時label的屬性visualble=fause即可。窗體的鼠標事件可以設置控件的cursor屬性,里面可以選擇許多種鼠標圖形。 只要是正常的Form都可以改變窗體大小,但是無邊框的窗體只能用函數(shù)改變或者設置屬性,在debug后是不能改變的。拖動窗體需要在窗體的load時間里面寫入當鼠標單擊不放時的事件即可,不難。
縮放操作
Function 縮放(ByVal bitmap As Bitmap, ByVal 倍數(shù) As Single) As Bitmap
Dim w As Integer = bitmap.Width * 倍數(shù)
Dim h As Integer = bitmap.Height * 倍數(shù)
Dim tem As New Bitmap(w, h)
Dim g As Graphics = Graphics.FromImage(tem)
g.DrawImage(bitmap, New Rectangle(0, 0, w, h), New Rectangle(0, 0, bitmap.Width, bitmap.Height), GraphicsUnit.Pixel)
g.Dispose()
Return tem
End Function
鼠標滾輪事件 MouseWheel
MouseEventArgs.Delta 值可以判斷滾動方向