- 疑问? 如果计价单位为RMB,点击人民币按钮,RMB单位结果不变 如果计价单位为USD,点击美元按钮,USD单位结果不变 - 分析? IF....THEN 如果....那么 ELSE 否则 .... END IF 结束 - 解决方法 'FOR 循环 Option Explicit '将人民币价格转换为美元价格 Sub TESTPRICE() Dim PRICE, V 'V循环变量 PRICE = Cells(5, 2) '汇率 '循环的开始 For V