无
*注意事项:
For <循环变量>=<初值> to <终值> [step <步长>]
<循环体>
Next <循环变量>
① ② ③ ④
Dim i As Integer, s As Integer
s=4
i=9
If i < 1 Then
i=i-3
Else
i=s+i
End If
s=1
For i=1 to 3
s=s*i
Next i
已知摄氏度C转换到华氏度F的公式是 ,设计界面设计如下,请将打乱的代码进行排序。
Private Sub Command1_Click()
End Sub
打乱的代码如下:
A. F=9/5*C+32
B. Text2.Text= str(F)
C. Dim C, F As Single
D. C = Val(Text1.Text)
微信扫码预览、分享更方便
详情