C# と VB.NET の質問掲示板

元のコード
>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>
Dim _videoDevices As FilterInfoCollection

Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
    'ビデオデバイス一覧を表示する
    _videoDevices = New FilterInfoCollection(FilterCategory.VideoInputDevice)

    ComboBox1.Items.Clear()
    If _videoDevices.Count <> 0 Then
        For Each device In _videoDevices
            ComboBox1.Items.Add(device.Name)
        Next
        ComboBox1.SelectedIndex = 0
    End If
End Sub
>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>

ここに書かれたコード
>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>
☆ここにあるはずのメソッド識別子がない
    'ビデオデバイス一覧を表示する
    _videoDevices = New FilterInfoCollection(FilterCategory.VideoInputDevice)

    ComboBox1.Items.Clear()
    If _videoDevices.Count <> 0 Then
        For Each device In _videoDevices
            ComboBox1.Items.Add(device.Name)
        Next
        ComboBox1.SelectedIndex = 0
    End If
End Sub

☆ここにあるはずのメソッド識別子がない
    _videoDevices = New FilterInfoCollection(FilterCategory.VideoInputDevice)

    ComboBox2.Items.Clear()
    If _videoDevices.Count <> 0 Then
        For Each device In _videoDevices
            ComboBox2.Items.Add(device.Name)
        Next
        ComboBox1.SelectedIndex = 1
    End If
End Sub
>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>

最初に指摘していますが、メソッド識別子がないので、これは「コンパイルできないコード」です。
元のページのコードで、接続されているデバイスをコンボボックスのリストに列挙し、
ボタンを押したときに選択されているデバイスの映像を取得する、ということができています。
なので、
元のコードとは違う何を望み、
どう考えてコードを修正し、
その結果どのようになったのかがわかりません。

なんとなく、「複数のカメラの映像を同時に表示したい」かもしれない、
という気がしてきたけど、深読みしてもしょうがないのでやめとく。