Like演算子のパターンマッチングを利用して、入力されたホームページアドレス(URL)の形式が正しいかどうかをチェックするサンプルFunctionプロシージャです。正しいかどうかの判断は、アドレスが「http://xxx.xxx」形式かどうかで行なっています。
サンプルプロシージャ:
Public Function ChkURL(strURL As String) As Boolean
'概要 ホームページアドレスの形式が正しいかチェックする
'引数 strURL : ホームページアドレス
'返値 正しい形式の場合はTrue、そうでない場合はFalse
ChkURL = (strURL Like "http://*.*")
End Function
実行例:
 |