よく使う組み込み関数

Array 関数

[動的に配列を作成]


Dim A
A = Array(10,20,20)

Dim B
B = Array("X","Y","Z")

[参考]


dim LB_SU1(),LB_SU2()
LB_LINES = 10
ReDim LB_SU1(SC_LINES):ReDim LB_SU2(SC_LINES)

InStr 関数

[文字列検索]


Public Function IsIe( )

	if InStr( Request.ServerVariables( "HTTP_USER_AGENT" ), "MSIE" ) <> 0 then
		IsIe = True
	else
		IsIe = False
	end if

End Function

IsArray 関数

[変数が配列かどうかを調べる]


if IsArray( MailArray ) then
	メール処理
end if

Replace 関数

[文字列に含まれる部分文字列をすべて置換]


---------------------------------------------------------------------------------
スペースを文字列全体から削除
---------------------------------------------------------------------------------

strTarget = Replace( strTarget, " ", "" )

Split 関数

[文字列を区切り文字で分解して配列を作成]


strTarget = Split( "A:B:C", ":" )

UBound 関数

[配列で指定した次元で使うことのできるインデックス番号の最大値を返す]


strTarget = Split( "A:B:C", ":" )
nMax = UBound( strTarget )

[nMax は 2 になります]

UCase 関数

[指定された文字列内のアルファベットの小文字を大文字に変換]


---------------------------------------------------------------------------------
比較したい文字列の中身に大文字、小文字が混ざっている場合
---------------------------------------------------------------------------------
if UCase( strTarget ) = "ADMIN" then
	処理
end if

部分文字列取得関数


1) Left     
2) Right
3) Mid

strTarget = Left( "AABBCC", 2 )
[strTarget は "AA"]

strTarget = Right( "AABBCC", 2 )
[strTarget は "CC"]

strTarget = Mid( "AABBCC", 3, 2 )
[strTarget は "BB"]