6、写程序计算以下累加和的结果' “1-2+3-4+5-6+7……-20=”,' 并把结果通过窗体打印出来 。'-------------------------------------------------Private Sub Form_Click() Dim i%, s% 'i为循环变量,s保存累加和的结果 '**********Program********** For i = 1 To 20 Step 1 s = s + (-1) ^ (i + 1) * i Next i Print s '********** E