易语言 如何取路径中的文件名

解决这个问题的方法如下：

1、新建工程文件，运行“易语言”主程序，进入“新建工程”文件对话框，选择“Windows窗口程序”然后点击“确定”按钮，进入“Windows窗口程序”设计界面。

2、在已创建好的“Windows窗口”上，绘制标签组件、编辑框组件、拖放对象及按钮组件各一个，调整相关组件的位置和大小，以协调窗口。

3、设置各组件的属性值，比如：窗口标题，标签标题...并规范命名各组件的名称，以方便后续的编程工作，加快程序代码的编写速度和降低开发过程中的错误率。

4、进入代码编写阶段，首先，注册一下“拖放对象”，然后将“拖放对象”的“得到文件”属性设置为真，为“拖放对象”的“得到文件”子程序编写代码：

5、为“按钮组件”的“被单击”事件子程序编写代码，代码的功能实现，取出文件名并显示在文件名编辑框中。

6、最后进入程序调试阶段，检验劳动成果了。猛戳“F5”键，运行程序，将测试文件拖拽到程序文件路径编辑框中，查看文件名编辑框中的结果。

楼上的比我的好，建议你多学习一下字符串截取函数，right left mid nstr
Text1是文件路径 Text2是提取的文件名
我写的代码如下：
Private Sub Command1_Click()
Dim i As Integer, n As Integer
For i = 1 To Len(Text1)
If Mid(Text1, i, 1) = "\" Then n = i
Next
Text2 = Right(Text1, Len(Text1) - n)
End Sub

文件名 ＝ 取文本右边 (路径, 取文本长度 (路径) － 倒找文本 (路径, “\”, , 假))

楼上几位够费劲的，只需要一行代码：
Text2 = CreateObject("Scripting.FileSystemObject").GetBaseName(Text1)

dim a () as string
a=split(text1.text,"\")
a=split(a(ubound(a)),".")
text2.text=a(ubound(a)-1)