求助：UBound和Split的问题

officer_mk · 发表于 2010-3-9 20:20:54

调用示例：Me.Text1= mySplitText("CIGT - CIMC TF-Carol-Bond")
需要返回： Bond
Function mySplitText(strMyText As String) As String
Dim i As Integer
i = UBound(Split(strMyText, "-", -1), 1)
mySplitText = Split(strMyText, "-", -1)(i - 1)
End Function
按以上返回Carol，到底是哪里的问题？？

officer_mk · 发表于 2010-3-9 20:24:53

自己顶

officer_mk · 发表于 2010-3-9 20:42:13

呵呵，不用了，找到了，嘿嘿(i - 1)变（i）

帐号		自动登录	找回密码
密码			注册

群介绍
Access培训群 (792054000)
Access免费培训2群 (163530137)
Access免费培训群 (833510950)
Access免费培训群2 (792054000)
Access交流总群 (5004108)

主题相关群

地区相关群[您还没设置居住地]

[模块/函数] 求助：UBound和Split的问题

群介绍
主题无相 (随机显示版	同地区群块其他地区)