å¯ä½¿ç¨Splitå½æ°æ¥å®ç°æªåè·¯å¾æåä¸ä¸ª"a"åçå符ã
Splitå½æ°ï¼è¿åä¸ä¸ªä¸æ ä»é¶å¼å§çä¸ç»´æ°ç»ï¼å®å
å«æå®æ°ç®çåå符串ã
å
·ä½ä»£ç å¦ä¸ï¼
Private Sub Form_Click()
Dim ljStr As String
ljStr = "C:\Program Files\Microsoft Visual Studio\VB98\ado"
Debug.Print Split(ljStr, "\")(UBound(Split(ljStr, "\")))
End Sub
温馨提示:答案为网友推荐,仅供参考