实现让每句话的头一个字母都大写
2003-02-25 10:25:48 来源:WEB开发网核心提示:<%dim txtFnametxtFName = "steve schofield"txtFName = UCase(Left(txtFName,1)) & Mid(txtFName,2)response.write txtFname%> mynewvar = myfunc(txtFna
<%
dim txtFname
txtFName = "steve schofield"
txtFName = UCase(Left(txtFName,1)) & Mid(txtFName,2)
response.write txtFname
%>
mynewvar = myfunc(txtFname)
' 调用函数
Function syntax
function myfunc(a)
myfunc = ucase(left(a,1)) & lcase(mid(a,2))
end function
[]
更多精彩
赞助商链接