完成程序，使其具有下列功能：求表达式1－2＋3－4＋…＋n的值，在文本框Text1中输入一个正整数，单击“计算”按钮Command1，在标签Label3中输出计算结果。程序界面如下图所示：  
程序代码如下：
Private Sub Command1_Click()
Dim n As Integer
Dim s As Integer
n =     ①     
j = 1
For i = 1 To n
    s = s + i * j
    j =   ②  
Next i
Label3.Caption =    ③  
End Sub