技术资料 > ASP技术 > 打印相关 : 把句子的第一个字母转化为大写

把句子的第一个字母转化为大写

March 25,2004

<%
dim txtFname
txtFName = "steve schofield"

txtFName = UCase(Left(txtFName,1)) & Mid(txtFName,2)

response.write txtFname
%>

To call the function:
mynewvar = myfunc(txtFname)

Function syntax
function myfunc(a)
myfunc = ucase(left(a,1)) & lcase(mid(a,2))
end function
%>