[use:none]

Function none(none1 As String) As String
	Dim none2 As String
	none2 = "none3"
	none = none2
End Function