Функции Msgbox и InputBox

[roxy7]

Задание: Отобразить информацию о введенном пользователем студенте в окне MSGBOX. Поиск осуществляется по номеру зачетной книжки(используя SQL и VBA).
Как сделать так, чтобы в окне msgbox появлялись данные из таблицы?
Тут таблицы в БД:функции.zip

[aaaaa52]

пфффф

PHP код:

Private Sub Кнопка0_Click()
    Dim str As String
    Dim sql As String
    Dim rst As Recordset
    
    str = InputBox("введите номер зачетной книжки")
    sql = "select * from Студент where №Зач_кн=" & str
    Set rst = CurrentDb.OpenRecordset(sql)
    If rst.RecordCount > 0 Then
        str = "ФИО: " + rst("ФИО") + ", Дата_рождения: " + rst("Дата_рождения") + ", группа: " + rst("группа")
        MsgBox (str)
    Else
        MsgBox ("номер зачетной книжки не найден")
    End If
End Sub