BARONER FORUM

Bahadır Arda Onur Eren
 
AnasayfaTakvimGaleriSSSAramaÜye ListesiKullanıcı GruplarıKayıt OlGiriş yap

Paylaş | 
 

 BASİT BİR ŞEHİR GİRME ÖRNEGİ

Önceki başlık Sonraki başlık Aşağa gitmek 
YazarMesaj
Admin
Admin


Mesaj Sayısı : 22
Kayıt tarihi : 24/11/08
Yaş : 25

MesajKonu: BASİT BİR ŞEHİR GİRME ÖRNEGİ   Çarş. Ara. 10, 2008 12:59 am

Ben üç adet şehir belirledim bunu önce dim şehir string diyerek programıma başladım derken şehirlermizi textboxa yazcagmızı söyleyip eger sivas girilirse sivaslısın eger hatay girilirse hataylsın kırıkkale girilirse kırıkkalelisin mesaji verilsin istedim bilmeyen ler için örn eger kırıkkale girilrse yi (else if (şehir="kırıkkale") then ) diye gösterdim aşagıdaki linkten indirebilrisiniz...




indir

http://rapidshare.com/files/172128187/ONUR_BAS__304_T_B__304_R_BAS__304_C_oeRNEG__304_.rar.html




Public Class Form1

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim şehir As String
şehir = TextBox1.Text
If (şehir = "kırıkkale") Then
MsgBox("kırıkkale vay hemşerimm")
Form2.Show()
MsgBox("hoşgeldiniz")
TextBox1.ResetText()
ElseIf (şehir = "hatay") Then
MsgBox("hatay vay be")
Form2.Show()
MsgBox("hoşgeldiniz")
TextBox1.ResetText()
ElseIf (şehir = "sivas") Then
MsgBox("sivas vay be")
Form2.Show()
MsgBox("hoşgeldiniz")
TextBox1.ResetText()
Else
MsgBox("hadi kocum sen yavaşta yaylan")
TextBox1.ResetText()
End If
End Sub



ögretmenimiz sadık yıldıza teşekkür ederiz...
Sayfa başına dön Aşağa gitmek
Kullanıcı profilini gör http://baroner.6forum.biz
 
BASİT BİR ŞEHİR GİRME ÖRNEGİ
Önceki başlık Sonraki başlık Sayfa başına dön 
1 sayfadaki 1 sayfası
 Similar topics
-
» Diyemiyorum

Bu forumun müsaadesi var:Bu forumdaki mesajlara cevap veremezsiniz
BARONER FORUM :: PROGRAMLAMA :: VİSUAL BASİC .NET-
Buraya geçin: