dim m表示單身，r表示單身，h表示單身
M=val(text1.text)'美元數量
H=8.099 '匯率
R=m*h '轉換
標簽1。caption = format (r，" #。# # " '顯示兌換的人民幣金額。
末端接頭