Cheat Sheet de Visual Basic 6

[Comentarios]
' Esto es un comentario

[Variables]
Dim nombre As String
Dim edad As Integer
Dim precio As Double

[Constantes]
Const PI As Double = 3.14159

[Tipo de Datos]
Boolean, Byte, Integer, Long
Single, Double, Currency, Decimal
Date, String, Object, Variant

[Entrada / Salida]
InputBox("Mensaje") ' Cuadro de entrada
MsgBox "Mensaje" ' Cuadro de mensaje

[Aritmética]
+ - * / Mod ^

[Control de Flujo]
If condición Then
    ' Código si es verdadero
ElseIf otra_condición Then
    ' Código si es otra condición verdadera
Else
    ' Código si ninguna condición es verdadera
End If

Select Case variable
    Case valor1
        ' Código si variable = valor1
    Case valor2
        ' Código si variable = valor2
    Case Else
        ' Código si ninguna coincidencia
End Select

For contador = inicio To fin Step incremento
    ' Código a repetir
Next contador

Do While condición
    ' Código a repetir
Loop

[Manejo de Datos]
Open "archivo.txt" For Input As #1
Input #1, variable
Close #1

Open "archivo.txt" For Output As #1
Print #1, "Hola, mundo!"
Close #1

[Arrays]
Dim nombres(10) As String
nombres(0) = "Juan"

[Funciones de Cadena]
Len(cadena)
Left(cadena, longitud)
Right(cadena, longitud)
Mid(cadena, inicio, longitud)
InStr(cadena, subcadena)
UCase(cadena)
LCase(cadena)
Trim(cadena)
StrConv(cadena, tipo)

[Funciones Matemáticas]
Abs(numero)
Sqrt(numero)
Round(numero, decimales)
Int(numero)
Fix(numero)
Sin(angulo)
Cos(angulo)
Tan(angulo)

[Funciones de Fecha / Hora]
Date
Time
Now
FormatDateTime(fecha, formato)
DateSerial(año, mes, día)
TimeSerial(hora, minutos, segundos)

[Funciones de Archivos]
Dir("ruta") ' Lista archivos en ruta
FileCopy "origen", "destino"
Kill "archivo"
Name "antiguo" As "nuevo"
MkDir "ruta" ' Crea directorio
RmDir "ruta" ' Elimina directorio

[Controles de Formulario]
Form1.Textbox1.Text ' Acceder a propiedades
Form1.Textbox1.Visible = True
Form1.CommandButton1.Caption = "Click Me"

[Eventos de Formulario]
Load Formulario ' Cargar formulario
Unload Formulario ' Descargar formulario
Formulario.Show ' Mostrar formulario
Formulario.Hide ' Ocultar formulario

[Errores]
On Error Resume Next ' Continuar después de un error
On Error GoTo Etiqueta ' Manejar error con etiqueta
Err.Number ' Número de error
Err.Description ' Descripción del error
Err.Clear ' Limpiar objeto Err

[Programación Orientada a Objetos]
Clase.Propriedad = valor
Clase.Método(argumentos)
New Clase ' Crear instancia de clase

[Loops y Condicionales]
Do While condición
    ' Código
Loop

Do Until condición
    ' Código
Loop

While condición
    ' Código
Wend

For Each elemento In colección
    ' Código
Next elemento

[Subrutinas y Funciones]
Sub NombreSubrutina(parametros)
    ' Código
End Sub

Function NombreFuncion(parametros) As TipoRetorno
    ' Código
    NombreFuncion = valor
End Function

[Finalizar]
End ' Finalizar programa
```