过程代码段如下，单击Button1后，消息框中显示的结果是______。 Private Function P%(ByVal n As Integer) Dim i%, Sum% For i = 1 To n Sum = Sum + 1 Next i Return Sum End Function Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click Dim S% S = P(1) + P(2) + P(3) + P(4) MsgBox(S) End Sub
A、4
B、10
C、16
D、20
