Sample: VB.Net const declaration

From dbscript Online Help
Jump to: navigation, search

This sample is a VB.Net const declaration based on dbscript's XslType table:

Public NotInheritable Class XslType

	Private Sub New() 
	End Sub

	''' <summary>
	''' Object
	''' </summary>
	Public Const Object As Integer = 1
	''' <summary>
	''' Project Version
	''' </summary>
	Public Const ProjectVersion As Integer = 2
	''' <summary>
	''' Value Script
	''' </summary>
	Public Const ValueScript As Integer = 3
End Class