Re: [VB6 ] 關於MsgBox用法

看板Visual_Basic作者 (侰侰侁)時間19年前 (2006/03/26 19:49), 編輯推噓1(100)
留言1則, 1人參與, 最新討論串4/5 (看更多)
還是老大細膩啊﹐嘿嘿 果然不一樣 ※ 引述《fumizuki (矇面加菲獅)》之銘言: : Chr(13) 是不正確的,windows的換行符號一定要13(cr)+10(lf) : strMsg = "應找金額為" & total & "元" & vbCrLf : strMsg = strMsg & "以下為找零明細" & vbCrLf & vbCrLf : Dim unit(1) : unit(0) = Split("一千,一百,五十,十元,五元,一元", ",") : unit(1) = Split("張,張,個,個,個,個", ",") : For i = 0 To UBound(unit(0)) : strMsg = strMsg & unit(0)(i) & money(i) & unit(1)(i) & vbCrLf : Next : MsgBox strMsg -- ※ 發信站: 批踢踢實業坊(ptt.cc) ◆ From: 81.156.102.162

03/26 20:03, , 1F
請善用推文系統@@
03/26 20:03, 1F
文章代碼(AID): #149d_7ze (Visual_Basic)
討論串 (同標題文章)
文章代碼(AID): #149d_7ze (Visual_Basic)