Private Sub Text4_GotFocus()
Dim Prvi As Double
Dim Drugi As Double

Prvi = Me.PrviBroj
Drugi = Me.DrugiBroj

Me.Text4 = Prvi + Drugi

End Sub