主调过程 被调过程 Private Sub Form ClickO) Function area() 0。4.0 s=area(a,b,c) area=. End Functioin End Sub Private Sub Form_Click() . s=area(a,b,c) . End Sub Function area() . . area=. End Functioin 主调过程 被调过程