...2.下面程序的功能是什么? Dim A As Integer, B As Integer, C...
Private Sub Command1_Click() Dim n%, i%, j&, s& n=InputBox("n=") j=1: s=0 For i=1 To n j= (1) (2) Next i Print "s="; s End Sub 2.下面程序的功能是什么? Dim A As Integer, B As Integer, C As Integer B = 0 For A = 101 To 200 If A Mod 2 = 0 Then B...