本文提供了一个使用VBScript进行变量值交换的简单示例。通过定义两个整数变量并利用第三个临时变量来实现值的交换，展示了基本的编程逻辑和流程控制。
Private Sub Command1_Click()
Cls
Dim b As Integer, c As Integer
Dim d As Integer
c = Int(Rnd() * 1000)
b = Int(Rnd() * 1000)
Print "b=" & b
Print "c=" & c
d = c
c = b
b = d
Print "b=" & b
Print "c=" & c
End Sub
Cls
Dim b As Integer, c As Integer
Dim d As Integer
c = Int(Rnd() * 1000)
b = Int(Rnd() * 1000)
Print "b=" & b
Print "c=" & c
d = c
c = b
b = d
Print "b=" & b
Print "c=" & c
End Sub
扫一扫
1768
被折叠的 条评论
为什么被折叠?
到【灌水乐园】发言
