2011'den beri26 mesaj
selam arkadaşlar resimde anlattım yarıdm edebilr misiniz ? ? :S çok acil :S
Resim Linki Aşağıdadır ;
http://img145.imageshack.us/i/adszatg.jpg
Resim Linki Aşağıdadır ;
http://img145.imageshack.us/i/adszatg.jpg
Akış
bunu buldum bir dene bakalım.olmazsa bakalım yinePrivate Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim a, b, c, d, s As Integer
a = Val(TextBox1.Text)
b = Val(TextBox2.Text)
c = Val(TextBox3.Text)
d = Val(TextBox4.Text)
s = (a + b + c + d) / 4
TextBox5.Text = s
If s < 25 Then
TextBox6.Text = "0"
Elseif s < "45 "then
TextBox6.Text = "1"
elseif s <" 55" then
ElseIf s < "70" Then
TextBox6.Text = "3"
elseif s <" 85" then
TextBox6.Text = "4"
elseif s < "100" then
TextBox6.Text = " 5"
End If
bende anlatma kabiliyeti yok anlatırsn sevap işlersin vallahi.erdcan dedi: ↑muhtemelen meslek lisesinde öğrenci arkadaşımız yarınki ödevi yetiştirmeye çalışıyor.hepsini baştan sona anlat demez isen(değişken nedir,int nedir string nedir gibi ) anlatayım.
Çerez tercihleriniz Sitenin çalışması için zorunlu çerezler kullanılır. Ölçüm ve reklam çerezleri yalnız onay verirseniz çalışır. Ayrıntılar