Меню в TextBox

[sQx]

Как убрать меню в текстбоксе.. Другими словами создать свое меню...

П. С. МЕНЮ - это когда нажимаешь правой кнопкой....

[ArtemV]

Private Declare Function LockWindowUpdate Lib "User32" (ByVal hwndLock As Long) As Long

Private Sub Text1_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single)
If Button = vbRightButton Then
LockWindowUpdate Text1.hWnd
Text1.Enabled = False
DoEvents
PopupMenu mnuText
Text1.Enabled = True
LockWindowUpdate 0&
End If
End Sub

[Amed]

Извиняюсь за оффтоп, но, ИМХО, такая тема уже была