|
導(dǎo)讀數(shù)據(jù)庫,簡而言之可視為電子化的文件柜——存儲電子文件的處所,用戶可以對文件中的數(shù)據(jù)進(jìn)行新增、截取、更新、刪除等操作。所謂“數(shù)據(jù)庫”是以一定方式儲存在一起、能與多個用戶共享、具有盡可能小的冗余度、與應(yīng)... 數(shù)據(jù)庫,簡而言之可視為電子化的文件柜——存儲電子文件的處所,用戶可以對文件中的數(shù)據(jù)進(jìn)行新增、截取、更新、刪除等操作。所謂“數(shù)據(jù)庫”是以一定方式儲存在一起、能與多個用戶共享、具有盡可能小的冗余度、與應(yīng)用程序彼此獨(dú)立的數(shù)據(jù)集合。 5、聲明一函數(shù),用于最終調(diào)用: Function MyReadMoney(Decimal AMoney) 代碼實(shí)現(xiàn)如下: integer i,count string ls_dxje ls_dxje = xx2dx(Amoney) count = len(ls_dxje) for i= 1 to count step 2 CHOOSE CASE mid(ls_dxje,i,2) CASE "零" playsound("0.wav",0) CASE "壹" playsound("1.wav",0) CASE "貳" playsound("2.wav",0) CASE "叁" playsound("3.wav",0) CASE "肆" playsound("4.wav",0) CASE "伍" playsound("5.wav",0) CASE "陸" playsound("6.wav",0) CASE "柒" playsound("7.wav",0) CASE "捌" playsound("8.wav",0) CASE "玖" playsound("9.wav",0) CASE "拾" playsound("十.wav",0) CASE "佰" playsound("佰.wav",0) CASE "仟" playsound("仟.wav",0) CASE "萬" playsound("萬.wav",0) CASE "億" playsound("億.wav",0) CASE "元" playsound("元.wav",0) CASE "角" playsound("角.wav",0) CASE "分" playsound("分.wav",0) CASE "整" playsound("整.wav",0) END CHOOSE next
6、在程序中,可以任意調(diào)用此函數(shù)。當(dāng)然,可以適當(dāng)加入出錯處理一類的代碼。 7、備注:如果不能發(fā)聲,應(yīng)檢查聲音文件是否在可執(zhí)行文件的同一路徑,最好是在函數(shù)MyReadMoney中,對各wav文件直接加上路徑如C:\temp
全新的路由器不僅讓你更穩(wěn)定快速地連接無線網(wǎng)絡(luò),更可以讓家中的智能設(shè)備連接在一起。
|