编写以下程序, 程序运行后,如果单击命令按钮,则输出结果为 。 Sub Proc(x As Single, y As Single) t = x x = t / y y = t Mod y End Sub Private Sub Command1_Click() Dim a As Single Dim b As Single a = 5 b = 4 Proc a, b Print a, b End Sub 单击命令按 , 下列程序代码的执行结果为 Function FirProc(x As Integer, y As Integer, z As Integer) FirProc = 3 * x + y + 2 * z End Function Function SecProc(x As Integer, y As Integer, z As Integer) SecProc = FirProc(z, x, y) + x End Function Private Sub Command1_Click() Dim a As Integer, b As Integer, c As Integer a = 2: b = 3: c = 4 Print SecProc(c, b, a) End Sub