Új hozzászólás Aktív témák
-
Gh0sT
addikt
válasz
[HUN]Zolee
#475
üzenetére
Hi!
Tegnap még próbálkoztam, de nem mentem sokra az ablak megjelenítéssel. Működik, de valamiért feketéből kezd el megjelenni az ablak és nyeri el az eredeti színét.
A következőt csináltam:
Dim n As Integer
For n = 1 to 100
Me.Opacity = n/100
System.Threading.Thread.Sleep(5)
Next
Próbáltam megváltoztatni a lépésközt nagyobbra, de semmi eredmény.
Aztán próbaképp csináltam egy ilyet:
Dim n As Integer
For n = 1 to 100
Me.Opacity = n/100
MsgBox(n)
Next
Itt ugye mindig feldobta n értékét egy ablakban, de látszólag nem feketéről indult a megjelenés. Minden OK volt, csak az MsgBox-okra nem lett volna szükségem. Hol lehet a hiba?
Új hozzászólás Aktív témák
- Parkside szerszám kibeszélő
- Apple iPhone 17e – mágnesek ereje
- Tavaszi hardvernyitány
- Milyen házat vegyek?
- Gyúrósok ide!
- Tömeges leépítés az Epicnél: 2025 óta csökken a Fortnite aktivitása
- Fejhallgató erősítő és DAC topik
- Megérkezett a Samsung Galaxy A37 és Galaxy A57
- Milyen egeret válasszak?
- Kertészet, mezőgazdaság topik
- További aktív témák...
- HyperX Predator 2x8GB 3200mhz DDR4 ram CL 16 !!!! - RGB !!!!
- IdeaPad 3 15ARH05 15.6" FHD IPS Ryzen 5 4600H GTX 1650 16GB 512GB NVMe magyar vbill gar
- i7-8700K / ASUS Z370-E / GTX 1080 Ti komplett gép
- PNY GeForce RTX 4070 Ti SUPER 16GB XLR8 Gaming VERTO EPIC-X RGB
- Samsung Galaxy S25 eladó, független, garanciális (ses.hu, 2028 júniusig)
- Transcend 512GB M.2 SSD // 100% // Számla // Garancia //
- Apple iPhone 15 Pro Max 256 GB White Titanium 1 év Garancia Beszámítás Házhozszállítás
- Kuriózum: Ozark Trail (amerikai) fejlámpa 600 lumen
- Dell Latitude 5400 14" FHD IPS, i5 8365U, 8-16GB RAM, SSD, számla, 6 hó gar
- Samsung 870 QVO 8TB Sata 2.5 SSD
Állásajánlatok
Cég: Laptopműhely Bt.
Város: Budapest
