ö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

Merhaba,sevgili üstadlarım, başaramadığım bir konuda yardımlarınızı bekliyorum.Ekte gönderdiğim örnekte;
Form2 deki bir alanı Form1 de belirttiğim alanda görmek ve devamında kendi belirlediğim miktarın üzerine çıkınca çalışacak bir döngü kurmak istedim,maalesef yapamadım,şimdiden teşekkürler