HHportal Reklam Vermek İçin: admin@hhportal.com

Etiketlenen üyelerin listesi

+ Yeni Konu aç
3 sonuçtan 1 ile 3 arası

Konu: hesap makinası programı kodları (visual.studio

  1. #1
    Durum:
    Çevrimdışı
    murat335 - ait Kullanıcı Resmi (Avatar)
    Eski Üye
    Üyelik tarihi
    09.09.2005
    Yer
    SqlConnection con=new SqlConnection("data source="+SunucuAdi+";initial catalog="+VeritabaniAdi+";
    Yaş
    33
    Aldığı Beğeni
    0
    Beğendikleri
    0
    Mesajlar
    732
    Konular
    127
    Ettiği Teşekkür
    0
    0 mesaja 0 teşekkür aldı

    hesap makinası programı kodları (visual.studio

    biraz gec oldu ama yazdım en sonunda

    PHP- Kodu:
    Geri Dön Private Sub Command1_Click()
    Text1.Text Text1.Text 1
    End Sub
    Private Sub Command10_Click()
    Text1.Text
    Text1
    .Text ""
    Label1.Caption "/"
    End Sub
    Private Sub Command11_Click()
    Text1.Text
    Text1
    .Text ""
    Label1.Caption "*"
    End Sub
    Private Sub Command12_Click()
    Text1.Text
    Text1
    .Text ""
    Label1.Caption "-"
    End Sub
    Private Sub Command13_Click()
    Text1.Text
    Text1
    .Text ""
    Label1.Caption "+"
    End Sub
    Private Sub Command14_Click()
    'alanları temizle
    Text1.Text = " "
    Label1.Caption = ""
    Beep
    End Sub
    Private Sub Command15_Click()
    b = Text1.Text
    If Label1.Caption = "+" Then Text1.Text = a + b
    If Label1.Caption = "-" Then Text1.Text = a - b
    If Label1.Caption = "*" Then Text1.Text = a * b
    If Label1.Caption = "/" Then Text1.Text = a / b
    Beep
    End Sub
    Private Sub Command16_Click()
    Text1.Text = Text1.Text & 0
    End Sub
    Private Sub Command18_Click()
    MsgBox "Bu program Emin Özcan Eğitimci Mavii tarafından yapılmıştır. (c).| Özcan Software | 2004-2005", 64, "Program Hakkında"
    End Sub
    Private Sub Command2_Click()
    Text1.Text = Text1.Text & 2
    End Sub
    Private Sub Command3_Click()
    Text1.Text = Text1.Text & 3
    End Sub
    Private Sub Command4_Click()
    Text1.Text = Text1.Text & 4
    End Sub
    Private Sub Command5_Click()
    Text1.Text = Text1.Text & 5
    End Sub
    Private Sub Command6_Click()
    Text1.Text = Text1.Text & 6
    End Sub
    Private Sub Command7_Click()
    Text1.Text = Text1.Text & 7
    End Sub
    Private Sub Command8_Click()
    Text1.Text = Text1.Text & 8
    End Sub
    Private Sub Command9_Click()
    Text1.Text = Text1.Text & 9
    End Sub
    Private Sub Off_Click()
    mesaj = MsgBox("Şu anda programdan çıkıyorsunuz...", 7, "Program Çıkışı")
    End
    End Sub 
    heralde bir teşşekkürü cok görmezsiniz
    Konu murat335 tarafından (17.06.2006 Saat 04:11 ) değiştirilmiştir.

  2. #2
    Durum:
    Çevrimdışı
    nailgulmez38 - ait Kullanıcı Resmi (Avatar)
    Geçerken Uğradım
    Üyelik tarihi
    01.12.2005
    Aldığı Beğeni
    0
    Beğendikleri
    0
    Mesajlar
    84
    Konular
    0
    Ettiği Teşekkür
    0
    0 mesaja 0 teşekkür aldı
    cok sagol ya

  3. #3
    Durum:
    Çevrimdışı
    Touransht - ait Kullanıcı Resmi (Avatar)
    Misafir
    Üyelik tarihi
    13.04.2009
    Aldığı Beğeni
    0
    Beğendikleri
    0
    Mesajlar
    1
    Konular
    0
    Ettiği Teşekkür
    0
    0 mesaja 0 teşekkür aldı
    arkadasım saol tm da ınsan resmınıde kor buraya

Konu Bilgileri

Users Browsing this Thread

Şu an 1 kullanıcı var. (0 üye ve 1 konuk)

Bu Konudaki Etiketler

Yetkileriniz

  • Konu Acma Yetkiniz Yok
  • Cevap Yazma Yetkiniz Yok
  • Eklenti Yükleme Yetkiniz Yok
  • Mesajınızı Değiştirme Yetkiniz Yok
  •  
RSS RSS 2.0 XML MAP HTML SiteMap

Reklamı Kapat


Reklamı Kapat

Yukarı Çık
5651 sayılı yasaya göre forumumuzdaki mesajlardan doğabilecek her türlü sorumluluk yazan kullanıcılara aittir. Şikayet Mailimiz. İçerik, Yer Sağlayıcı Bilgilerimiz.

Search Engine Optimization by vBSEO 3.6.1