"; UserName$DOLOOP WHILE UCASE$(Answer$) = "Y"PRINT "Goodbye "; UserName$
物件导向化.这是第三代的BASIC，例如Visual Basic、REALbasic、StarOffice Basic。这类的BASIC程式的特征，是导入类别（Class）的应用，使用物件导向的继承与程式码封装的写法。通常也使用「事件驱动」的写法，虽然下面这个Visual Basic .NET的范例并不是用到「事件驱动」。Pub