活动二修改、完善程序.pptxVIP

活动一中将美元兑人民币的汇率设为常量，但实际上汇率是一直波动的，汇率的值应改为程序运行时由用户输入。小明打算对程序进行修改。1活动二修改、完善程序2

因为汇率的值不固定，在程序运行时由用户输入，所以应将活动一中定义为常量的汇率RA改为变量，设用ra表示。为方便用户输入汇率和美元值，以及观察换算结果，考虑使输入与输出在同一窗体中实现。1．分析问题。

打开活动一中的工程文件change.vbp。设计图形用户界面。向窗体中添加控件，并设置窗体及控件的属性。实现应用程序。

文本框控件被用来显示用户输入的信息，或者通过给Text属性赋值来输出信息。

活动一的程序代码PrivateSubForm_Click()DimusdAsSingleDimrmbAsSingleConstRAAsSingle=8.2765usd=Val(InputBox(输入美元))rmb=usd*RAPrint可兑换人民币Format(rmb,0.00)元EndSub

修改为活动二的程序代码PrivateSubCommand1_Click()DimusdAsSingleDimrmbAsSingleDimRaAsSingleRa=Val(TxtRa.Text)rmb=Val(Txtrmb.Text)TxtRmb.Text=rmdEndSub

打开代码