Gruppe
Dialog
Problem
Der ControlTipText-Eigenschaft eines Steuerlementes kann man keinen Zeilenumbruch zuweisen. Dieses Beispiel demonstriert ein simuliertes ControlTipText auf Basis eines Labels.
ClassModule: frmHWH
Private Sub cmdCancel_Click()
Unload Me
End Sub
Private Sub Image1_MouseMove(ByVal Button As Integer, ByVal Shift As Integer, ByVal X As Single, ByVal Y As Single)
If X > 5 And Y > 5 And X < 70 And Y < 70 Then
Label1.Visible = 1
Label1.Caption = "Dies ist" & vbLf & "Hans W. Herber"
Else
Label1.Visible = 0
End If
End Sub
Private Sub UserForm_Click()
End Sub
StandardModule: Modul1
Sub CallForm()
frmHWH.Show
End Sub