两个VB的初级题目在线等待。谢谢。

这个太简单啦，楼主，给我5分钟哈，马上给你做，保证质量的 第一题： Dim a As StringDim pai As SinglePrivate Sub Command1_Click()Text2 = 4 * pai * Val(a) * Val(a)Text3 = 4 / 3 * pai * Val(a) * Val(a) * Val(a)End SubPrivate Sub Form_Load()pai = 3.1415926a = InputBox("请输入圆的半径",