qzgx.net
当前位置:首页 >> vB中gEtFoCus >>

vB中gEtFoCus

getfocus是一个事件,就是当光标移到某个地方时,会发生其他什么事呢! 例子: private sub command1_click() if(text1.text=text2.text) then text3.setfocus end if end sub private sub text3_getfocus() text3.text="" end sub

区别如下:setfocus是把焦点放置在**之上的方法.getfocus是获得焦点时引发的事件.

getfocus 是事件,当一个控件得到焦点时触发,setfocus是方法,是人为的让某个控件得到焦点.

setfocus是方法,例如text1.setfocus可以让text1获得焦点getfocus和losefocus是事件,当控件获得焦点和失去焦点时分别触发这两个事件.如用text1.setfocus语句让text1获得焦点时,就会触发getfocus事件.当光标从text1移开时就会触发losefocus事件

setfocus是把焦点放置在**之上的方法……getfocus是获得焦点时引发的事件……

setfocus是一个属性,就是可以通过这个属性,将光标移到某个地方.而getfocus是一个事件,就是当光标移到某个地方时,会发生其他什么事呢!例子:private sub command1_click()if(text1.text=text2.text) thentext3.setfocusend ifend subprivate sub text3_getfocus()text3.text=""end sub

好像你打错了吧?应该是gotfocussetfocus 是方法,也就是使某个对象获得焦点,而gotfocus 是事件,也就是当某个对象获得焦点的时候会发生什么事.例子:Text1.SetFocus..Private Sub Command1_GotFocus() ..End Sub

Dim TipFlag As BooleanPrivate Sub txtcontent_gotfocus()TipFlag = True '设置一个标识 提醒程序 这个是程序设置的txtcontent.Text = "大家好,课程还难吗"End SubPrivate Sub txtcontent_change()If TipFlag = False Then '如果不是程序输入内容lblshow.Caption = "标签的作用大家还清楚吗"Else 'Gotfocus改变了内容TipFlag = False '让它提醒标识清除 这样下一次修改内容时候就会触发上面的内容End IfEnd Sub

gotfocus 是事件,当控件获得焦点的时候发生 setfocus 是方法,不是事件,在代码中使用setfocus ,能让控件活得焦点,进而发生 gotfocus 事件

GotFocus:当对象获得焦点是产生该事件通常,GotFocus事件过程用以指定当控件或窗体首次接收焦点时发生的操作.LostFocus:此事件是在一个对象失去焦点时发生通常,LostFocus事件过程主要是用于对更新进行验证和确认.使用LostFocus可以在焦点移离控件时引进确认.这类事件过程的另一种用途与在GotFocus事件过程中的应用类似,可以隐藏、显示其它对象或者使它们有效或无效.也可以设置在该对象的GotFocus事件过程中的条件取反或对其进行更改.

网站首页 | 网站地图
All rights reserved Powered by www.qzgx.net
copyright ©right 2010-2021。
内容来自网络,如有侵犯请联系客服。zhit325@qq.com