Arama butonu
Bu konudaki kullanıcılar: 1 misafir
8
Cevap
683
Tıklama
0
Öne Çıkarma
VB de kolay bir program
K
11 yıl
Yüzbaşı
Konu Sahibi

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!



F
11 yıl
Yüzbaşı

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


Bu mesaja 1 cevap geldi.
K
11 yıl
Yüzbaşı
Konu Sahibi

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


Bu mesaja 1 cevap geldi.
T
11 yıl
Teğmen

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


Bu mesaja 1 cevap geldi.
K
11 yıl
Yüzbaşı
Konu Sahibi

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?


Bu mesaja 1 cevap geldi.
T
11 yıl
Teğmen

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.


Bu mesaja 2 cevap geldi.
İ
11 yıl
Yüzbaşı

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.


Bu mesaja 1 cevap geldi.

Bu mesajda bahsedilenler: @kalplihayat
K
11 yıl
Yüzbaşı
Konu Sahibi

quote:

Orijinalden alıntı: Erdinc20

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.

nerede biliyorum demişim onuda gösterirsen sevinirim



K
11 yıl
Yüzbaşı
Konu Sahibi

quote:

Orijinalden alıntı: thenemne1

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.

ilgilendiğiniz için tekrar teşekkürler



DH Mobil uygulaması ile devam edin. Mobil tarayıcınız ile mümkün olanların yanı sıra, birçok yeni ve faydalı özelliğe erişin. Gizle ve güncelleme çıkana kadar tekrar gösterme.