如下VB程序段
Function s（n As Integer） As Integer
If n=1Then
s=1
Else
s=s（n-1）+n
End If
End Function
Private Sub Form_Click（　　）
Dim x As Integer
x=s（4）
Print x
End Sub
程序运行时，单击窗体后，变量x的值为（　　）