VBA Kontextmenue in UF kleine Probleme
04.02.2004 11:29:26
Lupus
Mit folgendem Code rufe ich ein Kontextmenue in einer UF-Textbox auf:
Private Sub TextBox1_MouseDown(ByVal Button As Integer, ByVal Shift As Integer, ByVal X As Single, ByVal Y As Single)
If Button = 2 Then m_Menue.ShowPopup
End Sub
Wähle ich jetzt ein Kontextmenue-Punkt aus wird der entsprechende Code ausgeführt. Bisher funktioniert alles einwandfrei, nur wird, seltsamerweise, das Kontextmenue noch einmal angezeigt. Wie kann man das vermeiden?
Wie weist man dem ersten Kontextmenue-Eintag zum Beispiel das Icon für Ausschneiden zu?
Gruß Lupus