VB6
Dim dato As String
dato = InputBox("Ingrese el dato","Título")
If StrPtr(dato) = vbEmpty Then
'El usuario ha presionado Cancelar
Else
'Lo que sea...
End If
VB.NET
Dim dato As String = InputBox("Ingrese el dato","Título")
If dato Is Nothing Then
'El usuario ha presionado el botón Cancelar
'...o ingresó un texto vacío
Else
'Lo que sea...
End If
No hay comentarios.:
Publicar un comentario