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