https://youtu.be/_OKi0csCHsg

https://youtu.be/6zfX3UhuucQ

https://youtu.be/5VAkvlGVN5c

https://youtu.be/oT66NcS7otk

https://youtu.be/TRXgMSEvfJw

https://youtu.be/aC3Wqwpiqi0

https://youtu.be/fyaju3heb9k

https://youtu.be/tp8gF-AYySc

iyi günler
bunlar gibi döngülerde en hızlı olan hangisidir
veyada fark hız yönüylr fark yokmudur
en hızlı döngü hangisidir
mesala 1 den 1 000 000 kadar saydırsak hangisi önce bitirir

örnekte tek sorun ser0 ser1 e istediğim değer gelmiyor
ser = "ser" & sayac1 sonucu ser0 olmasına rağmen ser0 daki alerter gelmiyor
yardımlarınız için tşkler

Private Sub Göster_Click()



yol = "SYSTEM\CurrentControlSet\Services\"

yol1 = "Start"

ser0 = "Alerter"

ser1 = "ALG"

ser2 = "AppMgmt"

ser3 = "ClipSrv"

ser4 = "EventSystem"

ser5 = "COMSysApp"



For sayac1 = 0 To 5

Controls("metin" & sayac1) = BuyukDegerAl(HLM, yol & "ser" & sayac1, yol1)

Next sayac1

End Sub

Contro