StrPad 函数 FOR ASP
2018-09-06 13:11
阅读：493
Function strPad(strSource, destLength, padChar, L_or_R)
Dim srcLength
srcLength = Len(strSource)
If(srcLength >= destLength) Then
strPad = strSource
Else
If(L_or_R = 0) Then
strPad = String(destLength - srcLength, padChar) strSource
Else
strPad = strSource String(destLength - srcLength)
End If
End If
End Function
评论
亲，登录后才可以留言！