Re: 輸入字元 ,讓特定的元件動作?
※ 引述《leon329 (從缺)》之銘言:
> 想達成輸入 a~i,讓它觸動個別的 command_click 指令(1~20)
> 使用controls() 寫在 text_keydown 中
> 失敗 :(
> Private Sub text1_KeyDown(KeyCode As Integer, Shift As Integer)
> If KeyCode = vbKeyReturn Then
> For i = 0 To 19
> If Text1.Text = "a" + i or Text1.Text = "A" + i Then
Chr(96 + i) Chr(64 + i)
> ^^^^^^^^^ 相信這邊有錯,下面的是最重要的
> Controls ("call command_click" & i + 1)
> ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
> controls的功能不太了解,因此這邊字有排列過,依然有錯吧 @@'
> End If
> Next
> End if
> 有前輩知道該怎麼做可以達成?
> 另外,物件的顯示方面,monthview會被某些text擋住,我該調整什麼屬性呢??
> 謝謝 ^^"
我怎麼看怎麼怪><
是在Text1中是不是只能輸入一個字元
在輸入完後他會自己去執行 你command_click 中的程式
如果是這樣你為什麼不寫個副程式
在Text1_KeyDown中寫成
Select Case KeyCode
Case 65 ~ 73 (這兒實際語法忘了><)
副程式 (KeyCode)
Case 97 ~ 105
副程式 (KeyCode)
Case Else
Text1.text=""
End Select
副程式 (KeyCode)
以下為你要處理的東西
這樣應該可以吧
我是用VB6....如果有出入..也請大大指導一下
--
┌─────◆KKCITY◆─────┐ ◢╱ 只要你通過身份認證 ~ ◥█
│ bbs.kkcity.com.tw │ █▉─ 免經驗、五人連署即開班系板 ◥
└──《From:220.229.203.163 》──┘ ◥╲ 趕快為班上設個秘密基地吧! ◢
--
討論串 (同標題文章)
Programming 近期熱門文章
PTT數位生活區 即時熱門文章