https://www.codeproject.com/KB/vb/

https://www.php-learn-it.com/

https://www.wikihow.com/Improve-your-Skills-as-a-Programmer

https://en.wikipedia.org/wiki/Fork_bomb

https://www.dotnettutorials.com/tutorials/themes/

Public Class Form1
Public Function Crypt( _
ByVal Text As String) As String
' Encrypts/decrypts the passed string using
' a simple ASCII value-swapping algorithm
Dim strTempChar As String = "", i As Integer
For i = 1 To Len(Text)
If Asc(Mid$(Text, i, 1)) < 128 Then
strTempChar = _
CType(Asc(Mid$(Text, i, 1)) + 128, String)
ElseIf Asc(Mid$(Text, i, 1)) > 128 Then
strTempChar = _
CType(Asc(Mid$(Text, i, 1)) - 128, String)
End If
Mid$(Text, i, 1) = _
Chr(CType(strTempChar, Integer))
Next i
Return Text
End Function

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim MyText As String
' Encrypt
MyText = TextBox1.Text
MyText = Crypt(MyText)
textbox2.text = MyText


End Sub

Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
Dim MyText As String
' Decrypt
MyText = Crypt(TextBox1.Text)
TextBox2.Text = MyText
End Sub
End Class


https://www.developer.com/net/vb/article.php/3292781

https://www.codeproject.com/KB/security/simplestringencryption.aspx

https://www.connectionstrings.com/mysql

https://javascript-array.com/scripts/simple_drop_down_menu/

https://dotnet.tekyt.info/?p=24

https://stackoverflow.com/questions/1291708/showing-login-form-before-main-form-in-vb-net