'test.bas dim x x = 32 MsgBox("value of x is ",&x)