Public Class IccViewingConditionsTagType 
   Inherits IccTagTypeBase

Dim instance As IccViewingConditionsTagType

public class IccViewingConditionsTagType : IccTagTypeBase 

public ref class IccViewingConditionsTagType : public IccTagTypeBase 

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

      ' define the absolute illuminant values
      Dim absIlluminant As New IccXyzNumber(IccTools.FromDoubleTo2bFixed2bNumber(1.0), _
         IccTools.FromDoubleTo2bFixed2bNumber(2.0), _
         IccTools.FromDoubleTo2bFixed2bNumber(3.0))

      ' define the absolute surround values
      Dim absSurround As New IccXyzNumber(IccTools.FromDoubleTo2bFixed2bNumber(4.0), _
         IccTools.FromDoubleTo2bFixed2bNumber(5.0), _
         IccTools.FromDoubleTo2bFixed2bNumber(6.0))

      ' create the IccViewCondition class
      Dim viewCond As New IccViewCondition(absIlluminant, absSurround, IccStandardIlluminantType.IccIlluminantD50)

      ' define the tag type
      Dim viewCondTagType As New IccViewingConditionsTagType(viewCond)

      ' add the new tag to the ICC Profile
      iccProfile.AddTag(viewCondTagType, IccTag.ViewingConditionsTag, IccTagTypeBase.ViewingConditionsTypeSignature)

      ' 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, "IccViewingConditionsTagTypeVB.icc"))
   End Sub

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

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

      // define the absolute illuminant values
      IccXyzNumber absIlluminant = new IccXyzNumber(
         IccTools.FromDoubleTo2bFixed2bNumber(1.0),
         IccTools.FromDoubleTo2bFixed2bNumber(2.0),
         IccTools.FromDoubleTo2bFixed2bNumber(3.0));

      // define the absolute surround values
      IccXyzNumber absSurround = new IccXyzNumber(
         IccTools.FromDoubleTo2bFixed2bNumber(4.0),
         IccTools.FromDoubleTo2bFixed2bNumber(5.0),
         IccTools.FromDoubleTo2bFixed2bNumber(6.0));

      // create the IccViewCondition class
      IccViewCondition viewCond = new IccViewCondition(absIlluminant, absSurround, IccStandardIlluminantType.IccIlluminantD50);

      // define the tag type
      IccViewingConditionsTagType viewCondTagType = new IccViewingConditionsTagType(viewCond);

      // add the new tag to the ICC Profile
      iccProfile.AddTag(viewCondTagType, IccTag.ViewingConditionsTag, IccTagTypeBase.ViewingConditionsTypeSignature);

      // 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, "IccViewingConditionsTagTypeCS.icc");
      iccProfile.GenerateIccFile(IccfileName);
   }

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