dim bytHtm() as byte,strTxt as string
open "c:\1.htm" for binary as #1
redim bytHtm(lof(1)
get #1,,bytHtm
close #1
strTxt=strconv(bytHtm,vbUnicode)
open "c:\1.htm" for binary as #1
redim bytHtm(lof(1)
get #1,,bytHtm
close #1
strTxt=strconv(bytHtm,vbUnicode)
解决方案 »
免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货