VB取超链接 上传者：myibm3006 2020-05-14 16:24:15上传 TXT文件 362B 热度 49次 DimvDoc,vTag DimiAsInteger SetvDoc=WebBrowser1.Document List1.Clear Fori=0TovDoc.All.length-1 IfUCase(vDoc.All(i).tagName)="A"Then SetvTag=vDoc.All(i) List1.AddItemvTag.innertex 下载地址 用户评论 更多下载 下载地址 立即下载 用户评论 发表评论
