Visual Basic 6 | Serial Yapımı ~ By AgentWalter

[AgentWalter]

Serial Yapımı ;

Gerekenler ;

• 4 Adet Text
• 1 Adet Timer
• 1 Adet Command Button
• 1 Adet Label

Öncelikle textleri yan yana koyalım aşağıdaki resimde görmüş olduğunuz gibi.

Label'i istediğiniz yere koyabilirsiniz. Çünki şifre doğrulandı yazıcak.

Command1 enabled : false yapın - command1 ise programa geçiş sağlıcak şifre girince açılacak.

Butonumuz kod kısmına alttaki kodu yerleştiriyoruz.

Form1.Hide
Form2.Show

Serial Kodu: 123 - 123 - 123 - 123 ( Siz kod yerinden istediğiniz şifreyi yapabilirsiniz.

Timerin içine: İnterval 1

If Text1.Text = "123" Then
If Text2.Text = "123" Then
If Text3.Text = "123" Then
If Text4.Text = "123" Then
Text1.Enabled = False
Text2.Enabled = False
Text3.Enabled = False
Text4.Enabled = False
Command1.Enabled = True
Label3.Caption = "Şifre Doğrulandı."
Timer1.Enabled = False
Else
Label3.Caption = "Şifre Okunuyor"
End If
End If
End If
End If

Serialimizi böylelikle oluşturmuş oluyoruz.

Programdan Görüntü:

Linkleri görebilmek için Turkmmo Forumuna ÜYE olmanız gerekmektedir.

Serial Source: İndir/Download

Virüs Tarama:

Linkleri görebilmek için Turkmmo Forumuna ÜYE olmanız gerekmektedir.

NOT: Programın kodları + yapımı tamamen bana aittir. Lütfen yok surda vardı, surdada görmüştüm gibi yorumlar istemiyorum. Teşekkürler.

 

[Rney]

Teşekkürler.

 

[AgentWalter]

Önemi yok

 

[HanDe*]

TeşekkürLer

 

[AgentWalter]

Ne demek