昨天同样的程序今天怎么不能运行了，难道vb出问题了？

Question

以下是旧的（运行正常）：
Private Sub Form_Load()
  Dim t As Integer
  Dim MyCon As String
  MyCon = "driver={sql server};server=sz;database=cwgl"
  Set db = New ADODB.Connection
  Set rs = New ADODB.Recordset
  db.ConnectionString = MyCon
  db.Open
  rs.Open "select id from password", db, adOpenStatic, adLockReadOnly
  rs.Close
End Sub
可以可是在今天写的另外一个老是在
  Set db = New ADODB.Connection
  Set rs = New ADODB.Recordset
这里出错，提示“用户自定义类型未定义”，把昨天写的原代码剪切到一个新窗体中也是这样的错，怎么回事呢？另外请教一下：
可以调用同一个窗体中其他控件的过程吗？
我想调用同一个窗体中另外一个command控件的过程，可以直接调用吗？比如
click command1(这个不行，其他的可以吗？)

Answer 1

在工程菜单，点引用，选择“Microsoft active data object 2.x Library"
就可以了。
可以调用其他控件的过程
如：Command1_Click

Answer 2

1。 lxqlogo0(群子) 说的对，你的ado组件没有引用
2。调用其他控件的过程和调用自定义的过程一个道理只是名字不同而已