31/03/2012
por Editor
Funcion Cbool
CBool(expresión) Devuelve una expresión que se ha convertido en tipo Variant de subtipo Boolean. El argumento expresión es cualquier expresión válida. Ejemplo: Sub prueba() Dim sText As String sText = InputBox("Entre su nombre completo:") If CBool(InStr(sText, "cruz")) Then MsgBox "El … Continuar leyendo →