Question

VB中几个问题

1.VB中err.Number 是什么意思？ 解释下它的用法。
2.VB中关于文件操作中，驱动器里有这样一个操作方法：
ChDrive Drive1.Drive
说是更换驱动器路径的，但是我只想得到文件路径的话，有这个必要吗？我没有写这样句代码，也能够得到完整的文件路径啊？ 这句代码在什么情况下使用？

Answer 1

除数为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盘。这样说你懂不？

Answer 2

呵呵我来回答第二个问题吧，估计楼主是想自己做皮肤吧，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