101Sub过程 2.直接使用过程名调用 格式:过程名[实参[,实参]…] Private Sub Command1 Click Dim r, a,s As single r=Va1( InputBox("输入半径R") sr r. a. S Print: print: Print Print“半径:";r Print“面积:";a Print“周长:";s End sub2.直接使用过程名调用 格式：过程名[实参[，实参]…] Private Sub Command1_Click() Dim r, a, s As Single r = Val(InputBox("输入半径R")) sr r, a, s Print: Print: Print Print “半径："; r Print “面积："; a Print “周长："; s End Sub 10.1 Sub过程