Динамическое изменение содержания текста Label. Возможно ли?

[Blame]

Добрый день!
Подскажите, пожалуйста, возможно ли динамически вводить/изменять текст компоненты Label по двойному щелчку по этой компоненте?
Со статическим присвоением текста все понятно:

Private Sub Label4_DblClick(ByVal Cancel As MSForms.ReturnBoolean)
Label4.Caption = "Такой-то текст"
End Sub

Хотелось бы, чтобы пользователь мог изменять содержимое Label вручную, на запущенной формe (в режиме Run).
Может, есть другой вариант того, как это можно визуально сделать?

Спасибо!

[alex77755]

Мне нравятся такие вопрсы!!
И главное процедура готовая есть.
Но вынужден огорчить: Так нельзя. Можно так:

Private Sub Label14_DblClick(ByVal Cancel As MSForms.ReturnBoolean)
Label14.Caption = "А самому просто попробовать слабо?"
End Sub

[alex77755]

Ну или как вариатнт:

Private Sub Label14_DblClick(ByVal Cancel As MSForms.ReturnBoolean)
Label14.Caption = InputBox("Введите нужный текст", "", "А самому просто попробовать слабо?")
End Sub

[IgorGO]

ладно... см.вложение

[TariK]

Сообщение от IgorGO

ладно... см.вложение

IgorGO, здравствуйте!
можете написать на taras_hvil@mail.ru?
У меня несколько вопросов к вам

[Blame]

Спасибо большое
Получилось)