vb中label如何既输出文字又输出变量

Private Sub Command1_Click()
Dim a As Integer
Dim b As Integer
Dim c As Integer
Dim s As Integer

a = Int(Val(Text1.Text))
b = Int(Val(Text2.Text))
c = Int(Val(Text3.Text))
s = a * b * c
Label4.Caption = ("面积为：") PS：就在这后面加上变量s的值，如何实现啊
End Sub