计算问题？
我现在有三个文本框
希望，在第一个文本框输入港币，在第二个文本框中输入金钱数目，
在第三个文本框中显示换算汇率以后的金钱数目，港币的汇率是106.55
希望告诉我源代码。谢谢！
问题点数：0、回复次数：2Top
1 楼hongsongboy（红松）回复于 2003-11-03 20:06:42 得分 0
相乘不就可以了吗Top
2 楼captainivy（Ivy）回复于 2003-11-03 22:31:54 得分 0
Private Sub Command1_Click()
Select Case Combo1.Text
Case "港币"
Text2 = Val(Text1) * 汇率
Case "美元"
'加代码
End Select
End Sub
Private Sub Form_Load()
Combo1.AddItem "港币"
Combo1.AddItem "美元"
End Sub
新建工程加一个combo
两个textbox
Top
