Re: [VB6 ] 輸入字元 ，讓特定的元件動作?
找到哪裡的問題了...
第一，因為事件觸發順序的關係，KeyDown 的時候，TextBox 的內容尚未改變：
Private Sub Text1_KeyDown(KeyCode As Integer, Shift As Integer)
Select Case KeyCode
Case vbKeyA To vbKeyT
cmdname = "Command" & CStr(KeyCode - (vbKeyA - 1) & "_click"
Case Else
Text1.Text = ""
Exit Sub
End Select
CallByName Me, cmdname, VbMethod
End Sub
第二，被 CallByName 呼叫的副程式必須為公有方法：
Public Sub Command1_Click()
MsgBox 1
End Sub
--
▃▅▇▆▄ ▆▂▃ `
逝去感情如何能留住，半點癡情遺留殊不易，██▅▇▄▃ ▇▃▂" .
█████████▃i ▁▄▇
更多悽悽慘慘的遭遇…………██▆▃ █▅▆▃ˍ▄*
◢ ▂█▄▇▅▂▌.
我不知道，王～八～蛋～～！ ▂▆███ █▄▃ 。fumizuki。Check。
--
※ 發信站: 批踢踢實業坊(ptt.cc)
◆ From: 218.184.116.195
討論串 (同標題文章)
以下文章回應了本文：
完整討論串 (本文為第 7 之 8 篇)：
Visual_Basic 近期熱門文章
PTT數位生活區 即時熱門文章