THT DUYURU

Visual Basic Öğrenilmesi ve kullanışı kolay olan Visual Basic’in dökümanlarının ve open source projelerin paylaşım alanı.

chat
Seçenekler

Renk Değiştiren Label Yapımı // starktom

'starktom - ait Kullanıcı Resmi (Avatar)
Üye
Üyelik tarihi:
12/2017
Nereden:
Nereye
Mesajlar:
1.739
Konular:
132
Teşekkür (Etti):
470
Teşekkür (Aldı):
420
Ticaret:
(0) %
15-09-2018 03:04
#1
Renk Değiştiren Label Yapımı // starktom
Merhabalar bu konumda visual basicde renk değiştiren label yapımını göstereceğim .


İlk olarak visual basici açtıkdan sonra yeni bir form oluşturuyoruz.



Formumuza 1 adet timer ve 1 adetde label ekliyoruz.



Formumuza 2 kere tıklıyoruz ve Public Classın altına aşağıdaki kodu ekliyoruz.


Kod:
 Dim r, g, b As Integer




Daha sonra timera çift tıklıyoruz ve aşağıdaki kodu yazıyoruz.

Kod:
r = Int(Rnd() * 256)
       g = Int(Rnd() * 256)
       b = Int(Rnd() * 256)
       Label1.ForeColor = Color.FromArgb(r, g, b)




Daha sonra timerın Enabledini true yapıyoruz.



Labele tıklıyarak yazmak istediğimiz yazıyı yazıyoruz.



Ve formumuzu çalıştırınca aşağıdaki gibi bir (benzer) görüntü oluşuyor.



M3m0ry, OxiPionHacker Teşekkür etti.
Bykurabiye - ait Kullanıcı Resmi (Avatar)
Üye
Üyelik tarihi:
09/2016
Nereden:
Tanrı Dağı
Yaş:
16
Mesajlar:
2.506
Konular:
153
Teşekkür (Etti):
343
Teşekkür (Aldı):
259
Ticaret:
(0) %
15-09-2018 03:20
#2
Elinize sağlık komutan bey.
--------------------- Birazcık Yukarıya Bak.

Bir şey her şey için, her şey bir şey için vardır.
J. W. Von GOETHE
ByPerPer - ait Kullanıcı Resmi (Avatar)
Yazılımcı
Üyelik tarihi:
03/2018
Nereden:
İstanbul
Mesajlar:
1.764
Konular:
290
Teşekkür (Etti):
154
Teşekkür (Aldı):
396
Ticaret:
(0) %
15-09-2018 08:53
#3
Alıntı:
starktom´isimli üyeden Alıntı Mesajı göster
Merhabalar bu konumda visual basicde renk değiştiren label yapımını göstereceğim .


İlk olarak visual basici açtıkdan sonra yeni bir form oluşturuyoruz.



Formumuza 1 adet timer ve 1 adetde label ekliyoruz.



Formumuza 2 kere tıklıyoruz ve Public Classın altına aşağıdaki kodu ekliyoruz.


Kod:
 Dim r, g, b As Integer




Daha sonra timera çift tıklıyoruz ve aşağıdaki kodu yazıyoruz.

Kod:
r = Int(Rnd() * 256)
       g = Int(Rnd() * 256)
       b = Int(Rnd() * 256)
       Label1.ForeColor = Color.FromArgb(r, g, b)




Daha sonra timerın Enabledini true yapıyoruz.



Labele tıklıyarak yazmak istediğimiz yazıyı yazıyoruz.



Ve formumuzu çalıştırınca aşağıdaki gibi bir (benzer) görüntü oluşuyor.



Yararlı Paylaşım Teşekkürler ama form4'e kadar niye açtın gül gül öldüm
---------------------
Saraylarda süremem
Dağlarda sürdüğümü
Bin cihana değişmem
Şu öksüz Türklüğümü.
WASDci - ait Kullanıcı Resmi (Avatar)
Üye
Üyelik tarihi:
08/2018
Nereden:
Iğdır
Mesajlar:
165
Konular:
17
Teşekkür (Etti):
3
Teşekkür (Aldı):
10
Ticaret:
(0) %
15-09-2018 09:15
#4
Eline Sağlık Hocam
--------------------- Türk’sün ki görecek davan var cihanda. Susarsan soracak elbet Tanrı; Ne yaptın o asil kanla?
.
────────────

