For Each item As Integer In [Enum].GetValues(Gettype(Printing.PaperKind)) output.Show(item)Next
For Each item As String In [Enum].GetNames(Gettype(Printing.PaperKind)) output.Show(item)Next