Buenas nuevamente colegas.
En esta ocacion mi consulta es acerca del entorno de programacion, habitualmente programo en Vb6 y recientemente instale en mi equipo el Visual Studio 2005 y luego intente convertir un proyecto de vb6 a 2005 pero cuando intento iniciar la depuracion me emite un mensaje: "Errores al generar. Desea continuar y ejecutar la ultima version generada? SI/NO, obviamente se generaron errores en la conversion, por ejemplo en la siguiente guncion me inserto los siguientes mensajes:
Public Function Importe(ByRef Vimporte As Object) As Decimal
Dim vvalor As Object
On Error GoTo Hay_err_err
Dim Vcon As Object
Dim Vcat As Object
'UPGRADE_WARNING: No se puede resolver la propiedad predeterminada del objeto vvalor. Haga clic aquí para obtener más información: 'ms-help://MS.VSCC.v80/dv_commoner/local/redirect.htm?keyword="6A50421D-15FE-4896-8A1B-2EC21E9037B2"'
vvalor = 1
'UPGRADE_WARNING: No se puede resolver la propiedad predeterminada del objeto Form_Liquidacion.txtlegajo. Haga clic aquí para obtener más información: 'ms-help://MS.VSCC.v80/dv_commoner/local/redirect.htm?keyword="6A50421D-15FE-4896-8A1B-2EC21E9037B2"'
'UPGRADE_WARNING: No se puede resolver la propiedad predeterminada del objeto Busqueda(). Haga clic aquí para obtener más información: 'ms-help://MS.VSCC.v80/dv_commoner/local/redirect.htm?keyword="6A50421D-15FE-4896-8A1B-2EC21E9037B2"'
'UPGRADE_WARNING: No se puede resolver la propiedad predeterminada del objeto Vcon. Haga clic aquí para obtener más información: 'ms-help://MS.VSCC.v80/dv_commoner/local/redirect.htm?keyword="6A50421D-15FE-4896-8A1B-2EC21E9037B2"'
Vcon = Busqueda("Convenio", "Tbl_Empleados", "legajo=" & Form_Liquidacion.txtlegajo & "")
'UPGRADE_WARNING: No se puede resolver la propiedad predeterminada del objeto Form_Liquidacion.txtlegajo. Haga clic aquí para obtener más información: 'ms-help://MS.VSCC.v80/dv_commoner/local/redirect.htm?keyword="6A50421D-15FE-4896-8A1B-2EC21E9037B2"'
'UPGRADE_WARNING: No se puede resolver la propiedad predeterminada del objeto Busqueda(). Haga clic aquí para obtener más información: 'ms-help://MS.VSCC.v80/dv_commoner/local/redirect.htm?keyword="6A50421D-15FE-4896-8A1B-2EC21E9037B2"'
'UPGRADE_WARNING: No se puede resolver la propiedad predeterminada del objeto Vcat. Haga clic aquí para obtener más información: 'ms-help://MS.VSCC.v80/dv_commoner/local/redirect.htm?keyword="6A50421D-15FE-4896-8A1B-2EC21E9037B2"' Vcat = Busqueda("Categoria", "Tbl_Empleados", "legajo=" & Form_Liquidacion.txtlegajo & "")
DBpath = My.Application.Info.DirectoryPath & "\datos\tablas.mdb"
'UPGRADE_WARNING: No se puede resolver la propiedad predeterminada del objeto Vcon. Haga clic aquí para obtener más información: 'ms-help://MS.VSCC.v80/dv_commoner/local/redirect.htm?keyword="6A50421D-15FE-4896-8A1B-2EC21E9037B2"'
'UPGRADE_WARNING: No se puede resolver la propiedad predeterminada del objeto Vcat. Haga clic aquí para obtener más información: 'ms-help://MS.VSCC.v80/dv_commoner/local/redirect.htm?keyword="6A50421D-15FE-4896-8A1B-2EC21E9037B2"' strsql = "SELECT * FROM Tbl_C_importes WHERE categoria=" & Vcat & "and convenio=" & Vcon
db = DAODBEngine_definst.OpenDatabase(DBpath, False, False, ";pwd=" & MiPass)
rst = db.OpenRecordset(strsql)
rst.MoveFirst()
rst.MoveLast()
Select Case Vimporte
Case 1
Importe = rst.Fields("Importe1").Value
Case 2
Importe = rst.Fields("Importe2").Value
Case 3
Importe = rst.Fields("Importe3").Value
Case 4
Importe = rst.Fields("Importe4").Value
Case 5
Importe = rst.Fields("Importe5").Value
Case 6
Importe = rst.Fields("Importe6").Value
Case 7
Importe = rst.Fields("Importe7").Value
Case 8
Importe = rst.Fields("Importe8").Value
Case 9
Importe = rst.Fields("Importe9").Value
Case 10
Importe = rst.Fields("Importe10").Value
End Select
Hay_err_exit:
'Cerramos los Objetos...
rst.Close()
db.Close()
'Desvinculamos los objetos...
'UPGRADE_NOTE: El objeto rst no se puede destruir hasta que no se realice la recolección de los elementos no utilizados. Haga clic aquí para obtener más información: 'ms-help://MS.VSCC.v80/dv_commoner/local/redirect.htm?keyword="6E35BFF6-CD74-4B09-9689-3E1A43DF8969"'
rst = Nothing
'UPGRADE_NOTE: El objeto db no se puede destruir hasta que no se realice la recolección de los elementos no utilizados. Haga clic aquí para obtener más información: 'ms-help://MS.VSCC.v80/dv_commoner/local/redirect.htm?keyword="6E35BFF6-CD74-4B09-9689-3E1A43DF8969"'
db = Nothing
Hay_err_err:
Select Case Err.Number
Case 3024
MsgBox("Es imposible localizar la base de datos en la ruta determinada: " & vbCrLf & vbCrLf & "Verifique que exista o que se encuentre en la ruta:" & My.Application.Info.DirectoryPath & "\datos" & " e intente nuevamente", MsgBoxStyle.Information + MsgBoxStyle.OKOnly, "Aviso!")
Exit Function
Resume Hay_err_exit
Case 3078
MsgBox("Es imposible encontrar la tabla requerida. " & vbCrLf & vbCrLf & "Verifique que exista o que se encuentre en la ruta:" & My.Application.Info.DirectoryPath & "\datos" & " e intente nuevamente", MsgBoxStyle.Information + MsgBoxStyle.OKOnly, "Aviso!")
Exit Function
Resume Hay_err_exit
Case 3071
Importe = 0
End Select
End Function
Bueno, las consultas son:
1-Como soluciono lo de los erroresÇ?
2-por que se generan si es el mismo codigo?
3- Es mejor Visual Studio 2005 que vb6 clasico?
Gracias de antemano por sus respuestas.-
a i por que no simplemente programas en VB 2005
esta facilito, solo cambian pocas cosas
bueno realmente muchas cosas camban, tanto que algunos colegas lo cnsuderan otro lenguaje y ya no el de cuarta como solia ser en mis tiempos
jejejeje
por ejemplo asimple vista vi que desaparecio caption y aparecieron mas propiedades y subpropiedades
en conclusion es un desman pero ve lo de esta forma, ya sabras "dos lenguajes xD"
xD bueno saludos
por cierto alguien sabe si ay algun cambio de VB 2005 al 2008 ?
No estoy seguro cual de los tres moderadores lo puso pero dejaron un link de un programa que se llamaba Code Advisor, prueba lo y veras como te sirve.
Saludos.
Gracias por la sugerencia, ya lo descargue desde la Microsoft y me resulto de mucha ayuda para la conversion, pueden cerrar el tema.-