汉口万松园美食:在VB中如何 获得文件的扩展名(急)
来源:百度文库 编辑:高校问答 时间:2024/05/19 23:17:23
函数(文件地址) 返回文件扩展名
如a=f(c:\boot.ini)
返回a=ini
如a=f(c:\boot.ini)
返回a=ini
function f(str)
dim fn
fn=split(str,".")
f=fn(ubound(fn))
end function
function f(str)
dim fn
fn=split(str,".")
f=fn(ubound(fn))
end function