Not until she told me the truth____________________(我才意识到我们要马上采取行动).
拍照语音搜题,微信中搜索"皮皮学"使用
参考答案:
参考解析:
知识点:
皮皮学刷刷变学霸
举一反三
【单选题】Private Sub Form_Click() Dim x As Integer, a As Integer Dim y As Integer x = 50 a = 0 For i = 1 To 4 y = Val(InputBox("请输入一个整数")) If y Mod 5 = 0 Then a = a + y x = y Else a = a + x End If Next i Print...
【简答题】以下程序的功能是计算并输出两个整数的最大公约数。Private Sub a1()Dim x As Integer, y As Integer, t As Integerx = InputBox("请输入x的值")y = InputBox("请输入y的值")Do【 】x = yy = tLoop While (t 0)Debug.Print 【 】End Sub有如下语句:1 t = x 2 t ...
【单选题】P65.以下程序的功能是计算并输出两个整数的最大公约数。 Private Sub al() Dim x As Integer, y As Integer, t As Integer X = InputBox("请输入 x 的值") y = InputBox("请输入 y 的值") Do [] x=y y=t Loop While (t0) Debug.Print [] End Sub 有如下语句:...