Anasayfa > Kodlar > Visual Basic 6 ile Shape fillstyle örneği

Visual Basic 6 ile Shape fillstyle örneği


Shape fillstyle (grafiksel kontrol elemanı şekil içi boyama) örneği.



Private Sub Form_Load()
Dim i
Shape1(0).Left = 100
For i = 1 To 7
Load Shape1(i) ‘yeni shape oluştur
Shape1(i).Left = 100
‘bir önceki şeklin altına yerleştir
Shape1(i).Top = Shape1(i – 1).Top + Shape1(i – 1).Height + 20
Shape1(i).FillStyle = i
Shape1(i).Visible = True
Next
End Sub


TD Software


  1. Henüz yorum yapılmamış.
  1. No trackbacks yet.

Bir Cevap Yazın

Aşağıya bilgilerinizi girin veya oturum açmak için bir simgeye tıklayın:

WordPress.com Logosu

WordPress.com hesabınızı kullanarak yorum yapıyorsunuz. Log Out / Değiştir )

Twitter resmi

Twitter hesabınızı kullanarak yorum yapıyorsunuz. Log Out / Değiştir )

Facebook fotoğrafı

Facebook hesabınızı kullanarak yorum yapıyorsunuz. Log Out / Değiştir )

Google+ fotoğrafı

Google+ hesabınızı kullanarak yorum yapıyorsunuz. Log Out / Değiştir )

Connecting to %s

%d blogcu bunu beğendi: