返回列表下一主題上一主題發帖

[發問] 關於指定textbox1~但是沒有反應!

av8d

大學生 Rank: 4

帖子: 710
主題: 280
精華: 0
積分: 1016
點名: 0
作業系統: Windows 10
軟體版本: Office 2019
閱讀權限: 50
性別: 男
註冊時間: 2011-6-30
最後登錄: 2025-1-19

1^# 跳轉到 » 倒序看帖

打印

字體大小: tT

發表於 2011-9-29 12:15 | 只看該作者

[發問] 關於指定textbox1~但是沒有反應!

Private Sub TextBox1_KeyDown(ByVal KeyCode As MSForms.ReturnInteger, ByVal Shift As Integer)
If KeyCode = 27 Then
TextBox1 = ""
TextBox1.Activate
End If
End Sub

樓主熱帖

oobird

　頭銜: 街友一族

超級版主 Rank: 8 Rank: 8

帖子: 1572
主題: 16
精華: 2
積分: 1521
點名: 0
作業系統: xp
軟體版本: office 2003
閱讀權限: 150
性別: 男
註冊時間: 2010-5-1
最後登錄: 2016-1-13

論壇貢獻勳章

2^#

發表於 2011-9-29 12:36 | 只看該作者

TextBox1.SetFocus
TextBox1.Activate~沒有這個屬性

TOP

av8d

大學生 Rank: 4

帖子: 710
主題: 280
精華: 0
積分: 1016
點名: 0
作業系統: Windows 10
軟體版本: Office 2019
閱讀權限: 50
性別: 男
註冊時間: 2011-6-30
最後登錄: 2025-1-19

3^#

發表於 2011-9-29 12:42 | 只看該作者

回復 2# oobird

謝謝大大~會出現"物件不支援此屬性方法"
可能我表達的不夠清楚~我是希望他會和我們用滑鼠點一下textbox1一樣~然後會有個直線一直閃爍那樣!

TOP

oobird

　頭銜: 街友一族

超級版主 Rank: 8 Rank: 8

帖子: 1572
主題: 16
精華: 2
積分: 1521
點名: 0
作業系統: xp
軟體版本: office 2003
閱讀權限: 150
性別: 男
註冊時間: 2010-5-1
最後登錄: 2016-1-13

論壇貢獻勳章

4^#

發表於 2011-9-29 14:35 | 只看該作者

會的喔！你指定的是esc鍵，按下去就會跳到textbox1，並有一直線閃爍。

TOP

靜思自在 : 每天無所事事，是人生的消費者，積極、有用才是人生的創造者。

返回列表下一主題上一主題