El carácter declarado no coincide con el tipo de datos declarado
Dim x!, y!, z! se define como tipo único (el carácter de declaración de tipo es el signo comercial (!))
Imprimir "Después de ordenar" & x&; & y& " " & z& "" es un tipo largo (el carácter de declaración de tipo es el signo comercial (&))
Modificar a:
Private Sub Command1_Click() p>
Dim x!, y!, z!
x = InputBox("entrada x")
y = InputBox("entrada y")
z = InputBox("entrada z")
Imprimir " x y z"
Imprimir "antes de ordenar"; " "; p>
Si x < y Entonces
t = x: x = y: y = t
Si x < z Entonces
t = x : x = z: z = t
Si y < z Entonces
t = y: y = z: z = t
Finalizar si
Imprimir "Después de ordenar" & x!; " " & y!; " " & z! ""
Fin Sub
;