Anónimo
Error de método en Visual basic 6
Tengo un campo de texto y un botón el cual cuando lo pulso, añade su valor a una variable y cambia el text de un campo de texto.
Cuando lo ejecuto me da error de método y no tengo ni idea de por qué.
Dim cStotal As Currency
cStotal = 0
Private Sub calc7_Click(Index As Integer)
If (cStotal = 0) Then
cStotal = 7
Else
cStotal = cStotal + 7
End If
sStotal.Text = cStotal + " ?"
End Sub
sStotal es el campo de texto.
Cuando lo ejecuto me da error de método y no tengo ni idea de por qué.
Dim cStotal As Currency
cStotal = 0
Private Sub calc7_Click(Index As Integer)
If (cStotal = 0) Then
cStotal = 7
Else
cStotal = cStotal + 7
End If
sStotal.Text = cStotal + " ?"
End Sub
sStotal es el campo de texto.
1 respuesta
Respuesta de ifrancoz
1
Creo que si arregla un par de cositas funciona, parece que asigna el valor cero en las declaraciones y ahí marca un error de procedimiento, favor colocarlo en un evento por ejemplo el Load del formulario.
Reemplazar el signo + por & para concatenar el campo de texto
sStotal = cStotal & " ?"
Suerte !
Reemplazar el signo + por & para concatenar el campo de texto
sStotal = cStotal & " ?"
Suerte !
La asiganción del valor 0 ya la hago dentro del Load del formulario, lo puse así para que se viera que sí se le había asignado un valor.
Por otro lado, he sustituido + por & pero sigue dando el mismo error.
El error subraya de azul ".Text" y de amarillo "Private Sub calc7_Click(Index As Integer)".
El error exacto es: "No se encontró el método o el miembro de datos".
Gracias.
Por otro lado, he sustituido + por & pero sigue dando el mismo error.
El error subraya de azul ".Text" y de amarillo "Private Sub calc7_Click(Index As Integer)".
El error exacto es: "No se encontró el método o el miembro de datos".
Gracias.
Creo que el error es el siguiente : El campo sStotal no es un Textbox sino un Label y los labels no tienen la propiedad Text si le quitas el .Text funciona o de lo contrario utiliza un Textbox.
Suerte !
Suerte !