tagCANDY CGI VBレスキュー(花ちゃん) - VBレスキュー(花ちゃん)の投稿サンプル用掲示板 - Visual Basic 6.0 VB2005 VB2010
VB2005用トップページへVBレスキュー(花ちゃん)のトップページVB6.0用のトップページ
VBレスキュー(花ちゃん)の投稿サンプル用掲示板
     サンプル投稿用掲示板  VB2005 〜 用トップページ  VB6.0 用 トップページ
2つのリストボックスのスクロールの同期をとる(VB6.0) ( No.0 )  [親スレッドへ]
日時: 2007/07/16 09:07
名前: 花ちゃん

***********************************************************************************
* カテゴリー:[リストボックス][][]                                                *
* キーワード:スクロールの同期を取る,トップインデックス,揃える,表示位置,,         *
***********************************************************************************

元質問:リストボックスの同時スクロール - Akira Satoh  2004/02/21-10:20 No.8066


------------------------------------------------------------------------
Re: リストボックスの同時スクロール - 花ちゃん  2004/02/21-11:42 No.8067
------------------------------------------------------------------------

フォームにリストボックスを2個貼り付け下記コードをペーストして試して下さい。
後は、どちらか一方だけの設定でいいと思います。

Option Explicit

Private Sub Form_Load()
    Dim i As Long
    For i = 65 To 122
        List1.AddItem Chr(i)
        List2.AddItem Chr(i)
    Next i
End Sub

Private Sub List1_Scroll()
    List2.TopIndex = List1.TopIndex
End Sub

Private Sub List2_Scroll()
    List1.TopIndex = List2.TopIndex
End Sub



 [スレッド一覧へ] [親スレッドへ]