下列程序执行后，变量x的值为______。 Dim a, b, c, d As Single Dim x As Single a=100 b=20 c=1000 If b＞a Then d=a: a=b: b=d End If If b＞c Then x=b Elseif a＞c then x=c Else x=a End If
A: 100
B: 20
C: 1000
D: 0
A: 100
B: 20
C: 1000
D: 0
举一反三
- 下列程序执行后，变量x的值为( )。 Dim a,b,c，d As Single Dim x As Single a=100 b=20 c=1000 If b＞a Then d=a:a=b:b=d End If If b＞c Then x=b Elseif a＞c Then x=c Else x=a End If A: A) 100 B: B) 20 C: C) 1000 D: D) 0
- 下列程序执行后，变量x的值为（ ）。 Private Sub command1_click() Dim a, b, c, d As Single Dim x As Single a = 100: b = 20: c = 1000 If b > a Then d = a: a = b: b = d End If If b > c Then x = b ElseIf a > c Then x = c Else x = a End If End Sub
- 下列程序执行后，变量a的值为______。 dim a, b, c, d as single a=100 b=20 c=1000 if b＞a then d=a: a=b: b=d end if if c＞a then d=a: a=c: c: d end if if c＞b then d=b: b=c: c=d end if A: 0 B: 1000 C: 20 D: 100
- 执行下列程序段后，变量y的值为（ ）。 Dim x As Integer,y As Integer x = 7 y = 3 If x >= 10 Then y = x - y ElseIf x>= 7 Then y = x + y Else y = x End If A: 21 B: 10 C: 4 D: 3
- 下列程序执行后，变量a的值为______。 Dim a,b,c,d As Single a=10:b=20:c=40 If b＞a Then d=a:a=b:b=d End If If c＞a Then d=a:a=c:c=d End If If c＞b Then d=b:b=c:c=d End If A: 10 B: 40 C: 20 D: 100