ok this sounds dumb but i just wanted to do something simple

Code:
dim this, that, alll, duno, etc, anddd, more as integer
this = that = etc = more = 6
doesn't work, is there a way to do this in vb?