VB6.0 подскажите начинающему, это очень простой вопрос

[zxspec]

1. Например написал я програмку а там надо чтобы результат выводился в метку (Label), так вот например одной переменной (к примеру "а") присвоено значение "23" второй (к примеру b) "февраля" как сделать так чтобы в метке выводилось 23 февраля (с пробелом) а то когда пишешь Label1=a&b получается 23февраля (без пробела) как сделать пробел?

2. Маленький вопрос: к примеру программе надо из файла input.txt взять числа "23 02" (номер дня и месяца) вывести их на List1 при нажатии на кнопку в поле List2 должно появиться "23 февраля".
P.S. Я не до конца тупой кое что смогу например создать меню Открыть, Сохранить, Выход и т.д. но вот с тем как работать с числами из текстового файла вообще не пойму, подскажите.

Откликнувшимся огромное спасибо, если кого финансово интересует за выполнение 2-ой программы (полностью), могу заплатить тем более что она проста до безобразия

[Stilet]

1.

 Label1.text = a & " " & b

2.

Эм... в Выжуал Барсике вообще- то хелп тоже еще не отменили:

Dim InputData
Open "MYFILE" For Input As #1    ' Open file for input.
Do While Not EOF(1)    ' Check for end of file.
    Line Input #1, InputData    ' Read line of data.
    Debug.Print InputData    ' Print to the Immediate window.
Loop
Close #1    ' Close file.

[EducatedFool]

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

 Label1.text = a & " " & b

Вообще-то, свойство text у элемента Label в VB6 отсутствует...
Зато есть свойство Caption: Label1.Caption = a & " " & b

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

2. Маленький вопрос: к примеру программе надо из файла input.txt взять числа "23 02" (номер дня и месяца) вывести их на List1 при нажатии на кнопку в поле List2 должно появиться "23 февраля".

Извлеките все файлы из вложения в одну папку, и запустите файл Обработка дат из текстового файла.exe

Вот весь код:

Private Sub Form_Load()
    FileName = App.Path & "\" & "input.txt"
        If Dir(FileName) = "" Then MsgBox "Файл  " & FileName & "  не найден", vbCritical, "Ошибка": End
    
    Open FileName For Input As #1    ' Open file for input.
    Do While Not EOF(1)              ' Check for end of file.
        Line Input #1, InputData     ' Read line of data.
        Me.List1.AddItem InputData   ' Print to the Immediate window.
    Loop
    Close #1                         ' Close file.
    
    Me.Label1.Caption = "Сегодня  " & Date
End Sub

Private Sub List1_Click()
    t = Me.List1.Text: d = Val(Split(t, " ")(0)): m = Val(Split(t, " ")(1))
    Me.Text1.Text = DateSerial(2009, m, d)
    Me.Text2.Text = Format(DateSerial(2009, m, d), "d mmmm")
End Sub

Список дат читается из файла с именем input.txt
Пощелкайте на датах в списке List1

[zxspec]

Спасибо вам, уже не раз выручаете. Я оказался тупее чем думал подскажите пожалуйста: существует MDI-форма на ней стандартное меню "Открыть" "Сохранить" "Выход" с открыть и выход я справился а вот сохранить не могу, к тому же нужно не просто сохранить, а сделать так чтобы при нажатии на "сохранить" результат к примеру из поля text сохранялся в текстовом файле в той же папке в которой находится проект а имя у него должно быть output.txt как такое провести хотя бы намёк дайте

[EducatedFool]

Пример процедуры для команды сохранения:

Private Sub Command1_Click()
    FileName = App.Path & "\" & "output.txt"
    If Dir(FileName) <> "" Then
        msg = "Файл  " & FileName & "  уже существует.  Заменить?"
        If MsgBox(msg, vbInformation + vbOKCancel, "Подтверждение") = vbCancel Then Exit Sub
    End If
    
    Open FileName For Output As #1
        Print #1, "Строка  " & Me.List1 & "   распознана как дата  " & Me.Text1
        Print #1, vbTab & vbTab & "и преобразована в " & Me.Text2
    Close #1
End Sub

В результате в файл пишется что-то вроде этого:

Строка 31 12 распознана как дата 31.12.2009
и преобразована в 31 декабря

Пример во вложении:

[zxspec]

EducatedFool, золотой вы человек. спасибо ещё раз