题目内容

运行下面程序，如果输入80，则输出结果是_____。Dim a As Integer, i As Integera = InputBox("input a:")If a > 60 Then i = 1If a > 70 Then i = 2If a > 80 Then i = 3If a > 90 Then i = 4Print "i="; i

查看答案

搜索结果不匹配？点我反馈

更多问题

编写如下程序Private Sub Command1_Click()Dim x As String, y As Stringx = Right("abcdef", 2)y = Mid("dcbaef", 3, 3)If x > y ThenPrint x + yElsePrint y + xEnd IfEnd Sub程序运行后，单击命令按钮Command1，输出结果为______。

执行下面程序段，如果运行时输入6，则在窗体上输出结果是______。Dim x As Integerx = InputBox("input x")If x > 1 Theny = x + 2ElseIf x < 10 Theny = x + 3ElseIf x = 6 Theny = xEnd IfPrint y

Private Sub Command1_Click()m = -5.4If Sgn(m) Thenn = Int(m)Elsen = Abs(m)End IfPrint nEnd Sub

运行如下程序段，输出结果为________。Private Sub command1_click()a = 2: b = 3: c = 4a= a + b: b = b + a: c = b + aIf a <> 3 Or b <> 3 Thena = b - a: b = c - a: c = b + aEnd IfPrint a + b + cEnd Sub