如何不用API使文本框属性只读？

资讯 2008-03-18 驱动中国 rocket 1,957 次阅读 0 条评论

以下两种方法都可实现：

Private Sub Text1_GotFocus()
Text1.Locked = True
End Sub
Private Sub Text1_LostFocus()
Text1.Locked = False
End Sub
Private Sub Text1_KeyDown(KeyCode As Integer, _
Shift As Integer)
KeyCode = 0
End Sub

Private Sub Text1_KeyPress(KeyAscii As Integer)
KeyAscii = 0
End Sub

属性文本不用如何 Sub Private End As

本文价值 ★★★★★ — 成为第一个评分的人

登录后为本文打分

网友评论0 条评论

正在回复的评论取消

评论加载中…

🔐

登录后参与互动

评论、点赞均可赚积分
连续签到、邀请好友也有奖励 🎁

电脑端: 微信扫码登录微信内: 一键登录

如何不用API使文本框属性只读？

登录后参与互动

微信扫一扫