エントリポイント作成のリンク

http://dobon.net/vb/dotnet/programing/makeentrypoint.html
http://dobon.net/vb/dotnet/programing/startupobject.html

走らせ方
http://blog.livedoor.jp/akf0/archives/51340773.html

宣言の範囲

　 適用範囲 寿命 宣言できる場所
Public すべて クラスが消滅するまで クラス直下
Protected Friend プロジェクト内・派生クラス内 クラスが消滅するまで クラス直下
Protected 派生クラス内 クラスが消滅するまで クラス直下
Friend プロジェクト内 クラスが消滅するまで クラス直下
Private 宣言したクラス内 クラスが消滅するまで クラス直下
クラス(構造体)直下のDim 宣言したクラス内 クラスが消滅するまで クラス直下
プロシージャ内のDim プロシージャ内 プロシージャが実行されている間 プロシージャ内
プロシージャ内のStatic プロシージャ内 クラスが消滅するまで プロシージャ内
ブロック内のDim ブロック内 ブロックを実行されている間 ブロック内
ブロック内のStatic ブロック内 クラスが消滅するまで ブロック内
クラス直下のShared(単体) 宣言したクラス内 不死 クラス直下
構造体直下のShared(単体) すべて 不死 構造体直下

md5変換

    Public Function get_md5string(ByVal base)
        Dim str As Byte() = System.Text.Encoding.ASCII.GetBytes(base)
        Dim md5 As New System.Security.Cryptography.MD5CryptoServiceProvider()
        Dim hash As Byte() = md5.ComputeHash(str)

        'hexa変換
        Dim res As String = BitConverter.ToString(hash).ToLower.Replace("-", "")

        Return res
    End Function

カタカナチェック

If Regex.IsMatch(TextBox1.Text, "^[ア-ン]*$") = FALSE Then 
MessageBox.Show("カタカナじゃない") 
End If

comboboxをdatasetでなんとかする

'connect to db
Dim db As MySqlConnection = db_connect()
Dim adp As New MySqlDataAdapter()
adp.SelectCommand = New MySqlCommand(SQL_STRING, db)
Dim ds As DataSet = New DataSet

adp.Fill(ds)

mem_id.DataSource = ds.Tables(0) 'set table, not item
mem_id.ValueMember = "id"
mem_id.DisplayMember = "name"

'access to value
val = combobox.SelectedValue