变量abc as string,已经知道abc="<html><body>你好!</body></html>",请教怎么把“你好”两个字取出来? 最好用webbrowser控件。谢谢先! 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 Dim abc As StringDim nStart As LongDim nEnd As Longabc = "<html><body>你好!</body></html>"nStart = InStr(1, abc, "<body>") + 6nEnd = InStr(nStart, abc, "/body") - 1MsgBox Mid(abc, nStart, nEnd - nStart) abc = webbroser1.document.all("body").valuemsgbox "abc",vbinformation ,"" 有没有xd做vba工作啊??具体的工作内容是什么啊? 请教:打包时丢失.INI文件内容,怎么回事啊? 请问大家一个图形识别的问题? 求助,在线等待! 那里有这样的资料下载呢? 软件通过审核,大家有兴趣的话帮忙看看,提点意见! 如何将CAD2000的文件保存在数据库中?决对难题???? nik_Amis(Azrael)请进领分 reposition在事件中起的是什么作用? 关于Line控件使用的一个问题? 关于printer打印单据的问题?在线等待! 如何在VB生成的可执行文件中删除一个菜单项?
Dim nStart As Long
Dim nEnd As Longabc = "<html><body>你好!</body></html>"nStart = InStr(1, abc, "<body>") + 6
nEnd = InStr(nStart, abc, "/body") - 1MsgBox Mid(abc, nStart, nEnd - nStart)