※ 引述《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....如果有出入..也請大大指導一下 -- ┌─────◆ＫＫＣＩＴＹ◆─────┐ ◢╱ 只要你通過身份認證 ~ ◥█ │ bbs.kkcity.com.tw │ █▉─ 免經驗、五人連署即開班系板 ◥ └──《From:220.229.203.163 》──┘ ◥╲ 趕快為班上設個秘密基地吧! ◢ --