ASP[LÜTFENN BİR YARDIM]
-
arkadaş lar asp yi iyi bilenlerin dikkatine asp de if else ve case iyile dört işlem yaptırma.
ekran çıktısı şu şekilde olacak
formalar la yapılmış iki kutucuk ortasında da yapılacak işlem
ve sonuç olacak ama case ile yapılacak
ör: 25 + 30 = ? sonuç ne ise
/
-
*
arkadaşlar lütven yardım bunu nasıl yaparıım case ile yapılacak yanlız.yardım ederseniz çok sevinirim
-
Hoca asp biliyordum ama unuttum ama vb dir sonuçta.Senin verdiğin şeyi pek anlamadım.Güzelce açıklarsan cevaplarım. O kadar zor değil,ama çok karışık anlatmışsın.Şu verdiğin örnekte bile hiç birşey anlamadım
ör: 25 + 30 = ? sonuç ne ise / - * -
abi bak şimdi yaptığımız sayfayı explorerden açtığımızda kulanıcı ikitane sayı girecek select seçeneğinden de yapacağı işlemi seçecek toplamayı seçtiyse topla ma çarpmayı seçtiyse çarpma
lütven bi yardım -
Kodlar burda hocam, ' (kesme) işareti ile başlayanlar sadece sana bilgi vermek amacıyla yazılmıştır,onlar silsende fark etmez.Bu kod visual basic içindir.Bunu asp ye çevirebilirsin.Amacım sadece mantık vermek,forma iki text kutusu,bir combobox bir tane de buton koy
Private Sub Form_Load()
'text1 birinci sayı
'text2 ikinci sayı
'combo1 de işlemler
'command1 hesapla butonu
'Burda işlemleri listemize ekledik
Combo1.AddItem "+"
Combo1.AddItem "-"
Combo1.AddItem "*"
Combo1.AddItem "/"
End Sub
Private Sub Command1_Click()
'islem ve sonuc diye iki tip tanımladık
Dim islem, sonuc
'islemi seçme kutusundaki yazının içeriğine atadım
islem = Combo1.Text
'islemde seçilene göre hareket eden select case de burda
Select Case islem
'işlem toplama ise;
Case "+":
sonuc = Val(Text1) + Val(Text2)
MsgBox sonuc
'işlem çıkartma ise;
Case "-":
sonuc = Val(Text1) - Val(Text2)
MsgBox sonuc
'işlem çarpma ise;
Case "*":
sonuc = Val(Text1) * Val(Text2)
MsgBox sonuc
'işlem bölme ise;
Case "/":
sonuc = Val(Text1) / Val(Text2)
MsgBox sonuc
'Yukarıdakilerin dışında bir karakter veya bir olay tanımlanmışsa;
Case Else:
MsgBox "Böyle bir işlem özelliği yok"
End Select
End Sub
-
ey vallah kanki sağolasın
-
Bana kanki demesen sevinirim,
Önemli değil -
oldu kardeş,abi,arkadaş ne kabul edersen ama sağol
-
çok teşşekür edrim tam isdeiğim gibi olmuş çook teşkür ederims ağolun
-
ya abi ya burda demin bir çok madalyası olan bir arakdaş ynaıt vernişti tam isdeğim gibi olmuştu nereye gitti alamadım onu ya o arkadaş bidaha yanıt yaza bilirmi
-
yazdım hoca buyur ama öle direk kolaya yerleşmek yok...
al resimden otur yaz hemde anlamış olursun :)
http://www.hemenpaylas.com/download/394849/renegadealien.TIF.html
maksat müritlerin işi görülsün :) -
teşşekürler hoca çok sağolasın
Toplam Hit: 1399 Toplam Mesaj: 11