用if----elseif及Select Case语句编写程序，输入顾客的购物款，计算并显示出顾客的实际应付款。

Private Sub Text1_Change()
Select Case Val(Text1)
Case Is > 5000
Text2 = Val(Text1) 06
Case Is > 1000
Text2 = Val(Text1) 07
Case Is > 500
Text2 = Val(Text1) 08
Case Is > 100
Text2 = Val(Text1) 09
Case Is > 0
Text2 = Val(Text1)
End Select
End Sub

以上就是关于用if----elseif及Select Case语句编写程序，输入顾客的购物款，计算并显示出顾客的实际应付款。全部的内容，包括:用if----elseif及Select Case语句编写程序，输入顾客的购物款，计算并显示出顾客的实际应付款。、、等相关内容解答，如果想了解更多相关内容，可以关注我们，你们的支持是我们更新的动力！