efe43
Üye
- Katılım
- 25 Ara 2006
- Mesajlar
- 419
- Puanları
- 1
- Yaş
- 40
arkdaşalar programa yeni başladım ve bir şey yazıyorum ama yarım kaldı işin içinden çıkmadım yardm edersenisevinirim.. seneryo şu
bu aşagıdaki programa ek olarak sayı 1 ve sayı2 ye yazılacak değerlerin 100 den büyük ve 0 dan küçük yani - haneli sayılar yasıldığında 0 ila 100 arasında bir değer giriniz diye msgbox olarak hata mesajı verecektir...yardımlarınız için teşekkürler
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim sayi1, sayi2 As Integer
Dim sayi3 As Integer = 0
sayi1 = Val(TextBox1.Text)
sayi2 = Val(TextBox2.Text)
sayi3 = Val(TextBox4.Text)
If (sayi1 * 0.4 + sayi2 * 0.6) >= 50 Then
Else
sayi3 = ("geçtiniz")
sayi3 = ("good bay baby")
End If
End Sub
bu aşagıdaki programa ek olarak sayı 1 ve sayı2 ye yazılacak değerlerin 100 den büyük ve 0 dan küçük yani - haneli sayılar yasıldığında 0 ila 100 arasında bir değer giriniz diye msgbox olarak hata mesajı verecektir...yardımlarınız için teşekkürler
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim sayi1, sayi2 As Integer
Dim sayi3 As Integer = 0
sayi1 = Val(TextBox1.Text)
sayi2 = Val(TextBox2.Text)
sayi3 = Val(TextBox4.Text)
If (sayi1 * 0.4 + sayi2 * 0.6) >= 50 Then
Else
sayi3 = ("geçtiniz")
sayi3 = ("good bay baby")
End If
End Sub