⠀⠀⢠⡤⢺⣿⣿⣿⣿⣿⣶⣄
⠀⠀⠉⠀⠘⠛⠉⣽⣿⣿⣿⣿⡇
⠀⠀⠀⠀⠀⠀⠀⢉⣿⣿⣿⣿⡗
⠀⢀⣀⡀⢀⣀⣤⣤⣽⣿⣼⣿⢇⡄
⠀⠀⠙⠗⢸⣿⠁⠈⠋⢨⣏⡉⣳
⠀⠀⠀⠀⢸⣿⡄⢠⣴⣿⣿⣿
⠀⠀⠀⠀⠉⣻⣿⣿⣿⣿⣿⡟⡀
⠀⠀⠀⠀⠐⠘⣿⣶⡿⠟⠁⣴⣿⣄
⠀⠀⠀⠀⠀⠘⠛⠉⣠⣴⣾⣿⣿⣿⡦
⠀⠀⢀⣴⣠⣄⠸⠿⣻⣿⣿⣿⣿⠏
⠀⣠⣿⣿⠟⠁
────────────
.
"Tranquila - ait Kullanıcı Resmi (Avatar)
Tamamen Forumdan Uzaklaştırıldı
Üyelik tarihi:
08/2017
Nereden:
Trabzon
Yaş:
2
Mesajlar:
1.998
Konular:
229
Ticaret:
(0) %
15-09-2018 09:26
#5
Elinize sağlık hocam
Leatrix - ait Kullanıcı Resmi (Avatar)
Üye
Üyelik tarihi:
08/2018
Nereden:
Kerkük
Yaş:
81
Mesajlar:
2.239
Konular:
237
Teşekkür (Etti):
380
Teşekkür (Aldı):
464
Ticaret:
(0) %
15-09-2018 14:51
#6
Eline Sağlık
--------------------- .xxʅ ☨ Tҽαɱ , Rҽɠιʂƚɾαƚισɳ Oϝϝιƈҽɾ
Fearcon - ait Kullanıcı Resmi (Avatar)
Üye
Üyelik tarihi:
09/2018
Nereden:
bhappy
Mesajlar:
102
Konular:
18
Teşekkür (Etti):
0
Teşekkür (Aldı):
12
Ticaret:
(0) %
15-09-2018 14:52
#7
Eline sağlık.
---------------------
Kod:
Fear Gang
Delphoi - ait Kullanıcı Resmi (Avatar)
Üye
Üyelik tarihi:
12/2017
Nereden:
KKTC
Mesajlar:
641
Konular:
17
Teşekkür (Etti):
24
Teşekkür (Aldı):
44
Ticaret:
(0) %
15-09-2018 15:00
#8
Anlatım güzel eline sağlık hocam
"Tranquila - ait Kullanıcı Resmi (Avatar)
Tamamen Forumdan Uzaklaştırıldı
Üyelik tarihi:
08/2017
Nereden:
Trabzon
Yaş:
2
Mesajlar:
1.998
Konular:
229
Ticaret:
(0) %
15-09-2018 16:37
#9
Alıntı:
starktom´isimli üyeden Alıntı Mesajı göster
Teşekkür ederim.



Başka bir proje üzerinde çalışıyordum form üçe kadar doluydu dördü açtım bende



Teşekkür ederim.



Teşekkürler



Teşekkür ederim



Teşekkürler



Sağolun



Teşekkür ederim.



Teşekkürler.
stark knki bu 3. teşekkürün ben çok sevdiğinin farkındayım
'starktom - ait Kullanıcı Resmi (Avatar)
Üye
Üyelik tarihi:
12/2017
Nereden:
Nereye
Mesajlar:
1.739
Konular:
132
Teşekkür (Etti):
470
Teşekkür (Aldı):
420
Ticaret:
(0) %
15-09-2018 16:48
#10
Alıntı:
Ernoylmz´isimli üyeden Alıntı Mesajı göster
stark knki bu 3. teşekkürün ben çok sevdiğinin farkındayım
Post kasımı olmasın diye önceki yorumumu silip yenisine ekliyorum.

Bookmarks


« Önceki Konu | Sonraki Konu »
Seçenekler