十年網(wǎng)站開發(fā)經(jīng)驗 + 多家企業(yè)客戶 + 靠譜的建站團隊
量身定制 + 運營維護+專業(yè)推廣+無憂售后,網(wǎng)站問題一站解決
在代碼中加入以下事件代碼即可讓鼠標(biāo)滾輪支持VScrollBar:
站在用戶的角度思考問題,與客戶深入溝通,找到武安網(wǎng)站設(shè)計與武安網(wǎng)站推廣的解決方案,憑借多年的經(jīng)驗,讓設(shè)計與互聯(lián)網(wǎng)技術(shù)結(jié)合,創(chuàng)造個性化、用戶體驗好的作品,建站類型包括:成都網(wǎng)站制作、做網(wǎng)站、企業(yè)官網(wǎng)、英文網(wǎng)站、手機端網(wǎng)站、網(wǎng)站推廣、主機域名、網(wǎng)絡(luò)空間、企業(yè)郵箱。業(yè)務(wù)覆蓋武安地區(qū)。
Private Sub mouse_wheel(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles Me.MouseWheel
If e.Delta = 120 Then
If VScrollBar1.Value - VScrollBar1.SmallChange = 0 Then
VScrollBar1.Value -= VScrollBar1.SmallChange
ElseIf VScrollBar1.Value - 1 = 0 Then
VScrollBar1.Value -= 1
End If
Else
If VScrollBar1.Value + VScrollBar1.SmallChange = VScrollBar1.Maximum Then
VScrollBar1.Value += VScrollBar1.SmallChange
ElseIf VScrollBar1.Value + 1 = VScrollBar1.Maximum Then
VScrollBar1.Value += 1
End If
End If
End Sub
根據(jù)我的經(jīng)驗,應(yīng)該是PICtureBox沒有獲取焦點,而win10下不知道什么原因能自動獲取焦點,所以湊巧成功了,因此你應(yīng)該讓圖形框獲取焦點
如:picturebox1.focus()
不知道是不是解決了你的問題
不知道你的具體問題,
不過我認(rèn)為如果您是用textbox控件,您可能忽略了textbox的scrollbars屬性,textbox的scrollbars屬性默認(rèn)是none就是不顯示的意思。與mutline值的修改沒有關(guān)系
你可以在textbox控件的屬性里找到scrollbars并修改
scrollbars的值如下:
none:不顯示滾動條
Horizontal:顯示為水平滾動條
Vertical:顯示為垂直滾動條
Both:同時顯示垂直滾動條和水平滾動條
希望對您有幫助!