作业帮 > 综合 > 作业

大家帮我看看这个函数啥意思啊

来源：学生作业帮 编辑：百度作业网作业帮 分类：综合作业 时间：2024/05/17 03:51:06
大家帮我看看这个函数啥意思啊
'自定义format函数
Private Function FormatStr(SourceStr As String,FormatString As String) As String
Dim i As Long
Dim tempstr As String
Dim iLen As Long
Dim FormatLen As Long
Dim DecLen As Long
FormatLen = Len(FormatString)
iLen = Len(SourceStr)
If FormatLen >= iLen Then
DecLen = FormatLen - iLen
tempstr = Left(FormatString,DecLen) & SourceStr
Else
tempstr = Left(SourceStr,FormatLen)
End If
FormatStr = tempstr
End Function
大家帮我看看这个函数啥意思啊
就是将字符串长度与一标准字符串长度比较,
如果字串长度比标准的长,则保留到标准的长度即可；
如时字串长度比标准的短,则在其之前添加标准字串的前几位补足同样的长度.
大家帮我看看这个函数啥意思啊 大家帮我看看这个函数的定义域是什么, 大家帮我看看这个玻璃里面是啥材料 大家帮我看看这个字念啥? 大家帮我看看这个语法问题 电子电路,大家帮我看看这个? 大家帮我看看这个英语句子.. 大家帮我看看这个成语是 大家帮我看看这个数学应用题 大家帮我看看这个英文名 大家帮我看看这个句型. 大家帮我看看这个句子对不对