Proje 5 : TheWayEnd Gazete Manşetleri

Public Class Form1

	Private Sub Label1_Click_2(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Label1.Click

 PictureBox1.Visible = True

 PictureBox1.Load("http://resimler.haberler.com/gazete/sabah-gazetesi/bugun.jpg")

	End Sub



	Private Sub Label2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Label2.Click

 PictureBox1.Visible = True

 PictureBox1.Load("http://resimler.haberler.com/gazete/aksam-gazetesi/bugun.jpg")

	End Sub



	Private Sub Label5_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Label5.Click

 PictureBox1.Visible = True

 PictureBox1.Load("http://resimler.haberler.com/gazete/taraf-gazetesi/bugun.jpg")

	End Sub



	Private Sub Label14_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Label14.Click

 PictureBox1.Visible = True

 PictureBox1.Load("http://resimler.haberler.com/gazete/zaman-gazetesi/bugun.jpg")

	End Sub



	Private Sub Label11_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Label11.Click

 PictureBox1.Visible = True

 PictureBox1.Load("http://resimler.haberler.com/gazete/vatan-gazetesi/bugun.jpg")

	End Sub



	Private Sub Label9_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Label9.Click

 PictureBox1.Visible = True

 PictureBox1.Load("http://resimler.haberler.com/gazete/star-gazetesi/bugun.jpg")

	End Sub



	Private Sub Label4_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Label4.Click

 PictureBox1.Visible = True

 PictureBox1.Load("http://resimler.haberler.com/gazete/posta-gazetesi/bugun.jpg")

	End Sub



	Private Sub Label13_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Label13.Click

 PictureBox1.Visible = True

 PictureBox1.Load("http://resimler.haberler.com/gazete/vakit-gazetesi/bugun.jpg")

	End Sub



	Private Sub Label7_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Label7.Click

 PictureBox1.Visible = True

 PictureBox1.Load("http://resimler.haberler.com/gazete/fanatik-gazetesi/bugun.jpg")

	End Sub



	Private Sub Label6_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Label6.Click

 PictureBox1.Visible = True

 PictureBox1.Load("http://resimler.haberler.com/gazete/milliyet-gazetesi/bugun.jpg")

	End Sub



	Private Sub Label8_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Label8.Click

 PictureBox1.Visible = True

 PictureBox1.Load("http://resimler.haberler.com/gazete/radikal-gazetesi/bugun.jpg")

	End Sub



	Private Sub Label10_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Label10.Click

 PictureBox1.Visible = True

 PictureBox1.Load("http://resimler.haberler.com/gazete/takvim-gazetesi/bugun.jpg")

	End Sub



	Private Sub Label17_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Label17.Click

 PictureBox1.Visible = True

 PictureBox1.Load("http://resimler.haberler.com/gazete/fotomac-gazetesi/bugun.jpg")

	End Sub



	Private Sub Label16_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Label16.Click

 PictureBox1.Visible = True

 PictureBox1.Load("http://resimler.haberler.com/gazete/turkiye-gazetesi/bugun.jpg")

	End Sub



	Private Sub Label15_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Label15.Click

 PictureBox1.Visible = True

 PictureBox1.Load("http://resimler.haberler.com/gazete/sozcu-gazetesi/bugun.jpg")

	End Sub



	Private Sub Label18_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Label18.Click

 PictureBox1.Visible = True

 PictureBox1.Load("http://resimler.haberler.com/gazete/bugun-gazetesi/bugun.jpg")

	End Sub



	Private Sub Label3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Label3.Click

 PictureBox1.Visible = True

 PictureBox1.Load("http://resimler.haberler.com/gazete/hurriyet-gazetesi/bugun.jpg")

	End Sub



	Private Sub Label12_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Label12.Click

 PictureBox1.Visible = True

 PictureBox1.Load("http://resimler.haberler.com/gazete/haberturk-gazetesi/bugun.jpg")

	End Sub



	Private Sub Label19_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Label19.Click

 PictureBox1.Visible = True

 PictureBox1.Load("http://resimler.haberler.com/gazete/yenisafak-gazetesi/bugun.jpg")

	End Sub



	Private Sub Label20_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Label20.Click

 PictureBox1.Visible = True

 PictureBox1.Load("http://resimler.haberler.com/gazete/fotospor-gazetesi/bugun.jpg")

	End Sub



	Private Sub Label21_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Label21.Click

 PictureBox1.Visible = True

 PictureBox1.Load("http://resimler.haberler.com/gazete/gunes-gazetesi/bugun.jpg")

	End Sub



	Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load

 PictureBox1.Visible = False

	End Sub

End Class