Module M
	Sub Main()
		Dim a 'Default type assigned is Object
		a$="Hello" 'String type character does not conform with assigned type Object
		
		Dim b As String
		b$=10L 'Long type character does not conform with assigned type String
		
		Dim c $

	End Sub
End Module