viernes, 12 de septiembre de 2008

Función isMissing en Visual Basic 6.0



Esta función se utiliza cuando utilizamos parámetros opcionales en una función o procedimiento, y nosotros, dentro del mismo queremos saber y averiguar si se han enviado los parámetros opcionales

El uso de IsMissing muy simple. Esta función retorna el valor True si NO se ha enviado el parámetro que queremos comprobar, y devuelve False si el parámetro ha sido enviado:

por ejemplo , colocar dos CommandButton

Private Sub Mostrar_Dato(Optional Nombre As Variant)

' Si IsMissing devuelve Verdadero, es por que no se envíó
If IsMissing(Nombre) = True Then
MsgBox " NO Se ha enviado el parámetro NOMBRE ", vbInformation
Else
MsgBox " Se ha enviado el parámetro NOMBRE ", vbInformation
End If


End Sub

'Acá No se envía el parámetro
Private Sub Command1_Click()
Mostrar_Dato
End Sub

'Acá Si se envía el parámetro

Private Sub Command2_Click()
Mostrar_Dato "María"
End Sub

No hay comentarios: