Hirdetés
- sziku69: Fűzzük össze a szavakat :)
- D1Rect: Nagy "hülyétkapokazapróktól" topik
- Luck Dragon: Asszociációs játék. :)
- Magga: PLEX: multimédia az egész lakásban
- sziku69: Szólánc.
- MasterDeeJay: Olcsó használt workstation építése. (Dell T5810, 18 mag, 64Gb ram)
- eBay-es kütyük kis pénzért
- ubyegon2: Airfryer XL XXL forrólevegős sütő gyakorlati tanácsok, ötletek, receptek
- Luck Dragon: Alza kuponok – aktuális kedvezmények, tippek és tapasztalatok (külön igényre)
- Gurulunk, WAZE?!
-
LOGOUT

Új hozzászólás Aktív témák
-
#10382336
törölt tag
Sziasztok!!!
Az alábbi Visual Basic kód lefordítva egy olyan alkalmazást
eredményez, amely percenként elindítja a "VALAMI" nevű
alkalmazást. Továbbfejlesztve hasonló dolgokra lehetne
képes, mint a Windows feladatütemezője.A kérdésem annyi lenne, hogy például ezt, vagy bármely más
Visual Basic programot hogy lehet úgy megcsinálni, hogy
a program ikonja a tálca jobb oldalán, az óra mellett legyen,
mint például a hangerő, a tűzfal, windows riasztások ikonjai.
Ha valaki tudja a választ, vagy ilyen tartalmú - elsősorban
Magyar nyelvű - linket, kérem írja meg.Előre is köszönöm!
Public Class Form1
Private konz As New Konzol
Private Sub Form1_FormClosing(ByVal sender As Object, _
ByVal e As System.Windows.Forms.FormClosingEventArgs) _
Handles Me.FormClosing
konz.állj()
End Sub
Private Sub Form1_Load(ByVal sender As System.Object, _
ByVal e As System.EventArgs) Handles MyBase.Load
konz.start()
End Sub
End ClassPublic Class Konzol
Private esemeny As New System.Threading.AutoResetEvent(False)
Private megszakitas As System.Threading.TimerCallback = _
AddressOf végrehajtás
Private idozito As System.Threading.Timer
Private szamlalo As Integer
Sub start()
szamlalo = 0
idozito = New System.Threading.Timer(megszakitas, esemeny, 0, 1000)
End Sub
Sub állj()
idozito.Dispose()
End Sub
Sub végrehajtás(ByVal stateInfo As Object)
Dim autoEvent As System.Threading.AutoResetEvent = _
DirectCast(stateInfo, System.Threading.AutoResetEvent)
szamlalo += 1
If szamlalo = 60 Then
Shell(VALAMI)
szamlalo = 0
End If
End Sub
End Class
Új hozzászólás Aktív témák
● olvasd el a téma összefoglalót!
- Gitáros topic
- sziku69: Fűzzük össze a szavakat :)
- Rövid időre leállhat a 8 GB-os GeForce RTX 5060 Ti gyártása
- E-roller topik
- D1Rect: Nagy "hülyétkapokazapróktól" topik
- Gyúrósok ide!
- Sorozatok
- Egy androidlánnyal tenné kelendőbbé a GeForce-okat az NVIDIA
- Okos otthon - Home Assistant, openHAB és más nyílt rendszerek
- Milyen TV-t vegyek?
- További aktív témák...
- Lenovo ThinkPad P15V Gen2 // i7-11800H // 32GB RAM // 512GB SSD // T1200
- Lenovo ThinkPad T16 Gen2 16" FHD+ IPS i5-1345U 16GB 256GB NVMe SSD gar
- BIOSTAR RX 6900 XT 16GB GDDR6 EXTREME GAMING - Eladó!
- ZOTAC RTX 3070 Ti 8GB GDDR6X AMP HOLOBLACK Eladó!
- ThinkPad T14 Gen4 14" FHD+ IPS i7-1365U 16GB 512GB NVMe gar
- Logitech MX Master 3S for MAC
- Apple MacBook Air M3 15 256GB,Újszerű,Dobozaval,24 hónap garanciával
- ÁRGARANCIA!Épített KomPhone Ryzen 7 7700X 32/64GB RAM RTX 5070 Ti 16GB GAMER PC termékbeszámítással
- 27% - GIGABYTE RX 7900 XTX GAMING OC 24GB GDDR6 Videokártya! BeszámítOK
- Behringer B-CONTROL BCF2000 USB/MIDI kontroller
Állásajánlatok
Cég: Laptopműhely Bt.
Város: Budapest

