Visual Basic - la coleccion MSDN no existe. vuelva a instalar MSDN

Private Sub Command1_Click(Index As Integer)

'Agregrar a la base de datos

If Text1.Text = "" Then

MsgBox "Debe ingresar la cedula del Alumno", vbCritical, "Error Fatal"

Else

'conexion con la base de datos

Establecer_Conexion

rs.Open "select*from DatosPersonales where cedula=" & Text1.Text & "", cn

If Not rs.EOF Then

MsgBox "El empleado o la cedula ya existe", vbCritical, "Error en Datos"

Else

SQL = "insert into DatosPersonales(cedula,nombres,apellidos,fechaNacimiento,sexo,nombreCarrera,matriculaCarrera)values('" & Text1.Text & "','" & Text2.Text & "','" & Text3.Text & "','" & Text4.Text & "','" & Combo1.Text & "','" & Combo2.Text & "','" & Text5.Text & "')"

cn.Execute SQL1

MsgBox "Los datos fueron agregados", vbInformation, "Operacion Exitosa"

Text1.SetFocus

Call limpiatexto

End If

End If

End Sub