软件介绍:Private Sub Command1_Click() Dim ljStr As String ljStr = "C:\Program ...
Private Sub Command1_Click()
Dim ljStr As String
ljStr = "C:\Program Files\Microsoft Visual Studio\VB98\ado.jpg"
Print Split(ljStr, "\")(UBound(Split(ljStr, "\")))
End Sub