Module M
	Sub Main()
		Dim a!
		a=10

		Dim b As Single
		b!=10

		Dim c!
		c!=10
	End Sub
End Module