【文件属性】：
文件名称：VB桌面时钟软件
文件大小：28KB
文件格式：ZIP
更新时间：2016-12-24 13:36:17
VB，时钟
Private Sub CommandRate_Click()
Dim iRate As Long
'在朗读过程中,获得语速,范围在0-100直接,100为最快速度.
iReturn = SmartRead_GetSpeed(iRate)
'在朗读过程中,改变语速,范围在0-100直接,100为最快速度.
iReturn = SmartRead_SetSpeed(100)
End Sub
Private Sub CommandVolume_Click()
Dim iVolume As Long
'在朗读过程中,获得音量,范围在0-100之间,100为最高音.
iReturn = SmartRead_GetVolume(iVolume)
'在朗读过程中,改变音量,范围在0-100之间,100为最高音.
iReturn = SmartRead_SetVolume(100)
End Sub
【文件预览】：
桌面时钟
----更多源码.url(188B)
----时钟(钉在桌面)()
--------Form1.frm(6KB)
--------工程1.vbp(750B)
--------Form1.frx(1KB)
--------MSSCCPRJ.SCC(190B)
--------工程1.vbw(50B)
----免费『商业源码』.url(164B)
----时钟(置顶移动)()
--------更多源码.url(188B)
--------Form1.frm(6KB)
--------工程1.vbp(728B)
--------Form1.frx(35KB)
--------MSSCCPRJ.SCC(190B)
--------免费『商业源码』.url(164B)
--------【源码说明】.txt(2KB)
--------源码天空.htm(66B)
--------工程1.vbw(50B)
--------『源码天空』.url(164B)
----【源码说明】.txt(2KB)
----源码天空.htm(66B)
----『源码天空』.url(164B)