编程论坛
注册
登录
编程论坛
→
VB6论坛
VB 文本框获得焦点时弹出气泡提示框
sml
发布于 2013-08-09 06:01, 775 次点击
VB 文本框获得焦点时弹出气泡提示框,不是Move事件
Private Sub Form_Load()
Me.Show
Text1.SetFocus
End Sub
此时,光标在Text1中,显示气泡提示框;不是Move 光标移动到Text才显示气泡提示框。
[
本帖最后由 sml 于 2013-8-9 09:36 编辑
]
2 回复
#2
bczgvip
2013-08-09 17:40
private sub Text1_GotFocus()
debug.print "1"
end sub
private sub Text2_GotFocus()
debug.print "2"
end sub
自己用tab 键试试吧。还有【弹出气泡提示框】就自己做吧。
#3
hankerasd
2013-08-10 17:21
文本框获得焦点时要求以气泡形式弹出提示框
文本框获得焦点时要求以气泡形式弹出一个提示框
首先下载form-field-tooltip插件(google一下,遍地都是,此处不提供下载地址了就)
引入插件:
<link rel="stylesheet" href="/form-field-tooltip/css/form-field-tooltip.css" media="screen" type="text/css">
<script type="text/javascript" src="/form-field-tooltip/js/rounded-corners.js"></script>
<script type="text/javascript" src="/form-field-tooltip/js/form-field-tooltip.js"></script>
应用:
<INPUT> 或 <TEXTAREA>的文本框,文本域都可以使用。
<input type="text" id="firstname" name="firstname" tooltipText="Type in your firstname in this box">
初始化和配置SCRIPT:
<script type="text/javascript">
var tooltipObj = new DHTMLgoodies_formTooltip();
tooltipObj.setTooltipPosition('right');
tooltipObj.setPageBgColor('#EEE');
tooltipObj.setCloseMessage('Exit');
tooltipObj.initFormFieldTooltip();
</script>
按照上述配置之后,当鼠标点击文本框之后即可弹出一个气泡提示框。本文转自:http://www.
1