private void Form1_Load(object sender, EventArgs e)
{
    if( !icImagingControl1.LoadShowSaveDeviceState("lastSelectedDeviceState.xml") )
    {
        MessageBox.Show("No device was selected.", "Grabbing an Image", MessageBoxButtons.OK, MessageBoxIcon.Information);
        this.Close();
    }
    // カメラの設定した解像度に合わせて表示画面を変更
    icImagingControl1.LiveDisplayDefault = false;
    icImagingControl1.LiveDisplaySize = icImagingControl1.Size;

    cmdStartLive.Enabled = true;
    cmdStopLive.Enabled = false;
    cmdSaveBitmap.Enabled = false;
}

Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
    If Not IcImagingControl1.DeviceValid() Then
        IcImagingControl1.ShowDeviceSettingsDialog()

        If Not IcImagingControl1.DeviceValid Then
            MsgBox("No device was selected.", MsgBoxStyle.Information, "Grabbing an Image")

            Me.Close()
        End If
    End If

    ' カメラの設定した解像度に合わせて表示画面を変更
    IcImagingControl1.LiveDisplayDefault = False
    IcImagingControl1.LiveDisplaySize = IcImagingControl1.Size

    cmdStartLive.Enabled = True
    cmdStopLive.Enabled = False
    cmdSaveBitmap.Enabled = False


End Sub

private void cmdStartLive_Click(object sender, EventArgs e)
{
    icImagingControl1.Sink = new TIS.Imaging.FrameSnapSink();

    icImagingControl1.LiveStart();
    cmdStartLive.Enabled = false;
    cmdStopLive.Enabled = true;
    cmdSaveBitmap.Enabled = true;
}

Private Sub cmdStartLive_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles cmdStartLive.Click
    IcImagingControl1.Sink = New TIS.Imaging.FrameSnapSink()

    IcImagingControl1.LiveStart()
    cmdStartLive.Enabled = False
    cmdStopLive.Enabled = True
    cmdSaveBitmap.Enabled = True
End Sub

private void cmdStopLive_Click(object sender, EventArgs e)
{
    icImagingControl1.LiveStop();

    cmdStartLive.Enabled = true;
    cmdStopLive.Enabled = false;
    cmdSaveBitmap.Enabled = false;
}

Private Sub cmdStopLive_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles cmdStopLive.Click
    IcImagingControl1.LiveStop()

    cmdStartLive.Enabled = True
    cmdStopLive.Enabled = False
    cmdSaveBitmap.Enabled = False
End Sub

private void cmdSaveBitmap_Click( object sender, EventArgs e )
{

    // FrameSnapSinkを呼び出し
    TIS.Imaging.FrameSnapSink snapSink = icImagingControl1.Sink as TIS.Imaging.FrameSnapSink;
    // 1枚のイメージを取得。Sinkに入る次のフレームを５秒間待つ
    TIS.Imaging.IFrameQueueBuffer frm = snapSink.SnapSingle(TimeSpan.FromSeconds(5));
    // 画像を保存
    SaveFileDialog saveFileDialog1 = new SaveFileDialog();
    saveFileDialog1.Filter = "bmp files (*.bmp)|*.bmp|All files (*.*)|*.*";
    saveFileDialog1.FilterIndex = 1;
    saveFileDialog1.RestoreDirectory = true;

    if( saveFileDialog1.ShowDialog() == DialogResult.OK )
    {
        frm.SaveAsBitmap(saveFileDialog1.FileName);
    }
}

Private Sub cmdSaveBitmap_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles cmdSaveBitmap.Click
    If IcImagingControl1.LiveVideoRunning Then

        Try

            Dim imageSink As TIS.Imaging.FrameSnapSink = IcImagingControl1.Sink


            ' 1枚のイメージを取得。Sinkに入る次のフレームを５秒間待つ
            Dim image As TIS.Imaging.IFrameQueueBuffer = imageSink.SnapSingle(TimeSpan.FromSeconds(5))

            ' 画像を保存
            Dim saveFileDialog1 As SaveFileDialog = New SaveFileDialog()
            saveFileDialog1.Filter = "bmp files (*.bmp)|*.bmp|All files (*.*)|*.*"
            saveFileDialog1.FilterIndex = 1
            saveFileDialog1.RestoreDirectory = True

            If saveFileDialog1.ShowDialog() = System.Windows.Forms.DialogResult.OK Then
                '画像を保存する
                image.SaveAsBitmap(saveFileDialog1.FileName)
            End If
        Catch
            MessageBox.Show("Snap Image failed, timeout occurred.")
        End Try
    End If
End Sub