displayerror:
    If Err.Number<>0 Then
       MsgBox Err.Description
       Err.Clear
    End If

  displayerror:
       MsgBox Err.Description
 
1.上面两段代码有什么区别吗？？

2.怎么在VB6.0中添加CommonDialog，在部件中选择什么？？
 
3.Adodc1.ReBind是什么意思啊？？

和 Combo1.ListIndex=0都是干些什么？？

5.Trim（）函数干些什么？？

谢谢大家