争怎路由网:是一个主要分享无线路由器安装设置经验的网站,汇总WiFi常见问题的解决方法。

在pb中用语音读金额(4)

时间:2024/5/14作者:未知来源:争怎路由网人气:

数据库,简而言之可视为电子化的文件柜——存储电子文件的处所,用户可以对文件中的数据进行新增、截取、更新、删除等操作。所谓“数据库”是以一定方式储存在一起、能与多个用户共享、具有尽可能小的冗余度、与应用程序彼此独立的数据集合。
5、声明一函数,用于最终调用:
        Function MyReadMoney(Decimal AMoney)
       
  代码实现如下:
  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、在程序中,可以任意调用此函数。当然,可以适当加入出错处理一类的代码。
  7、备注:如果不能发声,应检查声音文件是否在可执行文件的同一路径,最好是在函数MyReadMoney中,对各wav文件直接加上路径如C:\temp



全新的路由器不仅让你更稳定快速地连接无线网络,更可以让家中的智能设备连接在一起。



关键词:在pb中用语音读金额(4)




Copyright © 2012-2018 争怎路由网(http://www.zhengzen.com) .All Rights Reserved 网站地图 友情链接

免责声明:本站资源均来自互联网收集 如有侵犯到您利益的地方请及时联系管理删除,敬请见谅!

QQ:1006262270   邮箱:kfyvi376850063@126.com   手机版