有如下事件过程：　　Private Sub Form Click（）　　Dim n A s Integer　　x=0　　n=InputBox（"请输入一个整数”）　　For i=1 Ton　　For j=1 To i　　x=x＋I　　Next j　　Next i　　Print x　　End Sub　　程序运行后，单击窗体，女口果在输入对话框中输入：，则在窗体上显示的内容是

A．13

B．14

C．15

D．16