求获取剪贴板内容后，如果有数字，则在数字后面添加一位指定数字。

cj4025

求获取剪贴板内容后，如果有数字，则在数字后面添加一位指定数字。

$sp = ObjCreate("SAPI.SPVoice")
$sp.volume = 100
While True
        Sleep(100)
        $str = ClipGet()
        If StringLen($str) > 0 Then
                $sp.speak($str)
                ClipPut("")
        EndIf
WEnd 

感谢www378660084   、3mile  提供。

就是想不让语音库读数字成为1百3十9亿9千9百9十9万9千9百9十9  这样，就是想读成单个数字。

求高手解决方法。。

kevinch

HotKeySet("{esc}","ExitMe")

$sp = ObjCreate("SAPI.SPVoice")
$sp.volume = 100
While True
    Sleep(100)
    $str = ClipGet()
    If StringLen($str) > 0 Then
        $str=StringRegExpReplace($str,"(\d)","$1 ")
        $sp.speak($str)
        ClipPut("")
    EndIf
WEnd
        
Func ExitMe()
    Exit 0
EndFunc

这样试下

cj4025

可以的。谢谢你了。。

$str=StringRegExpReplace($str,"(\d)","$1 ")

这句怎么解释？？能给教下么？

cj4025

明白了。。谢谢哦。
我换了一个地方。哈哈。谢谢。空格读起来慢，逗号快了点。。

                $str=StringRegExpReplace($str,"(\d)","$1,")

kevinch

我这里试的时候只能读英文，所以，空格是不读的

cj4025

谢谢了，高手。

紫色风林

这个得学学，谢谢老师