vb@rchiv
VB Classic
VB.NET
ADO.NET
VBA
C#
Sch?tzen Sie Ihre Software vor Software-Piraterie - mit sevLock 1.0 DLL!  
 vb@rchiv Quick-Search: Suche startenErweiterte Suche starten   RSS-Feeds  | Newsletter  | Impressum  | Datenschutz  | vb@rchiv CD Vol.6  | Shop Copyright ©2000-2019
 
zurück
Rubrik: Allgemein15.04.02
Was bedeutet hWnd?

VB-Version:  VB5, VB6
 Views:  34.987 

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 34.987 mal aufgerufen.

nach obenzurück
 
   

Druckansicht Druckansicht Copyright ©2000-2019 vb@rchiv Dieter Otter
Alle Rechte vorbehalten.
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.

Diese Seiten wurden optimiert für eine Bildschirmauflösung von mind. 1280x1024 Pixel