x=1
y=2
x, y = y, x
print(x,y)
Private Sub Command1_Click()
Dim i As Integer
Dim s As ‘(s变量存放总和,此处定义它为单精度变量类型)
For i=1 To
s=
Next i
Print s
End Sub
a=5
b=2 b=a
print(a+b)
Dim a As Integer, b As Integer
a=6
b=8
S=1+a*b/2
Print S