DefObj Statement
ΠΠ°Π΄Π°ΡΡ ΡΠΈΠΏ ΠΏΠ΅ΡΠ΅ΠΌΠ΅Π½Π½ΠΎΠΉ ΠΏΠΎ ΡΠΌΠΎΠ»ΡΠ°Π½ΠΈΡ Π² ΡΠΎΠΎΡΠ²Π΅ΡΡΡΠ²ΠΈΠΈ Ρ Π΄ΠΈΠ°ΠΏΠ°Π·ΠΎΠ½ΠΎΠΌ Π±ΡΠΊΠ², Π΅ΡΠ»ΠΈ Π½Π΅ ΡΠΊΠ°Π·Π°Π½ ΡΠΈΠΌΠ²ΠΎΠ» ΠΈΠ»ΠΈ ΠΊΠ»ΡΡΠ΅Π²ΠΎΠ΅ ΡΠ»ΠΎΠ²ΠΎ ΠΎΠΏΠΈΡΠ°Π½ΠΈΡ ΡΠΈΠΏΠ°.

{DefBool|DefCur|DefDate|DefDbl|DefErr|DefInt|DefLng|DefObj|DefStr|DefSng|DefVar} {char|char-char}[,...]
char: Letter prefix that specifies default data type for variables.
char-char: Letter range prefixes that specify default data type for variables.
' Prefix definitions for variable types:
DefBool b
DefCur c,l-m
DefDate t
DefDbl f
DefErr e
DefInt i-k,N
DefLng x-z, D
DefObj U, o-R
DefSng w,a
DefStr s
DefVar V,g
Sub DefObj_example
Print Typename(properties), VarType(ordinal), IsNull(unique), IsObject(org)' Result is: Object 9 True False
End Sub