Tıklayamazsın! Oyununun Yapımı

Tıklayamazsın! Oyunu

Bilen vardır bilmeyen de vardır

kimisine göre eğlenceli,kimisine göre sinir bozucu bir oyundur.(mouseyi kıranlar vardır)

kendisi yazıp denemek isteyen olur elbet.

1 tane button ekleyin ve kodu yapıştırın.

Public Class Form1
    Dim rnd As New Random
    Private Sub Button1_MouseMove(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles Button1.MouseMove
        Button1.Left = Rnd.Next(0, Me.Bounds.Width - Button1.Width)
        Button1.Top = rnd.Next(0, Me.Bounds.Height - Button1.Height)
    End Sub
    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        MsgBox("TIKLADIN! Tebrikler.") 'buttona tıklarsa msgbox gelecek
    End Sub
End Class 'sinir bozucu :) 

Paylaş :