最新颈椎病护理查房24786精品课件ppt

颈椎病护理查房24786一年级经典诵读《三字经》一年级经典诵读《三字经》PAGE/NUMPAGES一年级经典诵读《三字经》三字经全文rénzhīchū???xìngběnshàn人???之??初,??性??本??善。xìngxiāngjìn???xíxiāngyuǎn性???相??近,??习??相??远。?gǒu??bújiào???xìngnǎiqiān?苟???不??教,??性??乃??迁。jiàozhīdào???guìyǐzhuān?教???之??道,??贵??以??专。?xī??mèngmǔ????zélínchǔ?昔???孟??母，择??邻??处。?zǐ???bùxué????duànjīzhù?子???不??学，断??机??杼。?dòuyānshān???yǒuyìfāng?窦???燕??山，有??义??方。?jiàowǔ??zǐ????míngjùyáng?教???五??子，名??俱??扬。yǎngbújiào???fùzhīguò?养???不??教，父??之??过。?jiàobùyán???shīzhīduò?教???不??严，师??之??惰。?zǐ???bùxué???fēisuǒ??yí?子???不??学，非??所??宜。?yòu??bùxué???lǎo??héwéi?幼???不??学，老??何??为。?yù???bùzhuó???bùchéngqì?玉???不??琢，不??成??器。?rén??bù??xué???bù??zhīyì?人???不??学，不??知??义。?wèirén??zǐ???fāngshàoshí?为???人??子，方??少??时。?qīnshīyǒu????xí??lǐ??yí?亲???师??友，习??礼??仪。?xiāngjiǔlíng??néngwēnxí?香???九??龄，能??温??席。?xiàoyúqīn???suǒdāngzhí?孝???于??亲，所??当??执。?róngsì??suì??néngrànglí?融???四??岁，能??让??梨。tì???yúzhǎng??yíxiānzhī?弟???于??长，宜??先??知。?shǒuxiàotì????cìjiànwén首???孝??弟，次??见??闻。?zhīmǒushù???shímǒuwén?知???某??数，识??某??文。?yī???érshí???shí??ér??bǎi?一???而??十，十??而??百。?bǎi??érqiān??qiānér??wàn?百???而??千，千??而??万。?sāncáizhě???tiāndìrén?三???才??者，天??地??人。?sānguāngzhě????rìyuèxīng?三???光??者，日??月??星。?sāngāngzhě???jūnchényì?三???纲??者，君??臣??义。?fù???zǐqīn????fū??fùshùn?父???子??亲，夫??妇??顺。?yuēchūnxià???yuēqiūdōng?曰???春??夏，曰??秋??冬。?cǐ???sìshí???yùn??bùqióng?此???四??时，运??不??穷。?yuēnánběi???yuē??xīdōng曰???南??北，曰??西??东。cǐ???sìfāng??yìnghūzhōng?此???四??方，应??乎??中。?yuēshuǐhuǒ????mùjīn??tǔ?曰???水??火，木??金??土。?cǐ???wǔxíng???běnhūshù?此???五??行，本??乎??数。?yuērén??yì????lǐzhìxìn?曰???仁??义，礼??智??信。?cǐ???wǔcháng??bùróngwěn?此???五??常，不??容??紊。?dàoliángshū??màishǔ??jì?稻???粱??菽，麦??黍??稷。?cǐ??liù??gǔ???rénsuǒ??shí?此???六??谷，人??所??食。?mǎ??niúyáng???jīquǎnshǐ?马???牛??羊，鸡??犬??豕。?cǐ??liùchù???rénsuǒ??sì?此???六??畜，人??所??饲。?yuē??xǐ??nù???yuē??āi??jù?曰???喜??怒，曰??哀??惧。ài???wù??yù????qīqíngjù?爱???恶??欲，七??情??具。?páo??tǔ??gé????mùshíjīn?匏???土??革，木??石??金。sī???yǔzhú???nǎi??bāyīn?丝???与??竹，乃??八??音。?gāozēngzǔ????fù??érshēn?高???曾??祖，父??而??身。shēnér??zǐ????zǐ??érsūn?身???而??子，子??而??孙。?zì???zǐsūn????zhìxuánzēng?自???子??孙，至??玄??曾nǎijiǔ??zú???rén??zhīlún?乃???九??族，人??之??伦。fù???zǐ??ēn????fū??fùcóng?父???子??恩，夫??妇??从。?xiōngzéyǒu????dì??zégōng?兄???则??友，弟??则??恭。zhǎngyòuxù???yǒu??yǔpéng?长???幼??序，友??与??朋。jūn??zéjìng??chénzézhōng?君???则??敬，臣??则??忠。cǐ??shí??yì???rénsuǒtóng?此???十??义，人??所??同。fánxùnméng???xūjiǎngjiū?凡???训??蒙，须??讲??究。xiángxùngǔ???míngjùdòu?详???训??诂，明??句??读。wéixuézhě????bìyǒuchū?为???学??者，必??有??初。xiǎoxuézhōng???zhìsìshū?小???学??终，至??四?? 书 关于书的成语关于读书的排比句社区图书漂流公约怎么写关于读书的小报汉书pdf 。lún??yǔzhě????èrshípiān?论???语??者，二??十??篇。qún??dì??zǐ????jìshànyán?群???弟??子，记??善??言。?mèngzǐzhě????qīpiānzhǐ?孟???子??者，七??篇??止。jiǎngdàodé???shuōrényì讲???道??德，说??仁??义。zuòzhōngyōng???zǐ??sī??bǐ?作???中??庸，子??思??笔。zhōngbùpiān??yōngbú??yì?中???不??偏，庸??不??易。dà??xiǎodài???zhù?lǐ????jì大???小??戴，注??礼??记。shùshèngyán???lǐyuè??bèi?述???圣??言，礼??乐??备。yuēguófēng??yuē??yǎsòng?曰???国??风，曰??雅??颂。hào??sì??shī??dāngfěngyǒng?号???四??诗，当??讽??咏。shī??jìwáng??chūnqiūzuò?诗???既??亡，春??秋??作。yù??bāobiǎn???biéshànè寓???褒??贬，别??善??恶。sānzhuànzhě???yǒugōngyáng?三???传??者，有??公??羊。yǒuzuǒshì???yǒu??gǔliáng?有???左??氏，有??谷??梁。jīngjì??míng??fāngdú??zǐ?经???既??明，方??读??子。cuō??qí??yào???jì??qí??shì撮???其??要，记??其??事。?wǔ???zǐ??zhě??yǒuxúnyáng?五???子??者????有??荀??扬。wénzhōngzǐ???jílǎozhuāng?文???中??子，及??老??庄。jīngzǐtōng???dúzhū??shǐ?经???子??通，读??诸??史。kǎo??shìxì????zhīzhōngshǐ考???世??系，知??终??始。zì???xīnóng???zhìhuángdì?自???羲??农，至??黄??帝。hàosānhuáng??jūshàngshì?号???三??皇，居??上??世。?tángyǒuyú????hàoèr??dì?唐???有??虞，号??二??帝。xiāngyīxùn??chēngshèngshì相???揖??逊，称??盛??世。xiàyǒu??yǔ??shāngyǒutāng?夏???有??禹，商??有??汤。zhōuwénwǔ??chēngsānwáng?周???文??武，称??三??王。?xiàchuánzǐ???jiātiānxià?夏???传??子，家??天??下。sì??bǎizǎi???qiānxiàshè?四???百??载，迁??夏??社。tāngfáxià???guó??hàoshāng?汤???伐??夏，国??号??商。?liùbǎizǎi???zhìzhòuwáng?六???百??载，至??纣??亡。?zhōuwǔwáng???shǐzhūzhòu?周???武??王，始??诛??纣。?bā??bǎizǎi???zuìchángjiǔ?八???百??载，最??长??久。zhōuzhédōng??wánggāngzhuì?周???辙??东，王??纲??坠。?Chěnggāngē???shàngyóushuì逞???干??戈，尚??游??说。shǐchūnqiū??zhōngzhànguó?始???春??秋，终??战??国。?wǔ???bàqiáng??qīxióngchū?五???霸??强，七??雄??出。yíngqín??shì???shǐjiānbìng?嬴???秦??氏，始??兼??并。chuánèrshì???chǔhànzhēng?传???二??世，楚??汉??争。?gāo??zǔxīng??hàn??yèjiàn?高???祖??兴，汉??业??建。?zhìxiàoping??wángmǎngcuàn?至???孝??平，王??莽??篡。guāngwǔxīng???wéidōnghàn?光???武??兴，为??东??汉。?sì???bǎinián??zhōngyúxiàn四???百??年，终??于??献。wèishǔ??wú??zhēnghàndǐng?魏???蜀??吴，争??汉??鼎。hàosānguó????qìliǎngjìn?号???三??国，迄??两??晋。?songqí??jì??liángchénchéng?宋???齐??继，梁??陈??承。wéináncháo???dūjīnlíng为???南??朝，都??金??陵。běiyuánwèi???fēndōngxi?北???元??魏，分??东??西。?yǔ??wénzhōu???yǔ??gāoqí宇???文??周，与??高??齐。dàizhì??suí???yì??tǔ??yǔ?迨???至??隋，一??土??宇。?bú??zàichuan??shītǒngxù不???再??传，失??统??绪。tánggāozǔ????qǐ??yìshī?唐???高??祖，起??义??师。chúsuíluànchuàngguójī除???隋??乱，创??国??基。èr??shíchuán??sānbǎizǎi?二???十??传，三??百??载。liángmièzhī???guónǎigǎi梁???灭??之，国??乃??改。liángtángjìn???jíhànzhōu?梁???唐??晋，及??汉??周。chēngwǔ??dài??jiēyǒuyóu?称???五??代，皆??有??由。yánsòngxīngshòuzhōushàn?炎???宋???兴，受??周??禅。shí??bāchuán??nánběihùn?十???八???传，南??北??混。liáoyǔ??jīn???dì??hàofēn辽???与???金，帝??号??纷。dàimiè??liáosòngyóucún迨???灭???辽，宋??犹??存。zhìyuánxīngjīn??xùxiē至???元???兴，金??绪??歇。yǒusòng??shì??yìtongmiè有???宋???世，一??同??灭。bìngzhōngguójiānróngdí并???中???国，兼??戎??狄。míngtài??zǔ??jiǔqīnshī明???太???祖，久??亲??师。chuánjiànwénfāngsì??sì传???建???文，方??四??祀。qiānběijīng??yǒnglè??sì迁???北???京，永??乐??嗣。dàichóngzhēn??méishānshì迨???崇???祯，煤??山??逝。qīngtài??zǔ??yīngjǐngmìng?清???太???祖，膺??景??命。?jìngsì??fāng??kè??dàdìng?靖???四???方，克??大??定。?zhìxuāntǒng??nǎidàtóng至???宣???统，乃??大??同。shí??èr???shìqīngzuòzhōng十???二???世，清??祚??终。dú???shǐzhě???kǎoshílù?读???史???者，考??实??录。?tōnggǔ??jīn???ruòqīn??mù通???古???今，若??亲??目。kǒu??ér??song??xīnérwéi?口???而???诵，心??而??维。?cháoyú???sī???xī??yú??sī?朝???于???斯，夕??于??斯。xīzhòng??ní???shīxiàngtuó?昔???仲???尼，师??项??橐。gǔshèngxiánshàngqínxué古???圣???贤，尚??勤??学。zhàozhōngling??dú??lǔlún?赵???中???令，读??鲁??论。bǐ???jì???shì??xuéqiěqín?彼???既???仕，学??且??勤。pī???pú??biānxiāozhújiǎn?披???蒲???编，削??竹??简。bǐ???wú???shūqiězhīmiǎn?彼???无???书，且??知??勉。?tóuxuánliángzhuīcì??gǔ?头???悬???梁，锥??刺??股。bǐ???bú??jiào??zìqín??kǔ彼???不???教，自??勤??苦。rú??nángyíng??rúyìngxuě?如???囊???萤，如??映??雪。jiā??suī??pín??xuébúchuò?家???虽???贫，学??不??辍。?rú???fù??xīn???rúguàjiǎo?如???负???薪，如??挂??角。?shēnsuī??láo??yóukǔzhuó身???虽???劳，犹??苦??卓。sū??lǎo??quán??èr??shíqī?苏???老???泉，二??十??七。?shǐ??fā???fèn??dúshū??jí始???发???奋，读??书??籍。bǐ???jì???lǎo??yóuhuǐchí?彼???既???老，犹??悔??迟。ěr??xiǎoshēngyízǎo??sī?尔???小???生，宜??早??思。?ruòliánghào???bāshí??èr?若???梁???灏，八??十??二。duì??dà??tíng??kuíduō??shì?对???大???廷，魁??多??士。bǐ???jìchéngzhòngchēngyì?彼???既???成，众??称??异。ěr??xiǎoshēng??yí??lì??zhì?尔???小???生，宜??立??志。yíngbā???suìnéngyǒngshī?莹???八???岁，能??咏??诗。mì???qī???suìnéngfù??qí?泌???七???岁，能??赋??棋。bǐ??yǐng??wù???rénchēngqí?彼???颖???悟，人??称??奇。ěr??yòu??xué???dāngxiàozhī?尔???幼???学，当??效??之。cài??wén??jī??néngbiànqín?蔡???文???姬，能??辨??琴。xièdào??yùn??néngyǒngyín?谢???道???韫，能??咏??吟。bǐ???nǚ???zǐ??qiěcōngmǐn?彼???女???子，且??聪??敏。ěr???nán??zǐ??dāngzìjǐng?尔???男???子，当??自??警。?tángliúyàn??fāngqī??suì?唐???刘???晏，方??七??岁。jǔ??shéntóng??zuòzhèngzì?举???神???童，作??正??字。bǐ??suī??yòu??shēnyǐ??shì?彼???虽???幼，身??已??仕。ěr??yòu??xué??miǎnér??zhì?尔???幼???学，勉??而??致。yǒu??wéizhě???yìruò??shì?有???为???者，亦??若??是。quǎnshǒu??yè???jī??sīchén犬???守???夜，鸡??司??晨。gǒu??bù??xué???héwéi??rén?苟???不???学，曷??为??人。cán??tǔ???sī??fēngniàngmì蚕???吐???丝，蜂??酿??蜜。rén??bù??xué???bù??rú??wù?人???不???学，不??如??物。?yòu??ér??xuézhuàngérxíng?幼???而???学，壮??而??行。?shàngzhìjūn??xià??zé??mín?上???致???君，下??泽??民。yángmíngshēng??xiǎnfù??mǔ?扬???名???声，显??父??母。?guāngyú??qián??yù??yú??hòu?光???于???前，裕??于??后。?rén??yí???zǐ??jīnmǎnyíng人???遗???子，金??满??赢。wǒ??jiào??zǐ???wéiyìjīng?我???教???子，惟??一??经。qín??yǒugōng??xì??wú??yì?勤???有???功，戏??无??益。?jièzhī??zāi???yímiǎnlì?戒???之???哉，宜??勉??力新人教版七年级历史 下册 数学七年级下册拔高题下载二年级下册除法运算下载七年级下册数学试卷免费下载二年级下册语文生字表部编三年级下册语文教材分析 教学计划新人教版七年级历史下册教学计划PAGE/NUMPAGES新人教版七年级历史下册教学计划2017-2018学年下期人教版七年级历史下册教学计划**学校**根据人教版七年级历史下册教材，结合学校工作要求及学期、学生具体情况制定本计划：一、学生情况从上期平时学习和期末考试看，学生的基础知识掌握得较好，学习习惯也还过得去，主要表现在上课基本都能专心听讲，课后及时完成作业。但也存在一些不足：如部分学生做作业马虎，并且做完作业后不喜欢检查，甚至丧失学习兴趣，特别是不愿及时复习记忆掌握基础知识等。二、教材 分析 定性数据统计分析pdf销售业绩分析模板建筑结构震害分析销售进度分析表京东商城竞争战略分析 这一学期七年级历史下册选用的是人教版2016年部编最新教材，融思想性、政治性、科学性、知识性于一体。可读性强，图文并茂，新增了许多趣味性较强的课堂知识活动。　本学期中国历史教学内容共分为三个单元，叙述从隋朝到清朝（1840年鸦片战争以前）的历史，共21课。第一单元：隋唐时期：繁荣与开放的时代（第1－5课）；第二单元：辽宋夏金元时期：民族关系发展和社会变化（第6－13课）；第三单元：明清时期：统一多民族国家的发展与巩固（第14－第21课）。另外，增加了一节活动课：中国传统节日的起源。共需34课时（其中新课讲授占20个课时，活动课占1课时，单元复习占3个课时，期中复习占2个课时，期末总复习占4个课时,其余为考试检测试卷分析）。三、教学目标及要求继续增强学生对历史的学习兴趣，使学生掌握重要的历史事件，历史人物，历史现象，理解重要的历史概念，把握不同历史时期的基本特征及其发展趋势。培养学生识图、读史料的分析能力，引导学生学会收集、整理和运用相关的历史学习材料，启发学生对历史事物进行想象、联想和分析、综合、比较、概括等认知活动。注重培养学生的创新意识，以及与他人合作和参与社会实践活动的能力。增强学生的民族自豪感和爱国主义情感，弘扬世界各民族的优秀文化。完成中国历史七年级 上册 三年级上册必备古诗语文八年级上册教案下载人教社三年级上册数学 pdf四年级上册口算下载三年级数学教材上册pdf 的历史教学任务，争取平均分、优秀率、合格率有很大的提高。四、重难点及措施重难点：教材重点在于与历史发展的线索相关的重大事件和人物以及经济、文化的发展。难点在于向学生进行思想教育及对历史事件、人物的评价。措施：1、以转变学生的学习方式为核心，注重学生学习历史知识的过程和方法，使学生学会学习。鼓励学生通过独立思考和交流合作学习历史，培养发现历史问题和解决历史问题的能力，养成探究式学习的习惯。2、抓课堂常规管理、学习习惯的培养，严格管理和规范学生的行为，在教学中加大力度备好课，做好每一个课件。3、督促学生及时巩固消化，力求每一节课都能有实际成效。4、落实好培优补差工作。五、教学进度安排周次教学内容起止页数1第1课时第1课隋朝的统一与灭亡1－52第2课时第2课从“贞观之治”到“开元盛世”第3课时第3课盛唐气象6－183第4课时第4课唐朝的中外文化交流?第5课时第5课安史之乱与唐朝衰亡18－264第6课时隋唐时期单元复习第7课时第6课北宋的政治27－325第8课时第7课辽、西夏与北宋的并立第9课时第8课金与南宋的对峙33－406第10课时第9课宋代经济的发展?第11课时第10课蒙古族的兴起与元朝的建立41－507第12课时第11课元朝的统治第13课时第12课宋元时期的都市和文化51－588第14课时第13课宋元时期的科技与中外交通第15课时宋元时期单元复习59－649第16课时期中复习第17课时期中复习10第18课时期中考试第19课时　试卷讲评、分析11第20课时第14课明朝的统治?第21课时第15课明朝的对外关系65－7512第22课时第16课明朝的科技、建筑与文学第23课时第17课明朝的灭亡76－8713第24课时第18课统一多民族国家的巩固和发展第25课时第19课清朝前期社会经济的发展88-9814第26课时第20课清朝君主专制的强化第27课时第21课清朝前期的文学艺术99-11015第28课时明清时期单元复习?第29课时活动课：中国传统节日的起源111-11416第30课时期末复习第31课时期末复习17第32课时期末复习第33课时期末复习18第34课时期末考试以上计划如遇学校工作变化可再做调整。2018.3.附培优补差计划——培“优”补“差”计划为提高历史教育教学工作，全面提高学生学习的主动性和积极性，实行以点带面，全面提高，通过培优补差使学生转变观念，认真学习，发展智力，陶冶品德，真正使教师动起来，使学生活起来。并长期坚持下去，真正让学生树立起学习的信心和勇气，克服自卑的心理。在学生中形成"赶、帮、超"浓厚的学习氛围，使我校每个学生学有所长，学有所用，不能不学，量性而学这一目标，特制订培优助困工作计划：（一）工作目标1、加强对培优助困的常规管理。2、认真组织相关的学生参与活动中去。3、认真做好参加学生的辅导工作和思想教育工作，培优和助困工作每课一次。　（二）具体措施1、认真准备每一课培优辅差内容，努力做好学习过程的趣味性和知识性相结合。2、加强交流，了解潜能生、优异生的家庭、学习的具体情况，尽量排除学习上遇到的困难，沟通思想。3、坚持辅差工作，每周不少于一次。4、根据学生的个体差异，安排不同的作业。5、请优生介绍学习经验，差生加以学习。6、课堂上创造机会，用优生学习思维、方法来影响差生。对差生实施多做多练措施。优生适当增加题目难度。7、采用激励机制，对差生的每一点进步都给予肯定，并鼓励其继续进取，在优生中树立榜样，给机会表现，调动他们的学习积极性和成功感。充分了解差生现行学习方法，给予正确引导，朝正确方向发展，保证差生改善目前学习差的状况，提高学习成绩。以上计划在工作中视具体情况再做补充完善。2018.3.腐败五大危害腐败五大危害PAGE/NUMPAGES腐败五大危害温总理近日指出：“执政党的最大危险是腐败”，毋庸置疑，腐败对党员干部具有极大的腐蚀性、对党的事业具有极大的破坏性、对人民的利益具有极大的危害性。?以笔者之见，腐败现象主要有五大危害：　　一是“害党”，腐败践踏党的先进性。腐败轻则损害党的形象，重则导致“党亡政息”，使党丧失执政地位，这在苏联和东欧社会主义国家的解体中已经得到证实。党的先进性、奋斗纲领和崇高宗旨，是通过一个个党员干部的模范言行和优良作风表现出来的，而腐败分子及其腐败行为践踏党的纲领，亵渎党的宗旨，沾污党的形象，腐蚀党的肌体。如果党的性质和宗旨 规定 关于下班后关闭电源的规定党章中关于入党时间的规定公务员考核规定下载规定办法文件下载宁波关于闷顶的规定 的是一套，某些党员干部的行为是另一套，执政党就会丧失民心，走向衰亡。可见，反腐败关系到党的生死存亡，绝非危言耸听。　　二是“害民”，腐败损害人民群众的根本利益。腐败破坏社会主义民主和法制，许多贪官飞扬跋扈，一手遮天，说一不二，践踏民主，压制群众，犹如“土皇帝”，千方百计把党的民主集中制变为个人专制，对人民群众的主人翁地位构成极大威胁，侵害群众的政治、经济、文化利益，挫伤群众的积极性、能动性、创造性。特别是损害广大群众对党的信任和信心。我们党是代表人民群众执政的，如果不能赢得民心，不坚决惩治腐败，党就会成为人民群众的对立面，始终代表最广大人民的根本利益，就将无从谈起。　　三是“害国”，腐败破坏社会稳定。腐败损害党和政府的威信，削弱党和政府的凝聚力，使人民群众与党和政府离心离德，其结果必然导致社会纷争，进而引发动乱，乃至四分五裂。我国改革开放初期，邓小平同志就敏锐地察觉并告诫全党，如果不坚决搞好党风，进一步恢复党的实事求是、群众路线和艰苦奋斗的优良传统，就可能出现一些本来可以避免的大大小小的乱子，使我们的现代化建设在迈出第一步的时候就遇到严重的障碍。　　四是“害家”，腐败导致民生凋敝。腐败是贫富两极分化的加速器，贪官权力寻租，官商勾结，狼狈为奸，互利共赢，结成利益同盟，导致权贵阶层和不法富豪不当得利，一夜暴富，而普通劳动者由于收入减少，则陷入贫困，家徒四壁，从而导致民不聊生，一些人心理失衡，给社会安定造成隐患。腐败分子以权谋私，权力进入市场，直接破坏社会主义市场经济秩序，倘若任其滋生蔓延，必将严重扰乱社会主义经济秩序，导致国家经济的崩溃，民生凋敝。　　五是“害己”，腐败危害贪官自身。纵观古今，绝大多数贪官都没有好下场，如秦之指鹿为马的赵高，被子婴诱杀户灭三族；汉之卖官鬻爵的窦宪，汉和帝令其自尽；唐之专权误国的杨国忠，马嵬驿之变被乱刀砍死；宋之贪官蔡京，在发配途中被活活饿死；明朝贪官刘瑾，被凌迟处死；清朝贪官和珅富可敌国，被嘉庆皇帝赐死。“湛湛青天不可欺，未曾动念已先知；善恶到头终有报，只争来早与来迟”。这个天就是人民，贪官再狡猾也躲不过人民的眼睛。文强的临刑绝唱“苍天有眼知善恶，天堂地狱一念间”，讲得正是这种道理。　　腐败具有极强的传染性、腐蚀性，如果不严加惩治，就会像瘟疫一般迅速传播。反腐败是关系党和国家生死存亡的严重政治斗争。历史已经反复证明，任何外力都打不垮共产党，但如果党内腐败不除，就会不打自倒。我们党只有坚决反腐败，才能始终保持党的先进性和纯洁性。VB常用必背程序VB常用必背程序PAGE/NUMPAGESVB常用必背程序1、求100以内的素数。PrivateSubForm_Click()Dimi%,j%Fori=2To100Forj=2Toi-1IfiModj=0ThenExitForNextjIfj=iThenPrintiNextiEndSub2、从键盘输入任意长度的字符串，要求将字符顺序倒置，例如，将输入的“ABCDEFG”变换成“GFEDCBA”。PrivateSubCommand1_Click()Dima$,I%,c$,d$,n%a=InputBox$("输入字符串")n=Len(a)ForI=1ToInt(n\2)c=Mid(a,I,1)Mid(a,I,1)=Mid(a,n-I+1,1)Mid(a,n-I+1,1)=cNextIPrintaEndSub3、计算0~200之间所有能被11或5整除的数之和PrivateSubForm_Click()Dimn%,i%n=0Fori=1To200IfiMod11=0OriMod5=0Thenn=n+iEndIfNextiPrintnEndSub4、输入一年份，判断它是否为闰年，并显示有关信息。（判断闰年的条件是：年份能被4整除但不能被100整除，或者能被400整除）PrivateSubCommand1_Click()Dimy%y=InputBox("请输入年数")IfyMod4=0AndyMod100<>0OryMod400=0ThenMsgBox(y&"年是闰年")ElseMsgBox(y&"年是平年")EndIfEndSub5、已知x,y,z3个变量中存放了3个不同的数，比较它们的大小并进行调整，使得xyThent=x:x=y:y=tIfx>zThent=x:x=z:z=tIfy>zThent=y:y=z:z=tPrint"排序后";x;"";y;"";zEndSub6、求s=a+aa+aaa+...aaaaa（n个a），其中a和n的值随机产生，a的范围是[1,9]的整数，n的范围是[5,10]。如a=3,n=6,则s=3+33+333+3333+33333+333333。编程确定n和a的值，并计算s。PrivateSubForm_Click()Dims!,t!,i!,a%,n%a=Int(Rnd*9+1)n=Int(Rnd*6+5)t=0:s=0Print"a=";a,"n=";nFori=1Tont=t*10+as=s+tPrintt;NextiPrintPrint"s=";sEndSub7、计算100~300之间所有能被3和7整除的数之和。PrivateSubForm_Click()Fori=100To300IfiMod21=0Thens=s+iPrinti;EndIfNextiPrintPrint"s=";sEndSub8、编程求200--400范围内5的倍数或7的倍数之和。(一个数如果同时是7和5的倍数，则只能加一次。)PrivateSubCommand1_Click()Dims1%,s2%,s3%,i%S1=0S2=0Fori=200to400Ifimod5=0orimod7=0thens1=s1+iEndifNextiFori=200to400Ifimod5=0orimod7=0thens2=s2+iEndifNextiS3=s1-s2Prints3Endsub9、找出被3、5、7除，余数为1的最小的5个正整数。PrivateSubCommand1_Click()DimCountN%,n%CountN=0n=1Don=n+1IfnMod3=1AndnMod5=1AndnMod7=1ThenPrintnCountN=CountN+1EndIfLoopUntilCountN=5EndSub10、某次歌曲大奖赛，有7个评委。如果分别输入7个评委对某个参赛者的打分数，按照去掉一个最高分和一个最低分的计算办法，求出该参赛者的平均得分。PrivateSubCommand1_Click()Dimmark!,max!,min!,aver!,i%aver=0Fori=1To7mark=InputBox("输入第"&i&"位评委的打分")Ifi=1Thenmax=mark:min=markElseIfmarkmaxThenmax=markEndIfaver=aver+markNextiaver=(aver-min-max)/5PrintaverEndSub11、编程显示100~500之间所有的水仙花数之和。(水仙花数是3位数，其各位数之和等于该数本身)PrivateSubForm_Click()Dimi%,s%,s1%,s2%,s3%,a!a=0Fori=0To400s=99+is1=(sMod100)\10s2=sMod10s3=s\100Ifs1^3+s2^3+s3^3=sThena=s+aEndIfNextiPrintaEndSub12、随机产生一个三位正整数，然后逆序输出，产生的数与逆序数同时显示。例如，产生246，输出是642。Dima%,m%,b%,c%,d%PrivateSubForm_Click()a=Int(Rnd*900+100)Printad=(aMod10)*100b=(aMod100)-(aMod10)c=a\100m=c+b+dPrintmEndSub13、从键盘输入三角形的三条边a，b，c的值，根据其数值，判断能否构成三角形。PrivateSubForm_Click()Dima%,b%,c%a=Val(InputBox("inputa"))b=Val(InputBox("inputb"))c=Val(InputBox("inputc"))Ifa+b>cAnda+c>bAndb+c>aThenMsgBox("能构成三角形")ElseMsgBox("不能构成三角形")EndIfEndSub14、已知数组a()，编程删除a中第5个元素。数组a中的元素分别为{12，6，4，89，75，63，100，20，31}。PrivateSubForm_Click()Dima(),i%,n%a=Array(12,6,4,89,75,63,100,20,31)n=UBound(a)Fori=0TonPrinta(i);NextiPrintFori=5Tona(i-1)=a(i)Nextin=n-1ReDimPreservea(n)Fori=0TonPrinta(i);NextiPrintEndSub15、随机生成一个整型的二维数组，范围在[10,20]之间，以上三角形式输出该数组。（下三角、全部元素）Dima%(4,4)Dima%(4,4)PrivateSubCommand1_Click()Picture1.ClsFori=0To4Forj=iTo4Picture1.PrintTab(j*6);a(i,j);NextjPicture1.PrintNextiEndSubPrivateSubForm_Load()Fori=0To4Forj=0To4a(i,j)=Int(Rnd*11+10)NextjNextiEndSub16、利用随机函数生成一个4×4的矩阵(即二维矩阵),范围是[20,50]内的整数,输出每行中的最大值和下标。PrivateSubForm_Click()Dima%(3,3),s0%,s1%,s2%,s3%,b0%,b1%,b2%,b3%Max=40Fori=0To3Forj=0To3a(i,j)=Int(Rnd*31+20)PrintTab(j*5);a(i,j);Ifa(0,j)>=MaxThens0=a(0,j):b0=jIfa(1,j)>=MaxThens1=a(1,j):b1=jIfa(2,j)>=MaxThens2=a(2,j):b2=jIfa(3,j)>=MaxThens3=a(3,j):b3=jNextjNextiPrintPrint"第一行";s0;"(";0;b0;")"Print"第二行";s1;"(";1;b1;")"Print"第三行";s2;"(";2;b2;")"Print"第四行";s3;"(";3;b3;")"EndSub17、利用随机函数生成一个4×4的矩阵(即二维矩阵),范围是[40,80]内的整数，求它的最大值及所对应的下标。PrivateSubForm_Click()Dima%(3,3)Min=80Fori=0To3Forj=0To3a(i,j)=Int(Rnd*41+40)PrintTab(j*5);a(i,j);Ifa(i,j)<=MinThenMin=a(i,j):b=i:c=jEndIfNextjNextiPrintPrint"最小值为";MinPrint"其下标为";"(";b,c;")"EndSub18、输入一系列字符串，编程求出长度最大的字符串并输出其所对应的次序。PrivateSubForm_Click()Dima(5)asstring,b(4)asinteger,t%,max%,imax%Fori=1to5a(i)=inputbox("a")NextiFori=0to4b(i)=len(trim(a(i)))NextiMax=1Fori=0to4IfmaxamaxThenamax=a(i)Ifa(i)a(1)Thenmaxa=a(i):m=iEndIfNextiFori=1To10Printa(i);NextiPrint"maxa="&maxa;"下标为"&mEndSub25、定义三个4×4的二维数组A,B,C，A和B中的元素均随机生成，数组A范围是1～20，数组B的范围是100～200，数组C是A和B相加得到的。请编程生成并输出A,B,C。PrivateSubCommand1_Click()Dima(3,3),b(3,3),c(3,3),t%,m%Fori=0To3Forj=0To3a(i,j)=Int(Rnd*20+1)Picture1.Printa(i,j);NextjNextiPicture1.PrintFori=0To3Forj=0To3b(i,j)=Int(Rnd*101+100)Picture1.Printb(i,j);NextjNextiPicture1.PrintFori=0To3Forj=0To3c(i,j)=a(i,j)+b(i,j)NextjNextiEndSub26、利用随机函数生成一个4×4的矩阵(即二维矩阵),范围是[20,50]内的整数，求它的两条对角线上元素之和。PrivateSubForm_Click()Dima%(3,3)Fori=0To3Forj=0To3a(i,j)=Int(Rnd*31+20)PrintTab(j*5);a(i,j);NextjNextis=a(1,1)+a(2,2)+a(3,3)+a(0,0)+a(0,3)+a(1,2)+a(2,1)+a(3,0)PrintPrint"两对角线上元素之和为:";sEndSub27、利用随机函数生成一个4×4的矩阵(即二维矩阵),范围是[40,80]内的整数，求它的最小值及所对应的下标。PrivateSubForm_Click()Dima%(3,3)Min=80Fori=0To3Forj=0To3a(i,j)=Int(Rnd*41+40)PrintTab(j*5);a(i,j);Ifa(i,j)<=MinThenMin=a(i,j):b=i:c=jEndIfNextjNextiPrintPrint"最小值为";MinPrint"其下标为";"(";b,c;")"EndSub28、随机生成一个整型的二维数组，范围在[10,20]之间，以上三角形式输出该数组。（下三角、全部元素）Dima%(4,4)Dima%(4,4)PrivateSubCommand1_Click()Picture1.ClsFori=0To4Forj=iTo4Picture1.PrintTab(j*6);a(i,j);NextjPicture1.PrintNextiEndSubPrivateSubForm_Load()Fori=0To4Forj=0To4a(i,j)=Int(Rnd*11+10)NextjNextiEndSub29、有10个评委对歌手进行打分（分数存在A数组中）要求编程计算出歌手平均得分（按去掉一个最高分和一个最低分的计算方法计算。）a=Array(98,97,95,91,90,99,93,94,93,96)PrivateSubForm_Click()Dima(),max%,min%,imax%,imin%,s!a=Array(98,97,95,91,90,99,93,94,93,96)n=UBound(a)Fori=0TonPrinta(i);NextiPrintmin=a(0):imin=0Fori=0TonIfa(i)maxThenmax=a(i):imax=iNextiPrint"max=";"imax=";imaxReDimPreservea(n-2)s=0Fori=0Ton-2s=s+a(i)Printa(i);NextiPrintPrint"avr=";s/(n-1)EndSub30、编程输出n行杨辉三角图形，n由键盘输入。PrivateSubCommand1_Click()n=Text1.TextReDima(1Ton,1Ton)Fori=1TonForj=1Tona(i,1)=1Ifi=jThena(i,j)=1NextjNextiFori=2TonForj=2Tona(i,j)=a(i-1,j-1)+a(i-1,j)NextjNextiFori=1TonForj=1ToiPicture1.Printa(i,j);"";NextjPicture1.PrintNextiEndSub31、声明一个整型的二维数组a(1to4,1to4)，用随机函数产生各元素，范围介于[1,20]之间，编程将第1行和第3行对应元素交换。Dima%(1To4,1To4),t%PrivateSubCommand1_Click()Picture1.ClsFori=1To4Forj=1To4Picture1.PrintTab(j*4);a(i,j);NextjPicture1.PrintNextiEndSubPrivateSubCommand2_Click()Fori=1To4Forj=1To4t=a(1,j):a(1,j)=a(3,j):a(3,j)=tPicture2.PrintTab(j*4);a(i,j);NextjPicture2.PrintNextiEndSubPrivateSubForm_Load()Fori=1To4Forj=1To4a(i,j)=Int(Rnd*20+1)NextjNextiEndSub32、随机产生15个小写字母，放在字符数组中。提示：c=chr(int(rnd*26+97))PrivateSubCommand1_Click()Dimc$(14),i%Picture1.ClsFori=0To14c(i)=Chr(Int(Rnd*26+97))NextiFori=0To14Picture1.Printc(i);NextiEndSub33、编写一个过程计算并输出区间[100，1000]内所有素数的和(要求判断素数使用过程（函数或子过程）来实现。调用该过程。(提示：只能被1和自身整除的自然数称为素数。)Functionsushu%(ByValx%)Dimm%,TagAsBoolean,i%m=Val(x)Tag=TrueFori=2Tom-1If(mModi)=0ThenTag=FalseNextiIfTagThensushu=xEndFunctionPrivateSubCommand1_Click()Dimi%,k%Fori=100To1000Ifsushu(i)ThenList1.AddItemiNextiSum=0Fork=0ToList1.ListCount-1Sum=Sum+Val(List1.