dim var1 as String
dim var2 as INteger

var1="ime"
var2=23