merhaba. VB de kolay bir program yazmak istiyorum uzun süredir yazmadığımdan unuttuğum kodlar var. programın mantığı çok basit
1 tane buton olucak bu butona 1. kez bastığımda bir msgbox gelecek.
2. kez bastığımda farklı bir msgbox gelecek
3. kez bastığımda farklı bir m gelecek.
not: başka şeylerde var ama okısımları bildiğim ve bunlarla pek alakası olmadığı için açıklama gereği duymadım. butona basınca msgbox vermesini biliyorum ama
1.kez basınca farklı 2. kez basınca farklı 3.kez basınca farklı msgbox verdirme işleminin nasıl yapılacağını bilmiyorum. yardımcı olursanız sevinirim. iyi günler!
bir integer tanımla başlangıc değeri olarak 1 ata. sonra butonun click olayına switch case kur. integer ı switch e yaz case lere 1-2-3 yap. case içinde int değerini arttırmayı unutma. 3 ten sonra tekrar başa döndürebilirsin değişkenin değerini değiştirip
quote:
Orijinalden alıntı: FreakDevil
bir integer tanımla başlangıc değeri olarak 1 ata. sonra butonun click olayına switch case kur. integer ı switch e yaz case lere 1-2-3 yap. case içinde int değerini arttırmayı unutma. 3 ten sonra tekrar başa döndürebilirsin değişkenin değerini değiştirip
anlamadım ama genede saol. zira 3 tane buttonu üst üste koydum button1 e tıklayınca button 1 görünmez button2 görünür oluyor ve mesaj geliyor sonra 2.ye basınca 2. görünmez olup 3. görünür olup mesaj geliyor. teşekkürler yinede
Bak kardeş önce Public Class Form1 yazan yerin hemen altına Global bir değişken oluştur.
Public Class Form1 Dim a As Integer = 1
Private Sub......
End Sub End Class
Sonra buton oluşturup bunu ekle istersen çoğaltırsın.
Select Case a Case 1 MsgBox("Slm") a += 1 Case 2 MsgBox("Slm1") a += 1 Case 3 MsgBox("Slm2") a = 1 End Select
quote:
Orijinalden alıntı: thenemne1
Bak kardeş önce Public Class Form1 yazan yerin hemen altına Global bir değişken oluştur.
Public Class Form1 Dim a As Integer = 1
Private Sub......
End Sub End Class
Sonra buton oluşturup bunu ekle istersen çoğaltırsın.
Select Case a Case 1 MsgBox("Slm") a += 1 Case 2 MsgBox("Slm1") a += 1 Case 3 MsgBox("Slm2") a = 1 End Select
kardeş çok saol çok açıklayıcı olmuş.sanırım case kalıbını kullanmayı öğrenmeliyim vb yi öğrenebileceğim türkçe site vs. kaynak önerebilirmisiniz?
quote:
Orijinalden alıntı: kalplihayat
quote:
Orijinalden alıntı: thenemne1
Bak kardeş önce Public Class Form1 yazan yerin hemen altına Global bir değişken oluştur.
Public Class Form1 Dim a As Integer = 1
Private Sub......
End Sub End Class
Sonra buton oluşturup bunu ekle istersen çoğaltırsın.
Select Case a Case 1 MsgBox("Slm") a += 1 Case 2 MsgBox("Slm1") a += 1 Case 3 MsgBox("Slm2") a = 1 End Select
kardeş çok saol çok açıklayıcı olmuş.sanırım case kalıbını kullanmayı öğrenmeliyim vb yi öğrenebileceğim türkçe site vs. kaynak önerebilirmisiniz?
Kardeş ben C#,C++ bildiğim için VB case,if nasıl kullanılır araştırarak mantıkla yaptım yani VB bilmiyorum. Sanalkurs.net diye site var ora anlatıyor çoğu şeyi. Ama iyimidir bilemem. Kitap alırsan daha çok faydalı olur.
Dostum biliyorum demişsin ama sorduğun sorular hiç oyle demiyor. Dediğin yapıları bilmiyorsan ve o kucucuk algoritmada bile zorlanıyorsan. Yazılım biliyorum deme lütfen.
Dostum biliyorum demişsin ama sorduğun sorular hiç oyle demiyor. Dediğin yapıları bilmiyorsan ve o kucucuk algoritmada bile zorlanıyorsan. Yazılım biliyorum deme lütfen.
Bak kardeş önce Public Class Form1 yazan yerin hemen altına Global bir değişken oluştur.
Public Class Form1 Dim a As Integer = 1
Private Sub......
End Sub End Class
Sonra buton oluşturup bunu ekle istersen çoğaltırsın.
Select Case a Case 1 MsgBox("Slm") a += 1 Case 2 MsgBox("Slm1") a += 1 Case 3 MsgBox("Slm2") a = 1 End Select
kardeş çok saol çok açıklayıcı olmuş.sanırım case kalıbını kullanmayı öğrenmeliyim vb yi öğrenebileceğim türkçe site vs. kaynak önerebilirmisiniz?
Kardeş ben C#,C++ bildiğim için VB case,if nasıl kullanılır araştırarak mantıkla yaptım yani VB bilmiyorum. Sanalkurs.net diye site var ora anlatıyor çoğu şeyi. Ama iyimidir bilemem. Kitap alırsan daha çok faydalı olur.
ilgilendiğiniz için tekrar teşekkürler
yeni mesaja git
Yeni mesajları sizin için sürekli kontrol ediyoruz, bir mesaj yazılırsa otomatik yükleyeceğiz.Bir Daha Gösterme