举个例子,代码如下
a=123b=124c=125For i = 1 To 3 Select Case i Case 1 TracePrint a Case 2 TracePrint b Case 3 TracePrint c End SelectNext