function vbreplace(tmpStr,scrStr,reStr)
	vbreplace=replace(tmpStr,scrStr,reStr)
end function
function vbleft(tmpStr,tmpNum)
	vbleft=left(tmpStr,tmpNum)
end function
function vbright(tmpStr,tmpNum)
	vbright=right(tmpStr,tmpNum)
end function
function vbtrim(tmpStr)
	vbtrim=trim(tmpStr)
end function