Как построчно прочитать текст из Clipboard или из TextBox - VB

Формулировка задачи:

Надо перевести в строковый массив МультиЛайновый текст из Clipboard. Пока пользуюсь таким обходным манёвром, но думаю что ДОЛЖЕН быть прямой путь...

m = Clipboard.GetText: Text1 = m:
Open "C:/morganhend.txt" For Append As #1:
Print #1, m: Close:
 
Open "C:/morganhend.txt" For Input As #1:
For i = 1 To 100: If EOF(1) = True Then Exit For
Line Input #1, mm(i):
Next:Close #1:

Подскажите, плз !!

Решение задачи: «Как построчно прочитать текст из Clipboard или из TextBox»

textual
                            Листинг программы 
                        

                            Dim mm() As String
'.................................
Private Sub Com_Проба_Click()
Dim del$
del = vbLf '? или vbcrlf? 'или vblf?
mm() = Split(Clipboard.GetText, del)
End Sub
                        

Оцени полезность:

9 голосов , оценка 4.111 из 5

Похожие ответы