阅读下面程序: Private Function a(load As Integer) As SingleIf load <20 then money = load/2 else money =20 + load end if a = money End Function Private Sub Form_Click( ) Dim load As Integer, fee As Single Load = InputBox("请输入一个数:") fee= a(loaD)Print fee End Sub输入20,运行后的输出结果是 【6】 。