Opening and Handling Devices: Open Device

This finished application looks as follows. The white square area underneath the "Open Device" button will be filled with the live video image.

Using the Devices collection, the application first of all lists the names of all video capture devices available on the system in the ListBox List1. .Devices.Count indicates the number of video capture devices found, while Devices(i) returns information about the i-th video capture device. In this case, the name of the video capture device.

Private Sub Form_Load()
    For i = 1 To ICImagingControl1.Devices.Count
        List1.AddItem ICImagingControl1.Devices(i).Name
    Next i
End Sub

Private Sub btnClose_Click()
    Unload Me
End Sub

When the button "Open Device" is clicked, the program stops the image data stream (.LiveStop) and retrieves the desired video capture device's name from List1.Text. Then, the video capture device's live image data stream is displayed, using .LiveStart:

Private Sub btnOpenDevice_Click()

    If ICImagingControl1.LiveVideoRunning Then
        ICImagingControl1.LiveStop
    End If

    ICImagingControl1.Device = List1.Text

    ICImagingControl1.LiveStart
End Sub