| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
欢迎加入我们,一同切磋技术
用户名:   
 
密 码:  
共有 573 人关注过本帖
标题:有一问题请教一下
取消只看楼主 加入收藏
SPKLJL
Rank: 1
等 级:新手上路
帖 子:33
专家分:0
注 册:2008-9-19
收藏
 问题点数:0 回复次数:2 
有一问题请教一下
问题如下:

If KeyAscii = 13 Then SendKeys "{Tab}"

我想在一个文本框中回车实现进入下一个文本框用了以上的代码,但为什么我一点回车就会有一声提示音,很是难听,而如果直接点击TAB就不会有提示音,哪位高手帮帮忙???

谢谢
2008-10-22 11:24
SPKLJL
Rank: 1
等 级:新手上路
帖 子:33
专家分:0
注 册:2008-9-19
收藏
得分:0 
其实还是有声音的,后来我在网上查了一下,发现应该是这样实现的:

Private Sub txtfax_KeyPress(KeyAscii As Integer)

If KeyAscii = vbKeyReturn Then
KeyAscii = 0
SendKeys "{Tab}"
End If

End Sub

加一条KEYASCII=0就可以了.
2008-10-22 14:19
SPKLJL
Rank: 1
等 级:新手上路
帖 子:33
专家分:0
注 册:2008-9-19
收藏
得分:0 
楼上的把全部的代码发上来看看
2008-10-22 17:15
快速回复:有一问题请教一下
数据加载中...
 
   



关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 0.023205 second(s), 8 queries.
Copyright©2004-2025, BCCN.NET, All Rights Reserved