[royalopez06]

When i click a button, a webcam captures an image and display it to picturebox1. What i want is, if I click the capture button it will display it in picturebox1, when i click again, it will display in picturebox2, until picturebox4, something like this:
Image = A, B, C, D
click: [A] [ ] [ ] [ ]
click: [A] [B] [ ] [ ]
click: [A] [B] [C] [ ]
click: [A] [B] [C] [D] after displaying four images, pictureboxes will be set to nothing and start over again...
click: [A] [ ] [ ] [ ]
click: [A] [B] [ ] [ ]
click: [A] [B] [C] [ ]
click: [A] [B] [C] [D] and so on...

I don't know how to code this, someone please help.

I have already the code of capturing images from youtube. Thanks.

[coder3788]

royalopez06, on 09 November 2012 - 06:23 AM, said:

When i click a button, a webcam captures an image and display it to picturebox1. What i want is, if I click the capture button it will display it in picturebox1, when i click again, it will display in picturebox2

Find the piece of code that does it for picturebox1 and adapt it to the other pictureboxes.
Something like

 picturebox1.Image = [whatever] 

[royalopez06]

when i do something like this

select case x
case 0
picturebox1.image = jpeg
case 1
picturebox2.image = jpeg
case 2
picturebox3.image = jpeg
case 3
picturebox4.image = jpeg
end case

it will display the same image in the picturebox 1 to 4 all at the same time.

[zeeshanef]

you can check if picturebox is nothing then attack image like:

If (PictureBox1.Image Is Nothing) Then
   PictureBox1.Image = jpeg

ElseIf (PictureBox2.Image Is Nothing) Then
   PictureBox2.Image = jpeg

'and so on

[royalopez06]

Thank you zeeshaneef, it helps a lot...

[royalopez06]

how can I set pictureboxes to nothing without displaying the 5th picture after displaying 4 images.

If (PictureBox1.Image Is Nothing) Then
PictureBox1.Image = jpeg
ElseIf (PictureBox2.Image Is Nothing) Then
PictureBox2.Image = jpeg
ElseIf (PictureBox3.Image Is Nothing) Then
PictureBox3.Image = jpeg
ElseIf (PictureBox4.Image Is Nothing) Then
PictureBox4.Image = jpeg
else
PictureBox1.Image = Nothing
PictureBox2.Image = Nothing
PictureBox3.Image = Nothing
PictureBox4.Image = Nothing
End if

[zeeshanef]

you can check all (4) pictureboxes like following, and assign Nothing, if all PictureBox containing image.

If (PictureBox1.Image IsNot Nothing AndAlso PictureBox2.Image IsNot Nothing AndAlso PictureBox3.Image IsNot Nothing AndAlso PictureBox4.Image IsNot Nothing) Then
           PictureBox1.Image = Nothing
           PictureBox2.Image = Nothing
           PictureBox3.Image = Nothing
           PictureBox4.Image = Nothing
 End If


            If (PictureBox1.Image Is Nothing) Then
                PictureBox1.Image = jpg                

            ElseIf (PictureBox2.Image Is Nothing) Then
                PictureBox2.Image = jpg                

            ElseIf (PictureBox3.Image Is Nothing) Then
                PictureBox3.Image = jpg                

            ElseIf (PictureBox4.Image Is Nothing) Then
                PictureBox4.Image = jpg                
            End If

And no need to use Else section of IF statement.

This post has been edited by zeeshanef: 12 November 2012 - 08:03 AM

[royalopez06]

Thanks again, sir.

[royalopez06]

how about I click the button only once, then picture capture will continuously take picture until it completes all 4 picture boxes, then that's the time click event will stop.

[zeeshanef]

Please see this:
http://www.dreaminco...-picture-boxes/

[royalopez06]

Sorry, but i don't understand C# language.

[royalopez06]

Dim MyFrame(3) As PictureBox
   MyFrame(0) = PictureBox1
   MyFrame(1) = PictureBox2
   MyFrame(2) = PictureBox3  
   MyFrame(3) = PictureBox4

If (PictureBox1.Image IsNot Nothing AndAlso PictureBox2.Image IsNot    Nothing AndAlso PictureBox3.Image IsNot Nothing AndAlso PictureBox4.Image IsNot Nothing) Then
   PictureBox1.Image = Nothing
   PictureBox2.Image = Nothing
   PictureBox3.Image = Nothing
   PictureBox4.Image = Nothing
End If

for i = 0 to MyFrame.length - 1
If (MyFrame(i).Image Is Nothing) Then
   MyFrame(i).Image = jpeg
   ElseIf (MyFrame(i).Image Is Nothing) Then
      MyFrame(i).Image = jpeg
   ElseIf (MyFrame(i).Image Is Nothing) Then
      MyFrame(i).Image = jpeg
   ElseIf (MyFrame(i).Image Is Nothing) Then
      MyFrame(i).Image = jpeg
End if 
Next

Please help me with my code.

[lucky3]

It's been 6 days now, since you started this topic. Why don't you take a "VB.NET in 30 days" type of book in your hands, and try to understand what's going on. zeeshanef here is doing your work, and that is not the way to become programmer.

Learn how to debug, how to understand error messages, and stop posting "please help" type of vague requests/questions. Come with concrete problem, and you'll get tons of help.

[royalopez06]

Thank you for the help, I get it already I just use this code.

If (PictureBox1.Image IsNot Nothing AndAlso PictureBox2.Image IsNot    Nothing AndAlso PictureBox3.Image IsNot Nothing AndAlso PictureBox4.Image IsNot Nothing) Then
   Exit sub
Else
   CounterForm.show()
Then