Re: [VB6 ] 輸入字元 ，讓特定的元件動作?
※ 引述《Hotan (昊天)》之銘言：
: ※ 引述《fumizuki (矇面加菲獅)》之銘言：
: : 假設你的文字方塊是Text1，command分別為command1、command2、...
: : cmdName = "Command" & CStr(Asc(UCase(Text1.Text))-65)
: : CallByName Me, cmdName, VbMethod
: 謝謝版大的回答，不過我放到keydown中有bug.. 陌生的語法完全不會抓..程式如下
我主要是想知道，若在版大覺得程式邏輯或是用法上用錯的話就會提出來
陌生的語法不會抓蟲，當然就是指
cmdname = "Command" & CStr(Asc(UCase(Text1.Text)) - 64)
CallByName Me, cmdname, VbMethod
: Private Sub Text1_KeyDown(KeyCode As Integer, Shift As Integer)
: Select Case KeyCode
: Case 65 To 84
: cmdname = "Command" & CStr(Asc(UCase(Text1.Text)) - 64)
: CallByName Me, cmdname, VbMethod
: Case Else
: Text1.Text = ""
: End Select
: End Sub
: : 在表單設計狀態點 monthview 物件，點格式功能表，物件層次，移至頂層
: vb是英文版的，format下選項灰色居大部份，都不能選 @@
: 是因為少灌了什麼嗎?? 重拉也一樣
: 發現text的問題可能比較大，因為monthview其實在其他的text上都在最上面
: 我複製一般的text，但在那個"位置"上就是不會被擋住...
: 只能往"位置"上想了@@ 實在太沒道理了....@@
--
--
※ 發信站: 批踢踢實業坊(ptt.cc)
◆ From: 202.132.132.184
→
07/13 22:32, , 1F
07/13 22:32, 1F
推
07/14 07:42, , 2F
07/14 07:42, 2F
推
07/14 07:43, , 3F
07/14 07:43, 3F
推
07/14 07:43, , 4F
07/14 07:43, 4F
討論串 (同標題文章)
本文引述了以下文章的的內容：
完整討論串 (本文為第 4 之 8 篇)：
Visual_Basic 近期熱門文章
PTT數位生活區 即時熱門文章