Как загрузить файл в TextBox по относительному пути - VB

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

Имеется программа состоящая из нескольких форм. При открытии одной из форм в TextBox загружается и отображается содержимое блокнота:

                    Листинг программы
                
 
                        
                          
                    
Private Sub Form_Load()
Dim txt As String
Dim NFile As Integer
NFile = FreeFile
Open "J:\Тест\Тест-контроль\Mat.txt" For Input As #NFile
Do While Not EOF(1)
Line Input #NFile, txt
Text1.Text = Text1.Text & txt & vbCrLf
Loop
Close #NFile
End Sub

Но возникает проблема. Открыть эту форму на другом компьютере не выйдет, либо выйдет если совпадет путь. Можно ли сделать так что бы открытие файла не зависело от его пути? Т.е Путь автоматически бы присваивался если к примеру вставив флэшку в другой комп буква носителя меняется допустим на "Е"

Решение задачи: «Как загрузить файл в TextBox по относительному пути»

textual
                            Листинг программы 
                        
Open "Mat.txt" For Input As #NFile

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

7 голосов , оценка 4.286 из 5

Нужна аналогичная работа?

Оформи быстрый заказ и узнай стоимость

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