Visual Basic ve Renk
Visual Basic* Windows’un tüm renk öğelerine kolayca erişebilir. VB formunuz üzerindeki herhangi bir nesnenin rengini değiştirmek için iki yol sunuyor bunlardan birincisi RGB komutu. Formlarınızı yaratırken kullandığınız renk paletinden bir renk seçtiğinizde o rengin Özellikler kutucuğunda değişik kodlara dönüştüğünü görürsünüz. Visual Basic* siz rengi seçtiğiniz anda onu sistemin anlayabileceği 16’lık sayı düzenine çevirir. Visual Basic’i kullanarak her bir renk’ten 1’den 255’e kadar bir ton alabilir* bunları karıştırabilir ve böylece 16.581.375 adet değişik renk elde edebilirsiniz. İşte size RGB komutu kullanılarak form üzerine basit bir palet yaratan ufak bir program. RGB değerini değiştirerek çok değişik görüntüler elde edebilirsiniz. Örnekte ayrıca bir formun ortasının nasıl bulunacağını da görebilirsiniz. Private Sub Form_Click() ScaleMode = 1 ' Ölçü sistemini piksele çevirCX = ScaleWidth / 2 ' Formun dikey ortasını bulCY = ScaleHeight / 2 ' Formun yatay ortasını bulDrawWidth = 3 ' Çizim genişliğini ayarlar = 100For I = 50 To 0 Step -1F = I / 50F1 = 1 - F: F2 = 1 + F ' Hesaplamalar...r = r + 10: b = b + 10If b > 50 Then g = g + 5ForeColor = RGB(r* g* b) ' Önalan rengini belirleLine (CX * F1* CY * F1)-(CX * F2* CY * F2)* * BFNext IEnd SubProgramınızı yazdıktan sonra formunuzun üzerine bir kere tıklayın. Güzel bir renk paletinin oluştuğunu göreceksiniz. Visual Basic’in size sunduğu diğer bir renk komutu ise QBColor komutudur. Bu komutu kullanarak QBASIC’ten kalan sınırlı 15 tane temel rengi kullanabilirsiniz. Aktif formun arkaplan rengini maviye boyamak için şunun gibi bir komut kullanmalısınız:
Form1.ForeColor = QBColor(1)
Visual Basic* Windows’un tüm renk öğelerine kolayca erişebilir. VB formunuz üzerindeki herhangi bir nesnenin rengini değiştirmek için iki yol sunuyor bunlardan birincisi RGB komutu. Formlarınızı yaratırken kullandığınız renk paletinden bir renk seçtiğinizde o rengin Özellikler kutucuğunda değişik kodlara dönüştüğünü görürsünüz. Visual Basic* siz rengi seçtiğiniz anda onu sistemin anlayabileceği 16’lık sayı düzenine çevirir. Visual Basic’i kullanarak her bir renk’ten 1’den 255’e kadar bir ton alabilir* bunları karıştırabilir ve böylece 16.581.375 adet değişik renk elde edebilirsiniz. İşte size RGB komutu kullanılarak form üzerine basit bir palet yaratan ufak bir program. RGB değerini değiştirerek çok değişik görüntüler elde edebilirsiniz. Örnekte ayrıca bir formun ortasının nasıl bulunacağını da görebilirsiniz. Private Sub Form_Click() ScaleMode = 1 ' Ölçü sistemini piksele çevirCX = ScaleWidth / 2 ' Formun dikey ortasını bulCY = ScaleHeight / 2 ' Formun yatay ortasını bulDrawWidth = 3 ' Çizim genişliğini ayarlar = 100For I = 50 To 0 Step -1F = I / 50F1 = 1 - F: F2 = 1 + F ' Hesaplamalar...r = r + 10: b = b + 10If b > 50 Then g = g + 5ForeColor = RGB(r* g* b) ' Önalan rengini belirleLine (CX * F1* CY * F1)-(CX * F2* CY * F2)* * BFNext IEnd SubProgramınızı yazdıktan sonra formunuzun üzerine bir kere tıklayın. Güzel bir renk paletinin oluştuğunu göreceksiniz. Visual Basic’in size sunduğu diğer bir renk komutu ise QBColor komutudur. Bu komutu kullanarak QBASIC’ten kalan sınırlı 15 tane temel rengi kullanabilirsiniz. Aktif formun arkaplan rengini maviye boyamak için şunun gibi bir komut kullanmalısınız:
Form1.ForeColor = QBColor(1)
