Imports Leadtools
Imports Leadtools.Multimedia
Imports LeadtoolsMultimediaExamples.Fixtures
Public _result AsBoolean = FalsePublic _form As CaptureCtrlForm = New CaptureCtrlForm()
PublicSub CountExample()
Try' reference the form capture control
Dim capturectrl As CaptureCtrl = _form.CaptureCtrl
' set an audio device first, you should use your audio device name here
If capturectrl.AudioDevices("USB") IsNothingThenThrowNew Exception("No USB audio device available")
EndIf
capturectrl.AudioDevices("USB").Selected = True' reference the form capture control's audio inputs
Dim inputs As AudioInputs = capturectrl.AudioInputs
' get count of inputs
Dim cnt AsInteger = inputs.Count
' set the result to what we expect
_result = (cnt >= 0)
Catch e1 As Exception
_result = FalseEndTryEnd Sub
using Leadtools;
using Leadtools.Multimedia;
using LeadtoolsMultimediaExamples.Fixtures;
publicbool _result = false;
public CaptureCtrlForm _form = new CaptureCtrlForm();
publicvoid CountExample()
{
try
{
// reference the form capture control
CaptureCtrl capturectrl = _form.CaptureCtrl;
// set an audio device first. use your audio device's name here
if (capturectrl.AudioDevices["USB"] == null)
thrownew Exception("No USB audio device available");
capturectrl.AudioDevices["USB"].Selected = true;
// reference the form capture control's audio inputs
AudioInputs inputs = capturectrl.AudioInputs;
// get count of inputs
int cnt = inputs.Count;
// set the result to what we expect
_result = (cnt >= 0);
}
catch (Exception)
{
_result = false;
}
}