程序题（01） Dim x x = Int(Rnd) + 5 Select Case x Case 5 Print "优秀" Case 4 Print "良好" Case 3 Print "通过" Case Else Print "不通过" End Select该程序段显示的运行结果是_________。程序题（02）给定程序段： Dim a As Integer, b As Integer, c As Integer a=1:b=2:c=3 If a=c-b Then Print "#####" Else Print "*****" End If以上程序_________。程序题（03）Private Sub Form_Click() A = 3 If A <= 3 Then Print 3; End If If A <= 4 Then Print 4; End If If A <= 5 Then Print 5; End If If A <= 6 Then Print 6; End If PrintEnd Sub程序运行结果为________.程序题（04）有如下程序，其输出结果为________。Private Sub command1_click() x = Sqr(2) \ 2 + Sgn(2) \ 2 + Rnd(2) \ 2 y = Sqr(3) \ 3 + Sgn(3) \ 3 + Rnd(3) \ 3 If x > y Then Print "x>y" ElseIf x = y Then Print "x=y" Else Pri