Visual Basic'de ve bir çok programlama dilinde kullanıcıya bir şey seçtirileceğinde, seçenekleri kullanıcıya sunmak için kullanılır. Kullanıcının seçtiği seçeneğe göre program çalışmaya devam eder. Böylece programınız esnek bir hal alır. Kullanıcı kontrolün kendisinde olduğunu hisseder.
Şimdi Visual Basic'de standart bir proje açarak formun üstüne bir "combo box" koyun ve properties'den 'text' kısmına tıklayarak 'Seçiminizi Yapın' yazın. Artık combo box'ın üzerinde 'Seçiminizi Yapın' yazıyor olmalıdır. Daha sonra gene 'properties' kısmından 'List' kısmına tılayın. Köşede çıkan oka tıklayarak açılan bölüme 'Seçenek1' yazın ve entera basın. 'Seçenek1' yazdığınız yer kaybolacaktır. Tekrar köşedeki oka basarak deminki 'Seçenek1' yazdığınız yerin görüntülenmesini sağlayın. Artık cursor Seçenek1 yazısının altında yanıp sönecektir. Burayada 'Seçenek2' yazın. Aynı işlemleri tekrarlayarak bir kaç tane seçenek tanımlayın. bundan sonra kullanıcı bu seçeneklerden birini seçtiğinde neler olacağını tasarlayacağız.
Seçeneklere nasıl ulaşacağız
Combo Box'ın 'text' properties'ini (özelliğini) kullanarak seçilen seçeneklere ulaşabiliriz. Kullanıcı önce seçeneğini seçer ve ardından bir tuşa basar. Tuşun fonksiyonunda şöyle bir kod kullanabiliriz.
If Combo1.Text = "Seçenek1" Then
Text1.Text = Combo1.Text
ElseIf Combo1.Text = "Seçenek1" Then
Text1.Text = Combo1.Text
End If
Yada Case yapısını kullanabilirsiniz. Bu durumda şöyle bir kod kullanabilirsiniz. "Case" yapısı "If" yapısından daha iyi sanki ama sonuçta aynı işi yapıyor. Gelenek göreneklerine bağlı bir programcı bence case yapısını kullanır.
Select Case Combo1.Text
Case "Seçenek1"
Text1.Text = Combo1.Text
Case "Seçenek2"
Text1.Text = Combo1.Text
Case "Seçenek3"
Text1.Text = Combo1.Text
End Select
Database programlarında baze bazı attribute'lerin kendi değerleri olur. Örneğin 1, 2, 3, 4 gibi. Ve bunların bazı özel anlamları vardır. Mesela 1 = Fen Bilgisi, 2 = Sosyal Bilgiler, 3 = Din Bilgisi vb. Bu durumda ekranda 1, 2, 3, 4 gibi değerler yerine sizin istediğiniz değerlerin görünmesini sağlayabilirsiniz. Böylece programda daha anlaşılır bir seçenek olur. Şöyle bir kod kullanabiliriz.
Select Case Combo1.Text
Case "Fen Bilgisi"
dbattr = "1"
Case "Sosyal Bilgiler"
dbattr = "2"
Case "Din Bilgisi"
dbattr = "3"
End Select
Kullanıcı bir seçenek seçtiğinde "dbattr" isimli değişken değer alır ve bunuda kayıt yaratırken kullanabiliriz.
Şimdi Visual Basic'de standart bir proje açarak formun üstüne bir "combo box" koyun ve properties'den 'text' kısmına tıklayarak 'Seçiminizi Yapın' yazın. Artık combo box'ın üzerinde 'Seçiminizi Yapın' yazıyor olmalıdır. Daha sonra gene 'properties' kısmından 'List' kısmına tılayın. Köşede çıkan oka tıklayarak açılan bölüme 'Seçenek1' yazın ve entera basın. 'Seçenek1' yazdığınız yer kaybolacaktır. Tekrar köşedeki oka basarak deminki 'Seçenek1' yazdığınız yerin görüntülenmesini sağlayın. Artık cursor Seçenek1 yazısının altında yanıp sönecektir. Burayada 'Seçenek2' yazın. Aynı işlemleri tekrarlayarak bir kaç tane seçenek tanımlayın. bundan sonra kullanıcı bu seçeneklerden birini seçtiğinde neler olacağını tasarlayacağız.
Seçeneklere nasıl ulaşacağız
Combo Box'ın 'text' properties'ini (özelliğini) kullanarak seçilen seçeneklere ulaşabiliriz. Kullanıcı önce seçeneğini seçer ve ardından bir tuşa basar. Tuşun fonksiyonunda şöyle bir kod kullanabiliriz.
If Combo1.Text = "Seçenek1" Then
Text1.Text = Combo1.Text
ElseIf Combo1.Text = "Seçenek1" Then
Text1.Text = Combo1.Text
End If
Yada Case yapısını kullanabilirsiniz. Bu durumda şöyle bir kod kullanabilirsiniz. "Case" yapısı "If" yapısından daha iyi sanki ama sonuçta aynı işi yapıyor. Gelenek göreneklerine bağlı bir programcı bence case yapısını kullanır.
Select Case Combo1.Text
Case "Seçenek1"
Text1.Text = Combo1.Text
Case "Seçenek2"
Text1.Text = Combo1.Text
Case "Seçenek3"
Text1.Text = Combo1.Text
End Select
Database programlarında baze bazı attribute'lerin kendi değerleri olur. Örneğin 1, 2, 3, 4 gibi. Ve bunların bazı özel anlamları vardır. Mesela 1 = Fen Bilgisi, 2 = Sosyal Bilgiler, 3 = Din Bilgisi vb. Bu durumda ekranda 1, 2, 3, 4 gibi değerler yerine sizin istediğiniz değerlerin görünmesini sağlayabilirsiniz. Böylece programda daha anlaşılır bir seçenek olur. Şöyle bir kod kullanabiliriz.
Select Case Combo1.Text
Case "Fen Bilgisi"
dbattr = "1"
Case "Sosyal Bilgiler"
dbattr = "2"
Case "Din Bilgisi"
dbattr = "3"
End Select
Kullanıcı bir seçenek seçtiğinde "dbattr" isimli değişken değer alır ve bunuda kayıt yaratırken kullanabiliriz.
