返回列表 上一主題 發帖

[發問] SendKeys 要如何能夠輸入英文而非中文

Scott090

帖子
529 
主題
56 
精華
0 
積分
607 
點名
170  
作業系統
win 10 
軟體版本
[] 
閱讀權限
50 
性別
男 
註冊時間
2013-3-19 
最後登錄
2025-7-16 

2024年全勤獎章2023年全勤獎章2022虎年全勤獎章2021牛年全勤獎章2020鼠年全勤獎章2019 豬年全勤獎章2018 狗年全勤獎章2017 雞年全勤獎章2016猴年全勤獎章論壇榮譽勳章論壇贊助勳章2015羊年全勤獎章
1# 跳轉到 »
發表於 2017-1-17 05:14 | 顯示全部帖子
回復 1# PKKO

的確很困擾!!
之前有討論過輸入法的狀態：
    http://forum.twbts.com/thread-13747-1-1.html

TOP

Scott090

帖子
529 
主題
56 
精華
0 
積分
607 
點名
170  
作業系統
win 10 
軟體版本
[] 
閱讀權限
50 
性別
男 
註冊時間
2013-3-19 
最後登錄
2025-7-16 

2024年全勤獎章2023年全勤獎章2022虎年全勤獎章2021牛年全勤獎章2020鼠年全勤獎章2019 豬年全勤獎章2018 狗年全勤獎章2017 雞年全勤獎章2016猴年全勤獎章論壇榮譽勳章論壇贊助勳章2015羊年全勤獎章
2#
發表於 2017-1-17 10:05 | 顯示全部帖子
回復 1# PKKO


  '中文輸入模入
Sub CHmode()
    If IMEStatus = vbIMEModeOff Then
        SendKeys "+", True
    End If
End Sub

'英文輸入模式
Sub ENmode()
    If IMEStatus = vbIMEModeOn Then
        SendKeys "+", True
    End If
End Sub

TOP

        靜思自在 : 【停滯不前，終無所得】人都迷於尋找奇蹟，因而停滯不前；縱使時間再多、路再長，也了無用處，終無所得。
返回列表 上一主題