Müssen sehr viele Spalten im sevDataGrid-Control angezeigt werden und lassen sich diese nicht alle auf einmal darstellen, wird automatisch ein horizontaler Scrollbalken angezeigt. Soll zu einer bestimmten Spalte gescrollt werden, die dann links als erste Spalte angezeigt wird, hilft Ihnen nachfolgender Code weiter. ' Scrollt das sevDataGrid zur angegebenen Spalte Public Sub GridScrollToColumn(ByRef oGrid As Object, ByVal nCol As Long) Dim i As Long Dim nWidth As Long With oGrid ' Spaltenbreiten aufaddieren For i = 1 To nCol - 1 nWidth = nWidth + .Columns(i).Width Next i If nCol > 1 Then ' pro Spalte ggf. Breite der Gitterlinie aufaddieren If .GridLines = GRID_BOTH Or .GridLines = GRID_VLINE Then nWidth = nWidth + .GridLineWidth * (nCol - 1) End If ' pro Spalte jetzt noch den vertikalen Abstand aufaddieren If .CellSpacingH > 0 Then nWidth = nWidth + .CellSpacingH * nCol End If ' horizontalen Scrollbalken auf den Beginn der Spalte positionieren .HScrollPos = nWidth End With End Sub Aufrufbeispiel: ' Gehe zu Spalte 10 GridScrollToColumn Grid1, 10 Weitere Infos zum sevDataGrid-Control unter: Dieser Tipp wurde bereits 5.980 mal aufgerufen. Voriger Tipp | Zufälliger Tipp | Nächster Tipp
Anzeige
Diesen und auch alle anderen Tipps & Tricks finden Sie auch auf unserer aktuellen vb@rchiv Vol.6 Ein absolutes Muss - Geballtes Wissen aus mehr als 8 Jahren vb@rchiv! - nahezu alle Tipps & Tricks und Workshops mit Beispielprojekten - Symbol-Galerie mit mehr als 3.200 Icons im modernen Look Weitere Infos - 4 Entwickler-Vollversionen (u.a. sevFTP für .NET), Online-Update-Funktion u.v.m. |
sevWizard für VB5/6 Professionelle Assistenten im Handumdrehen Erstellen Sie eigene Assistenten (Wizards) im Look & Feel von Windows 2000/XP - mit allem Komfort und zwar in Windeseile :-) Tipp des Monats Mai 2024 Hermann Röttger Wochentage eines Datumsbereichs ermitteln Wochentage eines Datumsbereichs ermitteln, optional mit Feiertagsberechnung TOP Entwickler-Paket TOP-Preis!! Mit der Developer CD erhalten Sie insgesamt 24 Entwickler- komponenten und Windows-DLLs. Die Einzelkomponenten haben einen Gesamtwert von 1605.50 EUR... |
||||||||||||||||
Microsoft, Windows und Visual Basic sind entweder eingetragene Marken oder Marken der Microsoft Corporation in den USA und/oder anderen Ländern. Weitere auf dieser Homepage aufgeführten Produkt- und Firmennamen können geschützte Marken ihrer jeweiligen Inhaber sein. |