Public ReadOnly Property IsBlank As Boolean

Dim instance As BlankPageDetectorCommand
Dim value As Boolean
 
value = instance.IsBlank

public bool IsBlank {get;}

public:
property bool IsBlank {
   bool get();
}

Public Sub BlankPageDetectorCommandExample()
   Dim codecs As New RasterCodecs()
   codecs.ThrowExceptionsOnInvalidImages = True

   Dim leadImage As RasterImage = codecs.Load(Path.Combine(LEAD_VARS.ImagesDir, "Clean.tif"))

   ' Prepare the command
   Dim command As BlankPageDetectorCommand = New BlankPageDetectorCommand
     'Determine whether the image is blank.
   command.Flags = BlankPageDetectorCommandFlags.DetectNoisyPage

   command.Run(leadImage)
   MessageBox.Show(" Is Blank   : " & command.IsBlank & "\n Accuracy : " & (command.Accuracy * 1.0 / 100) & "%", "Blank Page Detection Results")


End Sub

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

public void BlankPageDetectorCommandExample()
   {
      // Load an image
      RasterCodecs codecs = new RasterCodecs();
      codecs.ThrowExceptionsOnInvalidImages = true;

      RasterImage image = codecs.Load(Path.Combine(LEAD_VARS.ImagesDir, "Clean.tif"));

      // Prepare the command
      BlankPageDetectorCommand command = new BlankPageDetectorCommand();
      //Determine whether the image is a blank page
      command.Flags = BlankPageDetectorCommandFlags.DetectNoisyPage;
      command.Run(image);

      MessageBox.Show(" Is Blank   : " + command.IsBlank + "\n Accuracy : " + (command.Accuracy * 1.0 / 100) + "%", "Blank Page Detection Results");

   }

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

public void BlankPageDetectorCommandExample(RasterImage image)
{
   // Prepare the command
   BlankPageDetectorCommand command = new BlankPageDetectorCommand();
   //Determine whether the image is a blank page
   command.Flags = BlankPageDetectorCommandFlags.DetectNoisyPage;
   command.Run(image);
   Debug.WriteLine(" Is Blank   : " + command.IsBlank + "\n Accuracy : " + (command.Accuracy * 1.0 / 100) + "%", "Blank Page Detection Results", MessageBoxButton.OK);

   image.Dispose();
}

Public Sub BlankPageDetectorCommandExample(ByVal image As RasterImage)
   ' Prepare the command
   Dim command As BlankPageDetectorCommand = New BlankPageDetectorCommand()
   'Determine whether the image is a blank page
   command.Flags = BlankPageDetectorCommandFlags.DetectNoisyPage
   command.Run(image)
   Debug.WriteLine(" Is Blank   : " & command.IsBlank + Constants.vbLf & " Accuracy : " & (command.Accuracy * 1.0 / 100) & "%", "Blank Page Detection Results", MessageBoxButton.OK)

   image.Dispose()
End Sub