vb中单击命令按钮触发哪些事件
使用一个全局变量，每次单击，变量加一，直到达到最大，最大后给变量赋初值。再根据变量的数值，执行相应的操作即可。 Public n As IntegerPrivate Sub Command1_Click()n = n + 1Command1.Caption = nIf n >= 7 Then n = 0End Sub
使用静态变量或全局变量可达到此种效果，以静态变量为例，参考代码：
Option ExplicitPrivate Sub Command1_Click() Static i As Integer i = i + 2 Print String$(i, "V")End SubPrivate Sub Form_Load() AutoRedraw = TrueEnd Sub演示动画：
(1).Click事件:是鼠标单击时所产生的事件.click事件既可由用户触发,也可由执行事件的程序代码触发.
(2).Dbclick事件:双击鼠标时产生的事件.
(3).mousedown和mouseup事件:当鼠标指针指向对象并按下鼠标左键时触发mousedown事件,当释放鼠标左键时触发mouseup事件.
(4).mousemove事件:在对象上移动鼠标指针时产生的事件.
(5).dragdrop事件:用鼠标拖动对象时产生的事件.
(6).downclick和upclick事件:当用鼠标单击组合框、列表框或微调器的向下箭头时,触发downclick事件;单击向上箭头时,触发upclick事件.
2.键盘事件keypress:单击某一键时产生的事件.通常对获取焦点的对象,当按下键盘键并放开时触发keypress事件.参数:键ASCⅡ码,shiftctrlalt状态
其中,shiftctrlalt状态为三键值的和.shift值为1,ctrl值为2,alt值为4
3.改变对象内容事件interactivechange:当用操作改变对象内容时交触发此事件,比如改变文本框中的内容将触发文本框的interactivechange事件.
4.对象的焦点事件:当对象取得焦点(focus)时,该对象将成为当前活动对象,操作将面向该对象.若文本框取得焦点,光标将在文本框中闪烁,指明编辑文本的当前位置.当命令按钮获得焦点时,按钮框内出现虚线框.属于控件焦点的事件有:获取焦点,失去焦点以及获取和失去焦点前触发的事件.
(1).获取焦点事件gotfocus:当对象获取焦点时将触发gotfocus事件,而获取焦点的方法可以通过按tab键,鼠标单击对象或对对象使用setfocus方法.注意:只有对象的enabled和visible属性为\"真\"(.T.)时,对象才能获得焦点.
(2).失去焦点事件lostfocus:当对象失去焦点时将触发该事件.对象可能因操作失去焦点,例如重新选择对象或单击另一对象;也可能在程序代码中执行获取焦点的方法setfocus.失去焦点的事件代码常用于取消gotfocus事件代码所做的工作,例如取消在执行gotfocus事件过程代码所提供的指导用户操作信息.
(3).when事件:此事件在对象获取焦点前发生.如果when事件返回真值,则对象可获取焦点;否则对象不能获取焦点.
(4).vaid事件:在对象失去焦点前触发此事件,以控制对象是否真的失去焦点.若vaid返回真值,对象才可失去焦点;否则对象不会失去焦点.
5.表单事件:
(1).load事件:load事件在创建表单集或表单之前触发,其事件过程代码常用于做表单集或表单的初始化工作.如果是表单集,则先触发表单集的load事件,然后触发表单的load事件.
(2).unload事件:unload事件是释放表单集或表单之前被触发的最后一个事件.在触发该事件之前先触发表单或表单集的destroy事件,使对象无效.例如,释放表单集时触发的destroy和unload事件顺序如下所示:
在代码窗口选command1 在右侧的分选栏中你就会看到以下的触发事件
Command1_Click()
Command1_DragDrop(Source As Control, X As Single, Y As Single)
Command1_DragOver(Source As Control, X As Single, Y As Single, State As Integer)
Command1_GotFocus() Command1_KeyDown(KeyCode As Integer, Shift As Integer)
Command1_KeyPress(KeyAscii As Integer)
Command1_KeyUp(KeyCode As Integer, Shift As Integer)
Command1_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single)
button=1 是左键=2是右键
Command1_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single Command1_MouseUp(Button As Integer, Shift As Integer, X As Single, Y As Single)Command1_OLECompleteDrag(Effect As Long) Command1_OLEDragDrop(Data As DataObject, Effect As Long, Button As Integer, Shift As Integer, X As Single, Y As Single)
Command1_OLEDragOver(Data As DataObject, Effect As Long, Button As Integer, Shift As Integer, X As Single, Y As Single, State As Integer) Command1_OLEGiveFeedback(Effect As Long, DefaultCursors As Boolea Command1_OLESetData(Data As DataObject, DataFormat As Integer)
Command1_OLEStartDrag(Data As DataObject, AllowedEffects As Long)
触发按钮的Click事件
vb语言的特点
VB语言特点：1、不支持继承 VB 5.0 和 VB 6.0 都是基于对象的编程语言，但是不包含继承特性。VB 中提供了特殊的类的功能，但是还是不能满足程序员的需求。2、无原生支持多线程 Visual Basic 对于多线程无原生支持，只能通过Windows API的调用实现，且极其的不稳定。因为在API创建的线程中，并没有...
计算机基础知识简答题题库
A:关掉计算机主机的电源 B:连续按两次 Ctrl+Alt+DelC:按一次 Ctrl控制键+Alt换档键+Del D:按计算机主机上的"RESET"复位键 6、在"对话框"窗口中,选项前有"□"框的按钮是___按钮。A:单选 B:复选 C:命令 D:滚动 7、激活快捷菜单的操作是___。 A:单击鼠标左键 B:移动鼠标 C:拖放鼠标 D:单击鼠标右...
2018年3月计算机二级考试Access模拟试题四
(7)若有以下窗体单击事件过程：Private Sub Form—Click( )打开窗体运行后，单击窗体，则消息框的输出内容是( )。A.1 B.4 C.15 D.120 (8)在窗体中有一个命令按钮Commandl和一个文本框Textl，编写事件代码如下：打开窗体运行后，单击命令按钮，文本框Textl输出的结果是( )。A.6 B.12 C.18...
在窗体中添加一个命令按钮(名称为Command1),然后编写如下代码:
static是定义静态变量的，b只在第一次单击按钮时生成，第二次、第三次只是使用而不是再生成。不过那个b没有初始值，可能是系统默认是0吧
求一套VB题库
程序运行后,单击命令按钮,输出结果为A) 2 3 4 B) 2 5 9C) 3 5 4 D) 2 4 3B(34) 下面程序段,运行后的结果是Private Sub Command1_Click() Dim b%(1 To 4) , i%, t# For i=1 To 4 b(i) =i Next i t=Tof(b() ) Print "t="; t,End SubFunction Tof(a() As Integer) ...
如何实现VB的命令按钮command1单击后按钮上的文字变成红色,再单击变 ...
5妙）enabled设为false(不可用)Dim color as long 在Command1_click加入以下代码 color=command1.backcolor Command1.backcolor=vbred Timer1.enable=true 说明，让按钮颜色变为红色，让时间记可用…双击timer1 在Timer1_timer事件中添加代码 command1.backcolor=color timer1.enabled=false ...
怎样用vb编程使在文本框中输入的秒数,单击命令按钮后转换成时分秒并在...
Private Sub Command1_Click()Dim i, j, iHour, iMinute, iSecond As Integer i = Val(Text1.Text)iSecond = i Mod 60 i = i \\ 60 iMinute = i Mod 60 i = i \\ 60 iHour = i Mod 60 Label1.Caption = Str(iHour) & "小时" & Str(iMinute) & "分" & Str(iSecond) ...
...上画一个命令按钮,名称为Command1。单击命令按钮时,执行如下事件过 ...
a$="software and hardware"b$=Right(a$,8)c$=Mid(a$,1,8)MsgBox a$,,b$,c$,1
以下所列各项属于命令按钮事件的是( )。
【答案】：D D。【解析】Parent是对象的一个属性，属性值为对象引用，指向该对象的直接容器对象。This、ThisForm和ThisFormSet是三个关键字，它们分别表示当前对象、当前表单和当前表单集。Click事件是在控件上单击鼠标左键时发生，事件可以由用户引发，户用鼠标单击界面上的一个命令按钮就触发了一次Click...
下列说法中,错误的是
【答案】：C 按钮的Picture属性可以给命令按钮指定一个图形，为了使用这个属性，必须把Style属性设置为1。单击命令按钮或将焦点移至命令按钮上，按Enter键，都会引发命令按钮的Click事件。命令按钮不支持DblClick事件。
典盾安尿： (2).Dbclick事件:双击鼠标时产生的事件. (3).mousedown和mouseup事件:当鼠标指针指向对象并按下鼠标左键时触发mousedown事件,当释放鼠标左键时触发mouseup事件. (4).mousemove事件:在对象上移动鼠标指针时产生的事件. (...
贵溪市14747218497： 在VB中单击窗体会触发哪些事件 - ？
典盾安尿： 在这之前呢:百度帮你完成.＂初始化＂的事件 第一个呢:就是发生你＂单击＂百度提问的按钮的事件 第二个呢:就是发生你获得我的＂焦点＂事件.第三个呢:就是发生我在游览＂移动＂你的提问事件 第四个呢:就是发回答完了我关闭网页,你丢失我的＂焦点＂ 总之,在这里还有很多你想不到的事件会发生.但是上面的事件是你确实发生的.
贵溪市14747218497： 在VB中,当用鼠标单击窗体时,会触发哪些事件? - ？
典盾安尿： Form_ClickForm_MouseDown如果窗体没有焦点的时候单击,还有Form_Gotfocus
贵溪市14747218497： VB中当程序运行后用鼠标单击对象时触发的事件是? - ？
典盾安尿： 鼠标的 对象的mouse_down 按下 对象的mouse_up 抬起 附送一个对象的 mouse_move 移动鼠标到对象上面 点击 click
贵溪市14747218497： VB 鼠标点击后触发了什么 - ？
典盾安尿： 你说的这个是模拟鼠标操作,你的意思不是用命令来打开“我的电脑”,而是模拟鼠标操作双击来打开我的电脑.很容易做到.但用VB来做,非常偶尔会出现些系统问题.首先我们要知道windows的基本机理,windows是一种消息机制,所有处...
贵溪市14747218497： VB中如何实现单击一个按钮同时触发两个事件? - ？
典盾安尿： 1,在第一个按钮的过程中,调用第二个按钮 Private Sub Command1_Click() Call Command2_Click()'调用command2的过程...'完成自己的事件 End Sub2,做成一个单独的外部过程 Private Sub Command1_Click() Call mySub()'调用外部过程...'完成自己的事件 End Sub Private Sub mySub()'这是外部过程 End Sub
贵溪市14747218497： vb常见的对象事件主要有 - ？
典盾安尿： 众所周知,在VB中,系统为一些常用的对象,例如窗体,命令按钮等等预设了一些事件,比如Click事件等等.所以A不对.VB只是提供了这些对象事件,而具体比如点击按钮之后执行什么过程,通常都是由我们编写者根据需要来写的.所以B不对.比如Click事件,我们创建3个命令按钮,给每个按钮的Click事件编写不同的过程,那么对于同一事件Click事件,作用于3个命令按钮,因为编写的过程不一样,所以引发的反应也不同.所以D错误.
贵溪市14747218497： vb对象具有属性和什么 - ？
典盾安尿： VB对象是具有特殊属性(数据)和行为方式(方法)的实体. VB中的对象包括Form、Text、Commandbotton、List及自定义对象. 对象是代码和数据的组合,可以作为一个单位来处理.对象可以是应用程序的一部分,比如可以是控件或窗体...
贵溪市14747218497： VB里面的命令按钮是什么? - ？
典盾安尿： VB里面的命令按钮是一个称作CommandButton的控件.它可以在VB集成编程窗口的工具箱内找到. 大多数 Visual Basic 应用程序都有 CommandButton,使用户通过简单的敲击按钮来执行操作.当用户选中按钮时,不仅会执行相应操作,还会...
贵溪市14747218497： 在VB6.0中,怎么写一个命令按钮多次单击按钮的不同事件? - ？
典盾安尿： 使用静态变量或全局变量可达到此种效果,以静态变量为例,参考代码: Option ExplicitPrivate Sub Command1_Click()Static i As Integer i = i + 2Print String$(i, ＂V＂) End SubPrivate Sub Form_Load()AutoRedraw = True End Sub演示动画:
