vb事件编程

㈠ vb怎样理解事件驱动编程

对于某个对象而言，事件(event)就是发生在该对象上的事情，通常这是由用户在对象上激发的一种动作。在VB中，系统为每个对象预先定义好了一些列的事件。事件即控件对外部条件的反应，不同的控件具有不用的事件。如：通常情况下命令按钮就是用来单击。
一个事件的发生，可引起或驱动相应的事件处理过程的执行，即事件驱动！如果我们使用控件的相应事件，就必须对其相应的事件进行编写代码，否则控件什么事情也不会做。

㈡ VB中在代码窗口中如何选择相应的对象,事件进行编程

先到界面编辑窗口，然后选中控件，在property界面中，选择event就可以针对事件编程了

㈢ 怎样用vb编写一个事件，到某个时间点触发程序

最简单的方法。假设定在10：00：00
dim a,b as string
a=time()
b="10:00:00"
if cdata(a)=cdata(b) then
要触发的事件
endif

㈣ 什么是VB程序设计

Visual Basic程序设计是BASIC编程语言。

VB拥有图形用户界面（GUI）和快速应用程序开发（RAD）系统，可以轻易的使用DAO、RDO、ADO连接数据库，或者轻松的创建ActiveX控件，用于高效生成类型安全和面向对象的应用程序。

程序员可以轻松的使用VB提供的组件快速建立一个应用程序。

(4)vb事件编程扩展阅读：

VB 的组件既可以拥有用户界面，也可以没有。这样一来服务器端程序就可以处理增加的模块。

VB 使用参数计算的方法来进行垃圾收集，这个方法中包含有大量的对象，提供基本的面向对象支持。因为越来越多组件的出现，程序员可以选用自己需要的扩展库。

和有些语言不一样，VB 对大小写不敏感，但是能自动转换关键词到标准的大小写状态，以及强制使得符号表入口的实体的变量名称遵循书写规则。默认情况下字符串的比较是对大小写敏感的，但是可以关闭这个功能。

参考资料来源：网络-Visual Basic

㈤ VB鼠标事件的编程题目

Private Sub Command1_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)
Command1.MousePointer = vbCross
End Sub

Private Sub Command1_MouseUp(Button As Integer, Shift As Integer, X As Single, Y As Single)
If Button = vbRightButton Then
MsgBox "现在鼠标光标位于命令按钮中"
End If
End Sub

Private Sub Form_Load()
'Picture1.MouseIcon = LoadPicture("C:\hand.cur")'光标文件的路径
End Sub

Private Sub Form_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)
Me.MousePointer = vbDefault
End Sub

Private Sub Form_MouseUp(Button As Integer, Shift As Integer, X As Single, Y As Single)
If Button = vbRightButton Then
MsgBox "现在鼠标光标位于窗体上"
End If
End Sub

Private Sub Picture1_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)
Picture1.MousePointer = vbCustom
End Sub

Private Sub Picture1_MouseUp(Button As Integer, Shift As Integer, X As Single, Y As Single)
If Button = vbRightButton Then
MsgBox "现在鼠标光标位于图片框中"
End If
End Sub

Private Sub Text1_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)
Text1.MousePointer = vbHourglass
End Sub

Private Sub Text1_MouseUp(Button As Integer, Shift As Integer, X As Single, Y As Single)
If Button = vbRightButton Then
MsgBox "现在鼠标光标位于文本框中"
End If
End Sub