Die hWnd-Eigenschaft gibt eine Zugriffsnummer für ein Formular oder Steuerelement zurück, d. h. ein eindeutiger ganzzahliger Wert, der von der Betriebsumgebung definiert wird und von einem Programm verwendet wird, um ein Objekt (zum Beispiel eine Form oder ein Steuerelement) zu kennzeichnen und zu einem Objekt zu wechseln. Meistens wird eine Zugriffsnummer auch als Handle bezeichnet. Die hWnd-Eigenschaft wird im Zusammenhang mit Aufrufen der Windows-API verwendet. Viele Funktionen der Windows-Arbeitsumgebung benötigen die hWnd-Zugriffsnummer des aktiven Fensters als Argument. Und hier ein Beispiel zum Ausprobieren: Sie benötigen eine Form, auf die Sie einen CommandButton und eine ComboBox setzen. Der CommandButton bekommt den TabIndex = 0, die ComboBox den TabIndex = 1. Und jetzt der Code: Option Explicit ' Funktion deklarieren Private Declare Function SendMessage Lib "user32" _ Alias "SendMessageA" ( _ ByVal hwnd As Long, _ ByVal wMsg As Long, _ ByVal wParam As Long, _ lParam As Long) As Long ' beim Starten die ComboBox mit Einträgen füllen Private Sub Form_Load() Combo1.AddItem "Frühling" Combo1.AddItem "Sommer" Combo1.AddItem "Herbst" Combo1.AddItem "Winter" End Sub ' wenn die ComboBox den Fokus erhält, automatisch aufklappen Private Sub Combo1_GotFocus() Const CB_SHOWDROPDOWN = &H14F' Konstante für das Aufklappen der ComboBox Dim Tmp ' mittels der Funktion SendMessage die ComboBox aufklappen Tmp = SendMessage(Combo1.hwnd, CB_SHOWDROPDOWN, 1, ByVal 0&) End Sub ' mittels CommandButton den Fokus auf die ComboBox setzen Private Sub Command1_Click() Combo1.SetFocus End Sub Diese Seite wurde bereits 38.820 mal aufgerufen. |
TOP! Unser Nr. 1 Neu! sevDataGrid 3.0 Mehrspaltige Listen, mit oder ohne DB-Anbindung. Autom. Sortierung, Editieren von Spalteninhalten oder das interaktive Hinzufügen von Datenzeilen sind ebenso möglich wie das Erstellen eines Web-Reports. Buchempfehlung Tipp des Monats April 2024 Skyfloy Chart von Microsoft und dazu noch gratis Tutorial für Microsoft Chart Controls für Microsoft .NET Framework 3.5 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. |