輸入字元 ,讓特定的元件動作?
想達成輸入 a~i,讓它觸動個別的 command_click 指令(1~20)
使用controls() 寫在 text_keydown 中
失敗 :(
Private Sub text1_KeyDown(KeyCode As Integer, Shift As Integer)
If KeyCode = vbKeyReturn Then
If Text1.Text = "a" + i or Text1.Text = "A" + i Then
^^^^^^^^^ 相信這邊有錯,下面的是最重要的
Controls ("call command_click" & i + 1)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
controls的功能不太了解,因此這邊字有排列過,依然有錯吧 @@'
End If
Next
Else
MsgBox "非正確的選項! 請重新輸入", , "輸入錯誤"
Text1.SetFocus
SendKeys "{home} + {end}"
End If
有前輩知道該怎麼做可以達成?
另外,物件的顯示方面,monthview會被某些text擋住,我該調整什麼屬性呢??
謝謝 ^^"
--
┌─────◆KKCITY◆─────┐ KK免/費/撥/接 ◤
│ bbs.kkcity.com.tw │▏電話(1):449◤1999 電話(2):4058-6000
└──《From:202.132.132.184 》──┘▏帳號:kkcity 密碼:kkcity
--
討論串 (同標題文章)
Programming 近期熱門文章
PTT數位生活區 即時熱門文章