重慶分公司,新征程啟航
為企業提供網站建設、域名注冊、服務器等服務
為企業提供網站建設、域名注冊、服務器等服務
在代碼中加入以下事件代碼即可讓鼠標滾輪支持VScrollBar:
站在用戶的角度思考問題,與客戶深入溝通,找到武安網站設計與武安網站推廣的解決方案,憑借多年的經驗,讓設計與互聯網技術結合,創造個性化、用戶體驗好的作品,建站類型包括:成都網站制作、做網站、企業官網、英文網站、手機端網站、網站推廣、主機域名、網絡空間、企業郵箱。業務覆蓋武安地區。
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
根據我的經驗,應該是PICtureBox沒有獲取焦點,而win10下不知道什么原因能自動獲取焦點,所以湊巧成功了,因此你應該讓圖形框獲取焦點
如:picturebox1.focus()
不知道是不是解決了你的問題
不知道你的具體問題,
不過我認為如果您是用textbox控件,您可能忽略了textbox的scrollbars屬性,textbox的scrollbars屬性默認是none就是不顯示的意思。與mutline值的修改沒有關系
你可以在textbox控件的屬性里找到scrollbars并修改
scrollbars的值如下:
none:不顯示滾動條
Horizontal:顯示為水平滾動條
Vertical:顯示為垂直滾動條
Both:同時顯示垂直滾動條和水平滾動條
希望對您有幫助!