冰楓論壇

標題: VB.net RC語音洗頻功能 [打印本頁]

作者: tongsin35768491 時間: 2017-4-29 08:05
標題: VB.net RC語音洗頻功能
本帖最後由 tongsin35768491 於 2017-5-6 05:29 編輯

洗頻程式寫完之後測試在記事本能正常洗頻
到了RC語音卻甚麼都跑不出來
有些換到英文
請問為甚麼呢..?

作者: Torin 時間: 2017-4-29 11:14
把你的 Code 貼出來啊，這樣誰知道問題！

作者: tongsin35768491 時間: 2017-4-29 11:33

Torin 發表於 2017-4-29 11:14
把你的 Code 貼出來啊，這樣誰知道問題！

Private Sub Form1_KeyUp(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyEventArgs) Handles Me.KeyUp
      Select Case e.KeyCode
         Case Keys.F1
            Button1.PerformClick()
         Case Keys.F3
            Button2.PerformClick()
      End Select
End Sub

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
      Timer1.Enabled = True
End Sub

Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
      Timer1.Enabled = False
End Sub

Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick
      SendKeys.Send(TextBox1.Text)
      SendKeys.Send("{Enter}")
End Sub
----------------
現在這個程式碼是洗頻的，跟創建頻道一樣沒效果..

作者: qwas963563 時間: 2017-4-29 12:46

tongsin35768491 發表於 2017-4-29 11:33
Private Sub Form1_KeyUp(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyEventArgs) Hand ...

用 keybd_event 這個函數試試

作者: tongsin35768491 時間: 2017-4-29 12:59
沒用哦...我的問題是我就算先按Button在回到RC視窗執行，還是一樣沒效果

作者: YYYpo 時間: 2017-5-5 15:34
很簡單啦...只是你不會寫而已

歡迎光臨冰楓論壇 (https://bingfong.com/)