Private Sub Command1_Click()
Dim a As Integer
Dim b As Integer
Dim c As String
Dim d As String
a = 1.2 + 2.2
b = 2.3 + 1.3
c = "100"
d = c + "200"
Print a
Print b
Print c
Print d
End Sub