Вставить текст в поле по позиции курсора

[nlvz]

1) Есть текст, уже заранее введённый пользователем «руками» в текстовое поле Text1(32).
Рядом сделана кнопка Command5, по которой в текстовое поле Text1(32) записывается предложение «Добро пожаловать!», но это предложение-шаблон появляется только в конце «пользовательского» текста,
Private Sub Command5_Click()
If Len(Text1(32)) > 0 Then
Text1(32) = Text1(32) + " "
End If
Text1(32) = Text1(32) + "Добро пожаловать!"
Text1_LostFocus 32
End Sub

а НАДО вставить «Добро пожаловать!» – ПО ПОЗИЦИИ КУРСОРА (где в тексте поставить курсор, туда по кнопке и вставиться предложение). Помогите!

2) Для этого же примера:
Научите вставлять в текстовое поле Text1(32) готовое предложение из файла, т.е. фраза «Добро пожаловать!» записана в файле 1.txt. Как указать на имя файла и дальше - на содержимое этого файла, чтобы фразу вставить в текст?

[Viper]

По моему товарисч наработал на предупреждение минимум по двум пунктам - дубль темы и вопрос в неправильном разделе!

[alibek]

nlvz, не злоупотребляй данным разделом, тебе сюда рано.