VB2005 数字、アルファベット、一部記号を半角変換
カタカナはそのままで、数字、アルファベット、一部記号を半角変換。
Public Function abc123ToHankaku(ByVal s As String) As String
Dim re As Regex = New Regex("[０-９Ａ-Ｚａ-ｚ（）：，－ ]+")
Dim output As String = re.Replace(s, AddressOf myReplacer)
Return output
End Function
Private Function myReplacer(ByVal m As Match) As String
Return Strings.StrConv(m.Value, VbStrConv.Narrow, 0)
End Function
パソコンや開発、Linuxやデータベースのことなど
VB2005 全角を半角に変換
Dim str As String
str = StrConv("アイウＡＢＣ", VbStrConv.Narrow)
MsgBox(str)
結果はｱｲｳABCになる。
Dim str As String
str = StrConv("アイウＡＢＣ", VbStrConv.Narrow)
MsgBox(str)
結果はｱｲｳABCになる。
VB2005のフォームイベント推移
Showメソッドを実行するとLoad発生。
表示直前に処理が必要な場合はLoadイベントに記述。
Activateイベントも発生するが、このイベントは2つのフォームが表示されているときに片方のフォームがアクティブになったとき発生するのでShow以外でも発生する可能性あり。
Activateイベントにはアクティブになる時に必要な処理を記述
表示直後にShownイベントも発生
Showメソッドを実行するとLoad発生。
表示直前に処理が必要な場合はLoadイベントに記述。
Activateイベントも発生するが、このイベントは2つのフォームが表示されているときに片方のフォームがアクティブになったとき発生するのでShow以外でも発生する可能性あり。
Activateイベントにはアクティブになる時に必要な処理を記述
表示直後にShownイベントも発生