Здравствуйте, Senchuk Roman Valerievich Sage!
1). У кнопки есть есть свойство Style, которое должно быть установлено в окне свойств кнопки в значение Graph, а потом свойству Picture этой же кнопки надо присвоить рисунок (либо открыть, нажав на кнопку с тремя точками, либо присвоить в коде, например, из ресурсов: Set Command1.Picture=LoadResPicture(101,vbResIcon)).

2). Команда "Line Input" читает в переменную типа String строку из открытого файла.
Вот ее синтаксис:
Line Input #номерФайла, Переменная
номерФайла получается вызовом FreeFile, а переменная - и так понятно.

Команда последовательно считывает из файла по одному символу до тех пор, пока не встретит символ возврата каретки (vbCr) или комбинацию символов возврата каретки и перевода строки (vbCrLf). Cчитанная таким образом строка записывается в переменную (без символов конца строки), которую, например, можно записать уже куда Вам надо.
Например:

Dim strText as string, iFile as Integer, iIter as Integer

iFile=FreeFile
Open "MyFile.txt" For Input As #iFile ‘ Открываем файл
iIter = 0

Do While Not EOF(iFile) ‘ Цикл до конца файла
Line Input #iFile, strText ‘ Читаем строку в переменную
iIter = iIter + 1

‘Если это нечетная строка
If ((iIter Mod 2) <> 0) Then ‘Это 1, 3, 5, 7 и т. д. строки
TextBox.Text = TextBox.Text & strText
Else
‘Это четная строка - 2, 4, 6, 8 и т. д.
Label.Caption = strText
End If
Loop

Close #iFile ‘ Закрываем файл

Вот этот пример читает из текстового файла все строки. Нечетные сбрасываются в текстовое поле, а четные - в метку. Понятно, что это на пальцах, но развить идею дальше Вы уже сами сможете - например, ввести в программу массив меток и текстовых полей, добавлять по новому элементу при каждом считывании нечетной строки и заполнять их.
Удачи!