Отображение переменных в InputBox - VBA

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

                    Листинг программы
                
 
                        
                          
                    
Public Sub deemnson()
Dim a As Integer
Dim b As Integer
Dim c As Integer
Dim r As Integer
Dim u As Integer
Dim d As String
Dim e As Integer
Dim i As String
a = InputBox(введите a (от 1 до 100))
b = InputBox(введите b (от 1 до 100))
e = a + b
c = InputBox("сколько будет a + b")
    If e = c Then
        d = "Хорошо"
        Else
        d = "плохо"
        End If
        MsgBox d
End Sub

Здравствуйте, подскажите пожалуйста как сделать так, что бы в " c = InputBox("сколько будет a + b") ", вместо букв a и b, вводились значения этих переменных которые я ввожу заранее. Что бы результат был такой?

                    Листинг программы
                
a = InputBox(введите a (от 1 до 100))
'написал 2
b = InputBox(введите b (от 1 до 100))
'написал 3
e = a + b
c = InputBox("сколько будет 2 + 3")

Надеюсь я понятно объяснил проблему

Решение задачи: «Отображение переменных в InputBox»

textual
                            Листинг программы 
                        
 
                        
                          
                    
Public Sub deemnson()
    Dim a As Integer
    Dim b As Integer
    Dim c As Integer
    Dim r As Integer
    Dim u As Integer
    Dim d As String
    Dim e As Integer
    Dim i As String
' abcrudei. Уильям Оккам таки спрашивает - А зачем создавались лишние переменные (i,u,r)?
' Переменные можно объявлять в одной строке так: Dim a as integer, b as integer ... (и так далее). Впрочем, это дело вкуса.
    a = InputBox("Введите a (от 1 до 100)")
    b = InputBox("Введите b (от 1 до 100)")
    e = a + b
    c = InputBox("Сколько будет " & a & " + " & b & "?")
    If e = c Then
        d = "Хорошо"
    Else
        d = "плохо"
    End If
    MsgBox d
End Sub