در خواست چند کد از اساتید

دوستان لطفا اگه کد های زیر رو دارید بزارید ( خود کد رو بزارید )
اگه امکان داره کد ها رو در فایل های txt بزارید برای اپلود هم میتونید از 4shar.ir استفاده کنید
1- ظاهر شدن و مخفی شدن تدریجی برنامه موقع شروع و خروج
2- جلوگیری از بستن پروسه برنماه در ویندور تسک منیجر
3- اجرای برنامه در استارت اپ
4- جلوگیری از خاموش یا ری استارت یا لوگ اف سیستم ( بدون توابع ای پی ای )
ممنون میشم

کسی نیست که به من یاری برسونه

1-opacity فرم رو برابر 0 قرار دهيد

برای load

کد:

---

    Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick
        Me.Opacity += 10 / 100
        If Me.Opacity >= 100 Then Timer1.Stop()
    End Sub

---

برای Close

کد:

---

    Private Sub Timer2_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer2.Tick
        Me.Opacity -= 10 / 100
        If Me.Opacity >= 0 Then Timer2.Stop()
    End Sub

---

3-
'قرار دادن برنامه
My.Computer.Registry.SetValue("HKEY_CURRENT_USER\S oftware\Microsoft\Windows\CurrentVersion\Run", My.Application.Info.ProductName, Application.ExecutablePath)
'برداشتن برنامه از startup

Try
Using key As RegistryKey = My.Computer.Registry.LocalMachine.OpenSubKey("HKEY _CURRENT_USER\Software\Microsoft\Windows\CurrentVe rsion\Run\" & My.Application.Info.ProductName)
key.DeleteSubKey(My.Application.Info.ProductName, True)
End Using
Catch ex As Exception
End Try


4-

کد:

---

Call Shell("Shutdown /a") 'to Abort

---

يه چيز ديگه :
لطفاً حداقل برای هر سؤالت 4 دقيقه وقت بزار و تو اينترنت بگرد اگه گير نيوردی مطرح کن