一个圆柱形粮囤，从里面量得底面半径是1米，高1.5米，如果里面装1.1米高的粮食，粮食的体积是多少立方米？

编程实现加法运算，在两个文本框中输入加数，用标签表示结果，单击按钮进行计算，完成下列计算过程。
Private Sub Command1_Click()
Dim AAs Integer,B As Integer
A= (6)
B=Val(Text2.Text)
(7) =A+B
End Sub