Partial 部分類別 (VB.NET)
	
	Public Class BOOK
	    Public title As String
	    Public price As String
	
	    Shared Sub MAIN()
	        Dim c As New BOOK
	        c.price = 30
	        c.title = "kk音標"
	        c.displayBookInfo()
	    End Sub
	End Class
	
	Partial Public Class book
	
	    Public Sub displayBookInfo()
	        Console.WriteLine(title & " 售價:" & price)
	    End Sub
	End Class
	 
如有錯誤 歡迎指正