有如下事件过程：
　　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