丹顶鹤的特点:VB如何得到文件的后缀名

来源:百度文库 编辑:杭州交通信息网 时间:2024/04/23 17:23:14
说详细点偶是菜鸟,谢谢!~~
最好给个例子

比如文件名为c:\windows\logo.gif
Private Sub Command1_Click()
a = "c:\windows\logo.gif"
MsgBox Right(a, 4) '截取后4个字符
End Sub

还有另外的办法
Private Sub Command1_Click()
a = "c:\windows\logo.gif"
MsgBox mid(a,instr(1,a,"."),len(a)) '判断.的位置,然后在截取
End Sub

先用DIR函数到到文件名
然后用字符串函数取得“.”以后的字符!
那久没有用VB了,我的机子上也没有装!只能给一个思路,你自己做吧!