小工具发布,QCountDown-语音倒计时

原创
2016/07/11 18:20
阅读数 1.4K

【软件名称】QCountDown 语音倒计时

【开发平台】Windows Visual Basic

【软件简介】小工具哈,可以设置不同的事件倒计时,在桌面会显示最近的一次事件的倒计时,还有语音播报功能(系统启动时自动播报和点击QVoice按钮时播报)

【软件截图】

【软件下载】QCountDown_Installer-0.2.32.exe 

http://pan.baidu.com/s/1o7Ui3hg

【主窗口加载的代码片段】

Private Sub Form_Load()
    On Error GoTo load_err

    QDB.Log Me.Name & " Load hWnd=" & Me.hwnd

    Call InitUI        '加载UI界面
    Call InitConfig        '加载应用配置

    Dim theme As New Cls_Theme
    theme.ThemeDir = App.Path & "\Config\Theme"
    theme.InitThemes

    Select Case Command
        Case "boot"
            Frm_Show.ShowDisplay LatestEventName, Str(LatestEventDayCount)

            If AppConf.QVoiceEnable Then
                Shell "qvoice -s 最近的事件是" & LatestEventName & ",还有" & LatestEventDayCount & "天"
            End If

    End Select

    Exit Sub
load_err:
    QDB.Runtime_Error Me.Name & "_Load", Err.Description, Err.Number
    Resume Next
End Sub

 

展开阅读全文
打赏
0
0 收藏
分享
加载中
更多评论
打赏
0 评论
0 收藏
0
分享
返回顶部
顶部