设为首页收藏本站Access中国

Office中国论坛/Access中国论坛

 找回密码
 注册

QQ登录

只需一步,快速开始

返回列表 发新帖
查看: 1268|回复: 6
打印 上一主题 下一主题

[其它] 请教如何不显示光标?

[复制链接]
跳转到指定楼层
1#
发表于 2006-5-25 17:57:00 | 只看该作者 回帖奖励 |正序浏览 |阅读模式
各位老师,当打开一个窗体时,光标会落在某个文本框或命令键上,如何设置或写代码,可使光标在打开该窗体时不可见。请指教。
分享到:  QQ好友和群QQ好友和群 QQ空间QQ空间 腾讯微博腾讯微博 腾讯朋友腾讯朋友
收藏收藏 分享分享 分享淘帖 订阅订阅
7#
 楼主| 发表于 2006-5-27 00:50:00 | 只看该作者
感谢以上各楼的支持。问题解决。
6#
发表于 2006-5-25 23:30:00 | 只看该作者
Private Declare Function HideCaret Lib "user32" (ByVal hwnd As Long) As Long

Private Sub Form_Load()
    SendKeys "{end}"
    Text0_KeyUp 0, 0
End Sub

Private Sub Text0_KeyUp(KeyCode As Integer, Shift As Integer)
    HideCaret (0)
End Sub

随便说一句,标题应该叫隐藏插入符。

[此贴子已经被作者于2006-5-25 15:37:15编辑过]

5#
发表于 2006-5-25 21:45:00 | 只看该作者
将焦点移到记录选择器上面。

DoCmd.RunCommand acCmdSelectRecord

[此贴子已经被作者于2006-5-25 14:08:58编辑过]

4#
 楼主| 发表于 2006-5-25 19:35:00 | 只看该作者
这招果然很厉害,但我是要隐藏闪烁的光标,不是鼠标。请再指教。我的目的是,打开一个充满命令键和提示说明的文本框的窗体时,不想看到有个光标在闪烁。但鼠标是万万不可不显示的。多谢。
3#
发表于 2006-5-25 18:32:00 | 只看该作者
Private Declare Function ShowCursor Lib "user32" (ByVal bShow As Long) As Long
Private Sub Form_Load()
    ShowCursor 0     '隐藏光标
End Sub
2#
发表于 2006-5-25 18:22:00 | 只看该作者
请说明一下你的真正用途
您需要登录后才可以回帖 登录 | 注册

本版积分规则

QQ|站长邮箱|小黑屋|手机版|Office中国/Access中国 ( 粤ICP备10043721号-1 )  

GMT+8, 2024-11-15 20:35 , Processed in 0.115160 second(s), 31 queries .

Powered by Discuz! X3.3

© 2001-2017 Comsenz Inc.

快速回复 返回顶部 返回列表