字符串:
aa=科计科目/一级科目/二级科目/..../银行存款如何将:银行存款:取出来?中间的级别未定???

解决方案 »

  1.   

    Dim sTmp() as string
    sTmp = split(aa,"/")debug.print sTmp(ubound(sTmp)) ' this is want you want
      

  2.   

    ÒøÐдæ¿î = Mid(aa, InStrRev(aa, "/") + 1)
      

  3.   

    银行存款 = Mid(aa, InStrRev(aa, "/") + 1)
      

  4.   

    Private Sub Command1_Click()
        Dim aa As String
        aa = "科计科目/一级科目/二级科目/..../银行存款"
        
        MsgBox Right(aa, 4)
    End SubPrivate Sub Command2_Click()
        Dim aa As String
        aa = "科计科目/一级科目/二级科目/三级科目/..../银行存款"
        
        MsgBox Right(aa, 4)
    End Sub