打印本文 打印本文  关闭窗口 关闭窗口
实现让每句话的头一个字母都大写
作者:采集员 文章来源:来源于网络 点击数: 更新时间:2005/9/10 13:48:49

<%

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



打印本文 打印本文  关闭窗口 关闭窗口