不出现vb给的出错对话框并且不中止程序.txt

以电子书的形式收集了VB一些常见问题解决方法,可以很方便的查找自己需要解决的问题.对一些VB初学者很用.

可 以 使 用 VB的 出 错 处 理 语 句 On Error。 下 面 是 一 个 例 子 ： 
    Private Sub Command1_Click() 
     On Error GoTo ErrOpen 
     Picture1.Picture = LoadPicture(Text1.Text) 
     Exit Sub ' 此 句 不 可 少 
    ErrOpen: ' 这 是 出 错 处 理 部 分 
     MsgBox "不 是 合 法 的 图 形 文 件 !", vbInformation 
    End Sub 
<END>