Foxtable(狐表)用户栏目专家坐堂 → 语音朗读 提示 值不在预期范围内


  共有2565人关注过本帖树形打印复制链接

主题:语音朗读 提示 值不在预期范围内

帅哥哟,离线,有人找我吗?
ljh29206
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:六尾狐 帖子:1359 积分:12010 威望:0 精华:0 注册:2012/3/5 11:32:00
语音朗读 提示 值不在预期范围内  发帖心情 Post By:2014/12/11 11:20:00 [只看该作者]

If dt1.DataCols(i1).Name <> dr1("异常项目") Then
If dr1(dt1.DataCols(i1).Name)  >= Format(Date.now,"HH:mm") And dr1(dt1.DataCols(i1).Name) < Format(Date.now.AddMinutes(1),"HH:mm")  And dr1.IsNull(dt1.DataCols(i1).Name.Replace("计划","")) = True Then
Dim str1 As String = (dr1(dt1.DataCols("客户")) & "," & dr1("便次") & "," & dt1.DataCols(i1).Name.Replace("计划结束","") &  ",时间," & format(dr1(dt1.DataCols(i1).Name),"HH:mm") & "已经过了,管理者" &  cb.Text & ",请确认进度!")
sp.Speak(str1 , DotNetSpeech.SpeechVoiceSpeakFlags.SVSFDefault)
End If

 

sp.Speak(str1 , DotNetSpeech.SpeechVoiceSpeakFlags.SVSFDefault)

如题,语音朗读 提示 值不在预期范围内   查看代码应该没找到问题,不知道怎么处理!


 回到顶部
帅哥哟,离线,有人找我吗?
Bin
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:贵宾 帖子:35433 积分:178524 威望:0 精华:3 注册:2013/3/30 16:36:00
  发帖心情 Post By:2014/12/11 11:22:00 [只看该作者]

上个例子看看吧

 回到顶部
帅哥哟,离线,有人找我吗?
有点甜
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2014/12/11 11:22:00 [只看该作者]

  msgbox一下 str1  的值

 回到顶部