Public Class IccXyzTagType 
   Inherits IccTagTypeBase

Dim instance As IccXyzTagType

public class IccXyzTagType : IccTagTypeBase 

public ref class IccXyzTagType : public IccTagTypeBase 

Public Sub IccXyzTagTypeExample()
      ' load an Icc Profile
      Dim iccProfile As New IccProfileExtended(Path.Combine(LEAD_VARS.ImagesDir, "EmptyIcc.icc"))

      ' define the array of XYZ numbers
      Dim data() As IccXyzNumber = {New IccXyzNumber(IccTools.FromDoubleTo2bFixed2bNumber(1.0), _
            IccTools.FromDoubleTo2bFixed2bNumber(2.0), _
            IccTools.FromDoubleTo2bFixed2bNumber(3.0))}

      ' define the tag type
      Dim xyzTagType As New IccXyzTagType(data)

      ' add the new tag to the ICC Profile
      iccProfile.AddTag(xyzTagType, IccTag.RedMatrixColumnTag, IccTagTypeBase.XyzTypeSignature)

      ' generate the new profile id
      iccProfile.GenerateProfileId()

      ' update the icc array with the new changes
      iccProfile.UpdateDataArray()

      ' write the Icc Profile into a new file
      iccProfile.GenerateIccFile(Path.Combine(LEAD_VARS.ImagesDir, "IccXyzTagTypeVB.icc"))
   End Sub

Public NotInheritable Class LEAD_VARS
   Public Const ImagesDir As String = "C:\Users\Public\Documents\LEADTOOLS Images"
End Class

public void IccXyzTagTypeExample()
   {
      // load an Icc Profile
      string fileName = Path.Combine(LEAD_VARS.ImagesDir, "EmptyIcc.icc");
      IccProfileExtended iccProfile = new IccProfileExtended(fileName);

      // define the array of XYZ numbers
      IccXyzNumber[] data = new IccXyzNumber[1];
      data[0] = new IccXyzNumber(
         IccTools.FromDoubleTo2bFixed2bNumber(1.0),
         IccTools.FromDoubleTo2bFixed2bNumber(2.0),
         IccTools.FromDoubleTo2bFixed2bNumber(3.0));

      // define the tag type
      IccXyzTagType xyzTagType = new IccXyzTagType(data);

      // add the new tag to the ICC Profile
      iccProfile.AddTag(xyzTagType, IccTag.RedMatrixColumnTag, IccTagTypeBase.XyzTypeSignature);

      // generate the new profile id
      iccProfile.GenerateProfileId();

      // update the icc array with the new changes
      iccProfile.UpdateDataArray();

      // write the Icc Profile into a new file
      string IccfileName = Path.Combine(LEAD_VARS.ImagesDir, "IccXyzTagTypeCS.icc");
      iccProfile.GenerateIccFile(IccfileName);
   }

static class LEAD_VARS
{
   public const string ImagesDir = @"C:\Users\Public\Documents\LEADTOOLS Images";
}