Jump to content

V.b. Goto Kodunun Autoit'teki Karsiligi?


trll_pwll

Recommended Posts

Kisaca sadece gerekli kismi yazarak anlatmaya calisayim...
Bi form tablosu hazirladim. Button4e basilinca harf girilmesini istemiyorum. Oyüzden asagidaki if komutunu kullandim. Visual basicte if komutunun sonuna goto kodu ile islemi basa döndürebiliyoruz. ama bunda beceremedim.

[code]While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
Case $Button4
$sayi = InputBox("İsteğe Bağlı Sayı Girişi " , "Tahmin Edilmesini İstediğiniz Sayıyı Giriniz" , "" , "*2")
If $sayi < 1 Then [color="#FF0000"][i]($Button4 islemini basa döndürmek istedigim yer)[/i][/color]

EndSwitch
WEnd[/code]
Aciklayabildim mi?

Link to comment
Share on other sites

@trll_pwll

Tekrar bir döngü içinde kontrol yapabilirsin...
[codebox]Do
$sayi = InputBox("İsteğe Bağlı Sayı Girişi " , "Tahmin Edilmesini İstediğiniz Sayıyı Giriniz" , "" , "*2")
;~ If @error Then ExitLoop
;~ If $sayi > 90 Then ExitLoop ;Sayı 90 den büyükse...
Until $sayi < 1 ;$sayi 1 den küçük olana kadar...

MsgBox(64,"",$sayi)[/codebox]

Link to comment
Share on other sites

[code] Case $Button4
Do
$sayi = InputBox("İsteğe Bağlı Sayı Girişi " , "Tahmin Edilmesini İstediğiniz Sayıyı Giriniz" , "" , "*2")
Until $sayi > 0
MsgBox(64,"",$sayi)
[/code]
Bu kod simdilik isimi gördü gibi. GoTo olmamasi gercekten büyük eksiklik ama sizin gibi degerli TNCTR ekibi sayesinde her eksiklik doldurulabiliyor. Cok tesekkürler. :drinks:

Link to comment
Share on other sites

Archived

This topic is now archived and is closed to further replies.

  • Recently Browsing   0 members

    No registered users viewing this page.

×
×
  • Create New...