HERAKLES Otomatik Avlı kalıcı sunucu. 19 Haziran'da açılıyor. Atius & Wizard güvencesiyle hemen kayıt ol, ön kayıt ödülleri aktif. HEMEN TIKLA!
Merhaba arkadaşlar
Bu derste sizlere vize final ortalamasını bulup nota göre yorum veren bir uygulamayı göstereceğim.
Burada yapmamız gereken şey;
Hepinize kolay gelsin.
Bu derste sizlere vize final ortalamasını bulup nota göre yorum veren bir uygulamayı göstereceğim.
Burada yapmamız gereken şey;
- 1 adet command buton,
- 6 adet label,
- 2 adet textbox.
Hepinize kolay gelsin.
Kod:
Private Sub Command1_Click()
vize = Val(Text1.Text)
final = Val(Text2.Text)
ORT = vize * 0.4 + final * 0.6
Label6.Caption = ORT
If ORT < 40 Then
Label4.Caption = "zayıf"
End If
If ORT >= 40 And ORT < 60 Then
Label4.Caption = "ORTA"
End If
If ORT >= 60 Then
Label4.Caption = "İYİ"
End If
End Sub
Şu an konuyu görüntüleyenler (Toplam : 0, Üye: 0, Misafir: 0)
Benzer konular
- Cevaplar
- 5
- Görüntüleme
- 2K
- Cevaplar
- 1
- Görüntüleme
- 493
