Dim [Shared] As DataType vble1 [, vble2, ...]