Public Function gf_AddQuotesToFN(ByVal strFileName As String) As String
If InStr(strFileName, " ") Or InStr(strFileName, ",") Then
gf_AddQuotesToFN = """" & strFileName & """"
Else
gf_AddQuotesToFN = strFileName
End If
End Function
If InStr(strFileName, " ") Or InStr(strFileName, ",") Then
gf_AddQuotesToFN = """" & strFileName & """"
Else
gf_AddQuotesToFN = strFileName
End If
End Function
解决方案 »
免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货