Ich benutze VB6 Enterprise Edition. Wie würde man die vscroll Balken für angrenzende Listenfelder verbinden, so dass, wenn man gescrollt wird, die zwei anderen auch rauf und runter gleiten? Das Ziel besteht darin, Informationen in den Listen nebeneinander anzuzeigen. Ich habe versucht, die listindex Eigenschaft der zwei anderen Listen gleich dem listindex der ersten unter Verwendung des Klickensereignisses zu setzen. Es funktioniert nach einer Mode, ist aber eine weniger als ideale Lösung. Wenn man auf ein Element in der ersten Liste klickt, erscheint der Listenindex für die anderen beiden auf dem Bildschirm, aber sie sind nicht wirklich verknüpft oder nebeneinander angezeigt. Ich habe ein Scroll-Event bemerkt, kann aber keine Matarial finden, wenn ich dieses Event in einem meiner VB-Bücher benutze. Jede Hilfe wäre willkommen.
Behandeln Sie das Scroll-Ereignis für die Listenfelder. Dies wird ausgelöst, wenn die Listbox gescrollt wird.
Legen Sie im Ereignishandler die TopIndex-Eigenschaft fest für die anderen Listenfelder gleich dem TopIndex der gescrollten Listbox.
Ich habe diesen Code für zwei Listenfelder in newsgroup posten . Eine Variable auf Modulebene wird verwendet, um Rekursion zu verhindern: das Setzen des TopIndex aus dem Code könnte das Scroll-Ereignis erneut auslösen.
%Vor%Tags und Links vb6