[VB6 e VBA] Una curiosità che può interessare un po' tutti

[luciomenci]

Guardate bellino!!!

Sub Pippo()
  Dim X, Y
  X = 10
  Y = "10"
  Debug.Print X = Y, X = 10, Y = 10, X = "10", Y = "10"
  Debug.Print TypeName(X)
  Debug.Print TypeName(Y)
End Sub

stampa

Falso Vero Vero Vero Vero
Integer
String

Se invece faccio

Sub Pippo()
  Dim X As Integer, Y As String
  X = 10
  Y = "10"
  Debug.Print X = Y, X = 10, Y = 10, X = "10", Y = "10"
  Debug.Print TypeName(X)
  Debug.Print TypeName(Y)
End Sub

stampa

Vero Vero Vero Vero Vero
Integer
String

Alla facciaccia di tutti quelli che (come Mario) non dichiarano mai il tipo di variabili!