*Sitemize Üye Olunca Elinize Ne Geçer?

<--- 1. Üye Olarak Linkleri Görebilirsiniz... --->

<--- 2. İstediğiniz Kadar Paylaşım Yapabilirsiniz... --->

<--- 3. Güzel Bir Forum Hayatı Yaşayabilirsiniz... --->


Join the forum, it's quick and easy


*Sitemize Üye Olunca Elinize Ne Geçer?

<--- 1. Üye Olarak Linkleri Görebilirsiniz... --->

<--- 2. İstediğiniz Kadar Paylaşım Yapabilirsiniz... --->

<--- 3. Güzel Bir Forum Hayatı Yaşayabilirsiniz... --->

Would you like to react to this message? Create an account in a few clicks or log in to continue.

● En Güncel Paylaşım Platformu ●

---Misafir--- Hos Geldiniz Daha iyi Bir Hizmet İçin Üye olunuz.ÜyeLer Link GörebiLir

    Vb Kod Windows Yeniden Başlat

    MnyTirith
    MnyTirith
    ● Admin ●
    ● Admin ●


    <b>Doğum tarihi</b> Doğum tarihi : 20/06/90

    Vb Kod Windows Yeniden Başlat Empty Vb Kod Windows Yeniden Başlat

    Mesaj tarafından MnyTirith Cuma Mart 12, 2010 9:47 pm

    Private Declare Function ExitWindowsEx Lib "User32" (ByVal uFlags As Long, _
    ByVal dwReserved As Long) As Long

    Private Sub Command1_Click()
    Dim c
    c = MsgBox("Windows yeniden başlatmak istediğinize eminmisiniz", vbYesNo, "ReStart")
    If c = vbYes Then c = ExitWindowsEx(42, 0)

    End Sub

      Forum Saati Paz Mayıs 19, 2024 11:32 am