No.1ベストアンサー
- 回答日時:
コンボボックスならマウスホイールが効きます。
そこで、スクロールバーをダミーなコンボボックスと連動させれば出来ます。
-form1.frm-
Private Busy As Boolean
Private Sub Form_Load()
Dim i As Integer
Busy = True
Combo1.Clear
Combo1.Top = -999 '画面から消す
For i = VScroll1.Min To VScroll1.Max
Combo1.AddItem i
Next
Busy = False
End Sub
Private Sub VScroll1_GotFocus()
Combo1.SetFocus
End Sub
Private Sub Picture1_GotFocus()
Combo1.SetFocus
End Sub
Private Sub Combo1_GotFocus()
Busy = True
Combo1.ListIndex = VScroll1.Value - VScroll1.Min
Busy = False
End Sub
Private Sub Combo1_Click()
If (Busy) Then Exit Sub
VScroll1.Value = Val(Combo1.Text)
End Sub
この回答へのお礼
お礼日時:2002/07/24 11:10
おおお!!すんばらしいッ!!スクロールしてる!
感動しましたぁぁぁ~(TOT)
なんとお礼をいっていいやらわかりませんが本当に助かりました!
さすがVBマスター!ありがとうございました(^-^)
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- その他(プログラミング・Web制作) マウスオーバー→ホイール回転でスクロールできない 2 2022/10/31 10:06
- InternetExplorer(IE) Edge でマウスの真ん中のボタン(ミドルボタン)を押すと、スクロールするのを無効にしたい 2 2023/06/11 05:05
- Chrome(クローム) Google Chrome スクロールできない 4 2022/10/17 16:49
- マウス・キーボード ノートパソコンでマウスが急にスクロールできなくなりました。分かる方教えてくださいお願いいたします。 14 2022/11/03 16:09
- マウス・キーボード ノートパソコンマウスのスクロールができません、どのマウスを繋いでも同じですマウスをスクロールすると横 3 2022/09/16 15:15
- マウス・キーボード マウスのないパソコン 9 2022/03/30 10:53
- マウス・キーボード ノートパソコンでマウスを使っていたら急にスクロールでしなくなりました。別のマウスを使っても同じですね 5 2022/08/09 05:28
- Windows 95・98 Windows11の設定画面がスクロールできません。 2 2023/07/26 05:16
- マウス・キーボード Macのスクロールについて 2 2022/06/28 11:29
- その他(ブラウザ) Microsoft edgeのスクロールバーについて 2 2022/09/19 16:56
このQ&Aを見た人はこんなQ&Aも見ています
関連するカテゴリからQ&Aを探す
このQ&Aを見た人がよく見るQ&A
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
scrollTopについて
-
TikTokに自動でスクロールして...
-
Excelでワードアートや図を常に...
-
子要素のスクロールが親要素に...
-
IFRAMEでscrolling="yes|no"の...
-
ページ内リンクのゆっくりバー...
-
階層フレキシブルコントロール...
-
文章の自動スクロール
-
大きい表へのスクロールバーの...
-
PDFを(htmlのように)無限に縦...
-
エクセルVBAでフォームのListbo...
-
リストビューをスクロールさせ...
-
WSHでスクロールの制御をしたい...
-
デジタル時計の時刻合わせの方...
-
マイページはどこを開くの
-
エクセルのシート上に別のシー...
-
ウインドウを毎回同じ位置、大...
-
Yahoo地図でマーカーを表示した...
-
【Android】ユーザー補助機能ボ...
-
[Java] Edgeでのアドレスバー非...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
Excelでワードアートや図を常に...
-
エクセルVBAでフォームのListbo...
-
リストビューをスクロールさせ...
-
PDFを(htmlのように)無限に縦...
-
Excelで一部分だけを常に表示さ...
-
Excelの質問で票の途中に...
-
Excelで1.2行目だけ固定して...
-
ページ訪問時にiframe内を自動...
-
vb,netでtextboxの文字を右から...
-
Visual Basicから Spreadのスク...
-
大きい表へのスクロールバーの...
-
マウスオーバー→ホイール回転で...
-
webページで横方向にアンカーを...
-
ExcelVBAで他のアプリをスクロ...
-
文章の自動スクロール
-
ページ読み込み時に自動でスク...
-
Spreadのスクロールについて
-
C#:ListViewでのスクロールイベ...
-
ポストバック時のスクロール位...
-
常に画像の大きさを横幅100%で...
おすすめ情報