阅读下面程序:
Private Function a(load As Integer) As Single
If 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】 。
题库:计算机等级考试
类型:填空题
时间:2017-07-03 15:00:46
免费下载:《填空》Word试卷
阅读下面程序:
Private Function a(load As Integer) As Single
If 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】 。
本题关键词:AS-DAE染色,AS-D-NCE染色法,氯乙酸AS-D萘酯酶,醋酸AS-D萘酚酯酶,醋酸AS-茶酚酯酶染色,Solis AS Peek融合器(融合器),氯醋酸AS-D萘酚酯酶,醋酸AS-D茶酚脂酶染色,醋酸AS-D萘酚酯酶染色,面试程序;