Hola estoy aprendiedo y haciendo un programa en VB. Como se puede solucionar este error?
La linea del erro esta en negrita.
Gracias.
Adjunto codigo:
Private Sub cambiar_Click()
Dim nueva, ide As String
Dim er As Long
nueva = nuevo.Text
nuevo.Text = " "
er = DLLmodificar_id(nueva_id)
If er = 0 Then
pintar_matriz
End If
End Sub
Modulo:
Public Declare Function DLLmodificar_id _
Lib "tren.dll" _
(ByVal nueva_id As String, ByVal id As String) _
As Long
mira la función a DLLmodificar toma 2 parametros nueva_id e id, y tu en la llamada solo estas pasando un paramtro es por esto que al ejecutar o compilar te lo muestra y dice que el argumento que omites no es opcional, si quieres que sea opcional deberias declararlo como tal.
Function DLLmodificar_id _
Lib "tren.dll" _
(ByVal nueva_id As String, ByVal id As String) _
As Long