Randomize ile Picturebox Görünümü


Visual Basic ve .NET Framework    Visual Basic ve .NET Framework İle İlgili Paylaşım Kategorisi

Yazar: x60    0 Yorum    131 Görüntüleme
  • Derecelendirme: 0/5 - 0 oy

Paylaşım Tarihi: 13.01.2016, 20:01:25 #1
x60 #Requiem
Cezalı Üye
Status: Çevrimdışı Yorumları:545 Konuları:161 Kayıt Tarihi:18.11.2015

Bu dersimizde sizlere randomize ile picturebox görünümünü göstereceğim. 

Picturebox'ın Properties'ten visible ayarını "false" yapalım. 

3 label ekleyelim ve text'ini 0 yapalım. 2 adet de button koyalım.

PHP Kod:
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        Dim a, b, c As Integer
        Randomize()
        a = Rnd() * 7
        b = Rnd() * 7
        c = Rnd() * 7
        Label1.Text = (a)
        Label2.Text = (b)
        Label3.Text = (c)
        PictureBox1.Visible = False
        If Label1.Text = "4" Then
            PictureBox1.Visible = True
        End If
        If Label2.Text = "4" Then
            PictureBox1.Visible = True
        End If
        If Label3.Text = "4" Then
            PictureBox1.Visible = True
        End If

    End Sub

    Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
        MsgBox("Bizi Tercih Ettiğiniz İçin Teşekkürler!")
        End
    End Sub 











Aradığınızı Bulamadınız Mı ?

Konuyu Okuyanlar:
1 Ziyaretçi