程序运行流程: Private Sub Command1 Click Dim f1#, f2# 找函数名调用ishu1② Function jishu1(x! eps#) As Doubl f1= fishy1(2#0.000001) jishu=表达式 ④函数名带了值返回 End funct 找孑过程名调用shu2 Call jishu22,2#,0.000001) Sub jishu2(s#, x!, eps#) prin1=";1,"12=";2 End sub s=表达式 End sub程序运行流程： Private Sub Command1_Click() Dim f1#, f2# f1 = jishu1(2#, 0.000001) Call jishu2(f2, 2#, 0.000001) Print "f1="; f1, "f2 = "; f2 End Sub Function jishu1(x!, eps#) As Doubl … jishu=表达式 End Function 找函数名调用jishu1 函数名带了值返回 Sub jishu2(s#， x!， eps#) … s=表达式 End Sub ① ② ③ ④ ⑤ 找子过程名调用jishu2 ⑥ ⑦ ⑧