Başlayalım..
1 tane button ekleyelim.
o butonumuz ne olacak? tabii ki "ekle"
şimdi 2. butonumuzu ekleyelim. oda cekilisi baslatacak degil mi ?
onada istediğinizi diyin.
1 listbox ekleyeceğiz bunla üyeleri listeleyeceğiz değil mi ? tabii ki..
son olarak textbox ekleyelim ve bu textboxa ise ekelyeceğimiz üyeleri seçelim..
ha yok ben .txt den çekeceğim diyorsanız internetten txt - listbox gibi aramalarla bula bilirsiniz.
şimdi button1 e çift tıklayıp bütün sayfayı açıp silin ve bu kodları girin..
vb.net
Kod:
yok ben c# yapacağım diyorsanız aynı şeyleri yapıp :
C#:
https://prnt.sc/kwsijb
Dosya.tc - Ücretsiz, Hızlı ve Kolay Dosya Paylaşımı
İndir Cekilis Programi zip
KONU BANA AİTTİR VE BOŞ BİR KONUDUR
1 tane button ekleyelim.
o butonumuz ne olacak? tabii ki "ekle"
şimdi 2. butonumuzu ekleyelim. oda cekilisi baslatacak degil mi ?
onada istediğinizi diyin.
1 listbox ekleyeceğiz bunla üyeleri listeleyeceğiz değil mi ? tabii ki..
son olarak textbox ekleyelim ve bu textboxa ise ekelyeceğimiz üyeleri seçelim..
ha yok ben .txt den çekeceğim diyorsanız internetten txt - listbox gibi aramalarla bula bilirsiniz.
şimdi button1 e çift tıklayıp bütün sayfayı açıp silin ve bu kodları girin..
vb.net
Kod:
Kod:
Public Class Form1
Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
If TextBox1.Text = "" Then
MsgBox("Birisini giriniz.")
Else
ListBox1.Items.Add(TextBox1.Text)
TextBox1.Text = ""
End If
End Sub
Private Sub Button2_Click(sender As Object, e As EventArgs) Handles Button2.Click
Dim cekilis As New Random
Dim Cekilissayi As Integer = cekilis.Next(0, ListBox1.Items.Count - 1)
ListBox1.SelectedIndex = Cekilissayi
MsgBox("Kazanan Kişi : " & ListBox1.Text)
End Sub
End Class
C#:
Kod:
using System;
using System.Linq;
using Microsoft.VisualBasic;
public class Form1
{
private **** Button1_Click(object sender, EventArgs e)
{
if (TextBox1.Text == "")
Interaction.MsgBox("Birisini giriniz.");
else
{
ListBox1.Items.Add(TextBox1.Text);
TextBox1.Text = "";
}
}
private **** Button2_Click(object sender, EventArgs e)
{
Random cekilis = new Random();
int Cekilissayi = cekilis.Next(0, ListBox1.Items.Count - 1);
ListBox1.SelectedIndex = Cekilissayi;
MsgBox("Kazanan Kişi : " + ListBox1.Text);
}
}
https://prnt.sc/kwsijb
Dosya.tc - Ücretsiz, Hızlı ve Kolay Dosya Paylaşımı
İndir Cekilis Programi zip
KONU BANA AİTTİR VE BOŞ BİR KONUDUR