首页 有道高中单词bin (11页)

有道高中单词bin (11页)

举报
开通vip

有道高中单词bin (11页)有道高中单词bin有道高中单词bin篇一:有道单词本'1.将以下程式码复制到ExcelVBA模组(Module)中''2.在Excel工作表中AColumn输入要批量翻译的生词列表''3.若要转出有道xml格式单词库文件,请执行xmlVocabulary,汇出的档案位置为Excel活页簿位置,档案名称为"工作表名称.xml"''4.若要批量翻译直接写入Excel档,请执行xlsmVocabulary''5.先以少量生词列表测...

有道高中单词bin (11页)
有道高中单词bin有道高中单词bin篇一:有道单词本'1.将以下程式码复制到ExcelVBA模组(Module)中''2.在Excel工作表中AColumn输入要批量翻译的生词列表''3.若要转出有道xml格式单词库文件,请执行xmlVocabulary,汇出的档案位置为Excel活页簿位置,档案名称为"工作表名称.xml"''4.若要批量翻译直接写入Excel档,请执行xlsmVocabulary''5.先以少量生词列表测试翻译速度,我自己1000个字大概花7~8分钟翻译''6.若要现成的Excel档,请网搜"有道单词本.xlsm"PrivateTypeCharacterwordAsStringtransAsStringphoneticAsStringtagsAsString'progressAsIntegerEndType'汇出有道xml格式单词库文件SubxmlVocabulary()DimnewCharAsCharacterDimRAsRangeDimRowAsRangeDimstrOutputAsStringDimarrBytes()AsBytenewChar.tags=ActiveSheet.nameActiveSheet.Names.Addname:="NewWord",RefersTo:="=OFFSET($A$1,0,0,COUNTA($A:$A))"SetR=ActiveSheet.Names("NewWord").RefersToRangestrOutput="<wordbook>"ForEachRowInR.RowsnewChar.word=Trim(Row(1))CallsearchWord(newChar.word,newChar.trans,newChar.phonetic)strOutput=strOutput&vbCrLf&"<item>"strOutput=strOutput&vbCrLf&"<word>"&newChar.word&"</word>"strOutput=strOutput&vbCrLf&"<trans><![CDATA["&newChar.trans&"]]></trans>"strOutput=strOutput&vbCrLf&"<phonetic><![CDATA["&newChar.phonetic&"]]></phonetic>"strOutput=strOutput&vbCrLf&"<tags>"&newChar.tags&"</tags>"strOutput=strOutput&vbCrLf&"<progress>1</progress>"strOutput=strOutput&vbCrLf&"</item>"NextRowstrOutput=strOutput&vbCrLf&"</wordbook>"arrBytes=ChrW(&HFEFF)&strOutput'写入unicode文字码OpenApplication.ActiveWorkbook.Path&"\"&newChar.tags&".xml"ForBinaryAs#1'立xml格式档案Put#1,,arrBytesClose#1EndSub'单词音译写入Excel档SubxlsmVocabulary()DimnewCharAsCharacterDimRAsRangeDimRowAsRangeDimrrAsIntegerstrTags=ActiveSheet.nameActiveSheet.Names.Addname:="NewWord",RefersTo:="=OFFSET($A$1,0,0,COUNTA($A:$A))"SetR=ActiveSheet.Names("NewWord").RefersToRangerr=0ForEachRowInR.Rowsrr=rr+1newChar.word=Trim(Row(1))建CallsearchWord(newChar.word,newChar.trans,newChar.phonetic)Worksheets(strTags).Cells(rr,2).Value=newChar.phonetic'撷取音标Worksheets(strTags).Cells(rr,3).Value=newChar.trans'撷取翻译NextRowEndSubSubsearchWord(tmpWordAsString,tmpTransAsString,tmpPhoneticAsString)'/search?q=单词&keyfrom=dict.indexDimXHAsObjectDims()AsStringDimstr_tmpAsStringDimstr_baseAsStringtmpTrans=""tmpPhonetic=""'开启网页SetXH=CreateObject("Microsoft.XMLHTTP")OnErrorResumeNextXH.Open"get","/search?q="&tmpWord&"&keyfrom=dict.index",FalseXH.sendOnErrorResumeNextstr_base=XH.responseTextXH.CloseSetXH=Nothingstr_base=Split(Split(XH.responseText,"<divid=""webTrans""class=""trans-wrappertrans-tab"">")(0),"<spanclass=""keyword"">")(1)'撷取音标IfUBound(Split(str_base,"<spanclass=""pronounce"">美"))=1Then'美式音标tmpPhonetic=Split((Split(Split(str_base,"<spanclass=""pronounce"">美")(1),"<spanclass=""phonetic"">")(1)),"</span>")(0)OnErrorResumeNextElsetmpPhonetic=Split((Split(str_base,"<spanclass=""phonetic"">")(1)),"</span>")(0)OnErrorResumeNextEndIf'撷取中文翻译str_tmp=Split((Split(str_base,"<divclass=""trans-container"">")(1)),"</div>")(0)str_tmp=Split((Split(str_tmp,"<ul>")(1)),"</ul>")(0)s=Split(str_tmp,"<li>")tmpTrans=Split(s(LBound(s)+1),"</li")(0)Fori=LBound(s)+2ToUBound(s)tmpTrans=tmpTrans&Chr(10)&Split(s(i),"</li")(0)NextEndSub篇二:考研单词本可导入有道词典2015年<wordbook><item><word>abandon</word><trans><![CDATA[n.狂热;放任vt.遗弃;放弃]]></trans><phonetic><![CDATA[[?'b?nd?n]]]></phonetic><tags>考研单词</tags><progress>2</progress></item><item><word>abide</word><trans><![CDATA[vi.持续;忍受;停留vt.忍受,容忍;停留]]></trans><phonetic><![CDATA[[?'baid]]]></phonetic><tags>考研单词</tags><progress>1</progress></item><item><word>ability</word><trans><![CDATA[n.能力,能耐;才能]]></trans><phonetic><![CDATA[[?'biliti]]]></phonetic><tags>考研单词</tags><progress>2</progress></item><item><word>abnormal</word><trans><![CDATA[adj.反常的,不规则的;变态的]]></trans><phonetic><![CDATA[[?b'n?:m?l]]]></phonetic><tags>考研单词</tags><progress>1</progress></item><item><word>aboard</word><trans><![CDATA[prep.在…上adv.在飞机上;[船]在船上;在火车上]]></trans><phonetic><![CDATA[[?'b?:d]]]></phonetic><tags>考研单词</tags><progress>1</progress></item><item><word>abolish</word><trans><![CDATA[vt.废除,废止;取消,革除]]></trans><phonetic><![CDATA[[?'b?li?]]]></phonetic><tags>考研单词</tags><progress>1</progress></item><item><word>abroad</word><trans><![CDATA[n.海外;异国adj.往国外的adv.在国外;到海外]]></trans><phonetic><![CDATA[[?'br?:d]]]></phonetic><tags>考研单词</tags><progress>2</progress></item><item><word>abrupt</word><trans><![CDATA[adj.生硬的;突然的;唐突的;陡峭的]]></trans><phonetic><![CDATA[[?'br?pt]]]></phonetic><tags>考研单词</tags><progress>2</progress></item><item><word>absence</word><trans><![CDATA[n.没有;缺乏;缺席;不注意]]></trans><phonetic><![CDATA[['?bs?ns]]]></phonetic><tags>考研单词</tags><progress>2</progress></item><item><word>absent</word><trans><![CDATA[adj.缺席的;缺少的;心不在焉的;茫然的vt.使缺席]]></trans><phonetic><![CDATA[['?bs?nt,?b'sent]]]></phonetic><tags>考研单词</tags><progress>1</progress></item><item><word>absolute</word><trans><![CDATA[n.绝对;绝对事物adj.绝对的;完全的;专制的]]></trans><phonetic><![CDATA[['?bs?lju:t,,?bs?'lju:t]]]></phonetic><tags>考研单词</tags><progress>1</progress></item><item><word>absorb</word><trans><![CDATA[vt.吸收;吸引;承受;理解;使…全神贯注]]></trans><phonetic><![CDATA[[?b's?:b,-'z?:b]]]></phonetic><tags>考研单词</tags><progress>1</progress></item><item><word>absorption</word><trans><![CDATA[n.吸收;全神贯注,专心致志]]></trans><phonetic><![CDATA[[?b's?:p??n]]]></phonetic><tags>考研单词</tags><progress>2</progress></item><item><word>abstract</word><trans><![CDATA[n.摘要;抽象;抽象的概念adj.抽象的;深奥的vt.摘要;提取;使……抽象化vi.做摘要;写梗概]]></trans><phonetic><![CDATA[['?bstr?kt,?b'str?kt]]]></phonetic><tags>考研单词</tags><progress>2</progress></item><item><word>absurd</word><trans><![CDATA[n.荒诞;荒诞作品adj.荒谬的;可笑的]]></trans><phonetic><![CDATA[[?b's?:d]]]></phonetic><tags>考研单词</tags><progress>1</progress></item><item><word>abundance</word><trans><![CDATA[n.充裕,丰富]]></trans><phonetic><![CDATA[[?'b?nd?ns]]]></phonetic><tags>考研单词</tags><progress>2</progress></item><item><word>abundant</word><trans><![CDATA[adj.丰富的;充裕的;盛产]]></trans><phonetic><![CDATA[[?'b?nd?nt]]]></phonetic><tags>考研单词</tags><progress>2</progress></item><item><word>abuse</word><trans><![CDATA[n.滥用;虐待;辱骂;弊端;恶习,陋习vt.滥用;虐待;辱骂]]></trans><phonetic><![CDATA[[?'bju:z,?'bju:s]]]></phonetic><tags>考研单词</tags><progress>2</progress></item><item><word>academic</word><trans><![CDATA[n.大学生,大学教师;学者adj.学术的;理论的;学院的]]></trans><phonetic><![CDATA[[,?k?'demik]]]></phonetic><tags>考研单词</tags><progress>2</progress></item><item><word>academy</word><trans><![CDATA[n.学院;研究院;学会;专科院校]]></trans><phonetic><![CDATA[[?'k?d?mi]]]></phonetic><tags>考研单词</tags><progress>2</progress></item><item><word>accelerate</word><trans><![CDATA[vt.使……加快;使……增速vi.加速;促进;增加]]></trans><phonetic><![CDATA[[?k'sel?reit]]]></phonetic><tags>考研单词</tags><progress>2</progress></item><item><word>acceleration</word><trans><![CDATA[n.加速,促进;[物]加速度]]></trans><phonetic><![CDATA[[?k,sel?'rei??n]]]></phonetic><tags>考研单词</tags><progress>2</progress></item><item><word>accent</word><trans><![CDATA[n.口音;重音;强调;特点;重音符号vt.强调;重读;带…口音讲话]]></trans><phonetic><![CDATA[['?ks?nt,?k'sent]]]></phonetic><tags>考研单词</tags><progress>2</progress></item><item><word>accept</word><trans><![CDATA[vi.承认;同意;承兑vt.接受;承认;承担;承兑;容纳]]></trans><phonetic><![CDATA[[?k'sept]]]></phonetic><tags>考研单词</tags><progress>2</progress></item><item><word>acceptable</word><trans><![CDATA[adj.可接受的;合意的;可忍受的]]></trans><phonetic><![CDATA[[?k'sept?bl]]]></phonetic><tags>考研单词</tags><progress>2</progress></item><item><word>acceptance</word><trans><![CDATA[n.接受;接纳;[金融]承兑;赞同]]></trans><phonetic><![CDATA[[?k'sept?ns]]]></phonetic><tags>考研单词</tags><progress>2</progress></item><item><word>access</word><trans><![CDATA[n.进入;使用权;通路vt.使用;存取;接近]]></trans><phonetic><![CDATA[['?kses,'?ks?s,?k'ses]]]></phonetic><tags>考研单词</tags><progress>1</progress></item><item><word>accessory</word><trans><![CDATA[n.配件;附件;[法]从犯adj.副的;同谋的;附属的]]></trans><phonetic><![CDATA[[?k'ses?ri]]]></phonetic><tags>考研单词</tags><progress>2</progress></item><item><word>accident</word><trans><![CDATA[n.事故;意外;[法]意外事件;机遇]]></trans><phonetic><![CDATA[['?ksid?nt]]]></phonetic><tags>考研单词</tags><progress>2</progress></item><item><word>accidental</word><trans><![CDATA[n.次要方面;非主要的特性;临时记号adj.意外的;偶然的;附属的;临时记号的]]></trans><phonetic><![CDATA[[,?ksi'dent?l]]]></phonetic><tags>考研单词</tags><progress>2</progress></item><item><word>accommodate</word><trans><![CDATA[vi.适应;调解vt.容纳;使适应;供应;调解]]></trans><phonetic><![CDATA[[?'k?m?deit]]]></phonetic><tags>考研单词</tags><progress>1</progress></item><item><word>accompany</word><trans><![CDATA[vt.陪伴,伴随;伴奏vi.伴奏,伴唱]]></trans><phonetic><![CDATA[[?'k?mp?ni]]]></phonetic><tags>考研单词</tags><progress>2</progress></item><item><word>accomplish</word><trans><![CDATA[vt.完成;实现;达到]]></trans><phonetic><![CDATA[[?'k?mpli?,?'k?m-]]]></phonetic><tags>考研单词</tags><progress>1</progress></item><item><word>accordance</word><trans><![CDATA[n.一致;和谐]]></trans><phonetic><![CDATA[[?'k?:d?ns]]]></phonetic><tags>考研单词</tags><progress>1</progress></item><item><word>accordingly</word><trans><![CDATA[adv.因此,于是;相应地;照著]]></trans><phonetic><![CDATA[[?'k?:di?li]]]></phonetic><tags>考研单词</tags><progress>2</progress></item><item><word>account</word><trans><![CDATA[n.[会计]账户;解释;[会计]账目,账单;理由vt.认为;把…视为vi.解释;导致;报账]]></trans><phonetic><![CDATA[[?'kaunt]]]></phonetic><tags>考研单词</tags><progress>2</progress></item><item><word>accumulate</word><trans><![CDATA[vt.积攒vi.累积;积聚]]></trans><phonetic><![CDATA[[?'kju:mjuleit]]]></phonetic><tags>考研单词</tags><progress>1</progress></item><item><word>accuracy</word><trans><![CDATA[n.[数]精确度,准确性]]></trans><phonetic><![CDATA[['?kjur?si]]]></phonetic><tags>考研单词</tags><progress>1</progress></item><item><word>accurate</word><trans><![CDATA[adj.精确的]]></trans><phonetic><![CDATA[['?kjur?t]]]></phonetic><tags>考研单词</tags><progress>1</progress></item><item><word>accuse</word><trans><![CDATA[vt.控告,指控;谴责;归咎于vi.指责;控告]]></trans><phonetic><![CDATA[[?'kju:z]]]></phonetic><tags>考研单词</tags><progress>1</progress></item><item><word>accustom</word><trans><![CDATA[vt.使习惯于]]></trans><phonetic><![CDATA[[?'k?st?m]]]></phonetic><tags>考研单词</tags><progress>2</progress></item><item><word>accustomed</word><trans><![CDATA[v.使习惯于(accustom的过去分词)adj.习惯的;通常的;独有的]]></trans><phonetic><![CDATA[[?'k?st?md]]]></phonetic><tags>考研单词</tags><progress>1</progress></item><item><word>ache</word>篇三:有道词典单词本的设置方法有道词典单词本的设置方法1.分别在电脑上下载桌面版有道词典,在手机上下载有道词典客户端。建议均下载最新版本。2.在电脑上打开桌面版,点击主界面左上角的“登录”,根据提示注册网易通行证,用已注册的通行证进行登录。3.下载群共享中的bin文件,在单词本管理里导入上述bin文件。4.然后在手机客户端上用网易通行证登录,同步一下就ok了。重点单词就是课本上加黑的,非重点单词就是课本上没有加黑的p
本文档为【有道高中单词bin (11页)】,请使用软件OFFICE或WPS软件打开。作品中的文字与图均可以修改和编辑, 图片更改请在作品中右键图片并更换,文字修改请直接点击文字进行修改,也可以新增和删除文档中的内容。
该文档来自用户分享,如有侵权行为请发邮件ishare@vip.sina.com联系网站客服,我们会及时删除。
[版权声明] 本站所有资料为用户分享产生,若发现您的权利被侵害,请联系客服邮件isharekefu@iask.cn,我们尽快处理。
本作品所展示的图片、画像、字体、音乐的版权可能需版权方额外授权,请谨慎使用。
网站提供的党政主题相关内容(国旗、国徽、党徽..)目的在于配合国家政策宣传,仅限个人学习分享使用,禁止用于任何广告和商用目的。
下载需要: ¥16.9 已有0 人下载
最新资料
资料动态
专题动态
机构认证用户
万用文库
暂无简介~
格式:doc
大小:20KB
软件:Word
页数:0
分类:
上传时间:2020-06-29
浏览量:228