Проверьте, пожалуйста, правильно ли я составила программный код на языке программирования VBA в MS Access

нахождения суммы и произведения цифр двузначного числа:
Private Sub Кнопка8_Click()
Dim n As Single, S As Single, P As Single
n = Поле1
S = a + b
P = a * b
Поле3 = S
Поле5 = P
End Sub
Заранее благодарю.