VB中几个问题

答案：除数为0的错误是11啊，这些错误号都是编译器定义好的，可以根据错误号Err.Number 来大概的判断程序出现错误的原因。
  
1、err.Number：返回或设置表示错误的数值。Number 是 Err 对象的缺省属性。可读/可写。
  
 说明
  
 从对象返回用户自定义的错误时，把被选作错误代码的数与 vbObjectError 常数相加，并由此设置 Err.Number。例如，用下列代码返回作为错误代码的数字 1051：
  
 Err.Raise Number := vbObjectError + 1051, Source:= SomeClass
  
 Err 对象
  
 含有关于运行时错误的信息。
  
 说明
  Err 对象的属性由错误的生成者来设置，这个生成者或者是 Visual Basic，或者是对象，或者是程序设计员。
  
 Err 对象的缺省属性是 Number。因为该缺省属性可以用对象名称 Err 表示，所以不必修改以前用 Err 函数或 Err 语句书写的代码。
  
 当运行时错误发生时，Err 对象的属性被填入明确识别错误的信息以及处理这个错误所使用的信息。为了在代码中生成运行时错误，请用 Raise 方法。
  
 在任意形式的 Resume 或 On Error 语句之后以及在错误处理子程序内的 Exit Sub、Exit Function、或 Exit Property 语句之后，将 Err 对象的属性重新设置为零或长度为零的字符串 ("")。可使用 Clear 方法重新明确设置 Err 。
  
 为了对系统错误和类模块生成运行时错误，要使用 Raise 方法而不使用 Error 语句。在其它代码中是否使用 Raise 方法，这要看想要返回的信息量有多大。
  
 Err 对象是具有全局范围的固有对象。在代码中没有必要建立这些对象的实例。
  
 2、ChDrive 语句 改变当前的驱动器。
  语法
  ChDrive drive
  必要的 drive 参数是一个字符串表达式，它指定一个存在的驱动器。如果使用零长度的字符串 ("")，则当前的驱动器将不会改变。如果 drive 参数中有多个字符，则 ChDrive 只会使用首字母。
  
 chdrive是改变缺省驱动器而不是drive1的驱动器，它与drivelistbox控件无关，比如，你ChDrive "D"
  就将D盘作为你的缺省驱动器，下次你再运行程序drivelistbox控件默认（就是你最先看到的）的是D盘。这样说你懂不？
呵呵我来回答第二个问题吧，估计楼主是想自己做皮肤吧，VB真的有点古老了，它的picturebox控件只有MouseMove事件，没有MouseOver事件,简单一点就是给整个窗体也添加一个MouseMove事件，在这里面把所有picturebox的图片还原就可以了 
Private Sub Picture1_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)
 Picture1.Picture = LoadPicture(xxxxxxx)
End Sub 
o

上一个：vb 图像旋转问题
下一个：VB的介绍？