RosettaCodeData/Task/Comments/XBasic/comments.basic

PROGRAM  "Comments"
VERSION  "0.0000"

DECLARE FUNCTION Entry ()

FUNCTION  Entry ()
	'this is a comment
	PRINT "this is code"  'comment after statement
END FUNCTION
END PROGRAM