VB可視化程序設(shè)計基礎(chǔ)課件

VB可視化程序設(shè)計基礎(chǔ)11、不為五斗米折腰。12、芳菊開林耀，青松冠巖列。懷此貞秀姿，卓為霜下杰。13、歸去來兮，田蜀將蕪胡不歸。14、酒能祛百慮，菊為制頹齡。15、春蠶收長絲，秋熟靡王稅。VB可視化程序設(shè)計基礎(chǔ)VB可視化程序設(shè)計基礎(chǔ)11、不為五斗米折腰。12、芳菊開林耀，青松冠巖列。懷此貞秀姿，卓為霜下杰。13、歸去來兮，田蜀將蕪胡不歸。14、酒能祛百慮，菊為制頹齡。15、春蠶收長絲，秋熟靡王稅。第2章VB可視化程序設(shè)計基礎(chǔ)模擬計算器程序設(shè)計窗體基本的輸入/輸出控件命令按鈕VisualBasic程序設(shè)計語言基礎(chǔ)基本語句數(shù)組過程知識延伸——焦點8/15/20212知識回顧通過一個文字移動的例子，講解VB功能特色集成開發(fā)環(huán)境可視化編程的基本概念（類和對象）可視化編程的基本步驟工程管理和程序調(diào)試8/15/20213在教學(xué)中激發(fā)學(xué)生的興趣，點燃他們的求知欲望，調(diào)動起他們學(xué)習(xí)的主動性和創(chuàng)造性，使之在愉悅中充分發(fā)揮潛能，求得知識，這是語文教學(xué)規(guī)律的必然要求。為此，我們主要采取“五趣法”，并且收到了良好效果。一、拋疑引趣愛因斯坦說過：“興趣是最好的老師?！倍ぐl(fā)學(xué)習(xí)興趣的最佳手段，莫過于置疑、激疑、導(dǎo)疑。對于說明文，許多學(xué)生感到學(xué)起來枯燥，不像小說、散文那樣易于吸引人。根據(jù)學(xué)生的這一普遍心理特點，在講授說明文的時候，我采用了“置疑法”。如《食物從何處來》這一課，我先將課題寫在黑板上，然后加上一個大大的“？”。我說：“人天天吃食物，人以外的生物都有食物嗎？什么叫食物？食物到底從何處來？”學(xué)生邊閱讀邊思考。開始學(xué)生有些不以為然，后來讀出了東西，讀出了門道，覺得“食物”并不簡單，引起了極大興趣，并通過認真閱讀，知道了一切生物都需要食物；食物是一種供應(yīng)能量的物質(zhì)；水和礦物質(zhì)鹽類不屬于食物；除了個別細菌外，其他一些生物都是靠綠色植物的光合作用獲得食物的。學(xué)生們的興趣被調(diào)動起來了，我趁機講：“說明文其實并不枯燥，學(xué)習(xí)說明文就像吃花生一樣，剝皮吃瓤，味在其中；學(xué)習(xí)小說、散文，就像看金魚，透壁觀鱗，情景易見?！贝擞麟m不十分恰當，但學(xué)生們覺得在理，枯燥也變?yōu)橛腥?。對于文言文這個“老大難”問題，老師更要多花一點心思對課文內(nèi)部“資源”進行挖掘整理，采用技術(shù)加工，以“新、巧、奇”的形式來刺激興趣。如在教范仲淹的《岳陽樓記》時，可設(shè)計謎面為“丘”，猜文中句子（謎底：山岳潛形）。在講張養(yǎng)浩《山坡羊?潼關(guān)懷古》時，可設(shè)置謎面：“蜜蜂”，打曲中句子（謎底：峰巒如聚）。這樣使學(xué)生豁然開朗，妙趣橫生，增強了課堂教學(xué)的趣味性、知識性，培養(yǎng)了學(xué)生思維創(chuàng)新能力?！白x書無疑者，須教有疑”，“疑者，覺悟之機也”。根據(jù)古人的教誨，在教學(xué)中，要盡力去打破學(xué)生頭腦的“平靜”，激發(fā)學(xué)生思維活動“波瀾”。在講《變色龍》這一課的時候，我引導(dǎo)學(xué)生從社會環(huán)境描寫上，討論人物“變”的特色（快）、“變”的方法（蠢），然后向?qū)W生提出“變色龍”是變得既快又蠢的，但他在“變”中又有“不變”的一點是什么？學(xué)生經(jīng)過思考，悟出了“變色龍”立場不變――“媚上壓下”的本質(zhì)不變的道理。這一激疑問難的引導(dǎo)方法，既可以使學(xué)生辯證地分析問題，又可以使學(xué)生認識到那個社會的本質(zhì)特征，更喚起了學(xué)習(xí)語文的興趣。一般的傳統(tǒng)教學(xué)法往往是教師講一課，學(xué)生學(xué)一課，學(xué)生在教學(xué)過程中總是被動“受業(yè)”。在課堂上，教師滔滔不絕，學(xué)生如鴨聽雷，久而久之，教而僵化，學(xué)而麻木，學(xué)生自學(xué)能力低下，這就是所說的“填鴨式”教學(xué)的情形與結(jié)果。為了引導(dǎo)學(xué)生走出被動學(xué)習(xí)的泥潭，在教學(xué)實踐中，我采取了“導(dǎo)疑”的方法，引導(dǎo)學(xué)生“笨鳥先飛”先行一步――在布置家庭作業(yè)的時候，把預(yù)習(xí)新課作為重要內(nèi)容，通過預(yù)習(xí)性自學(xué)，使他們掌握了新課的一些淺顯知識點。如學(xué)生可以運用工具書、查閱資料等方法和途徑，在預(yù)習(xí)中加深對新課的理解程度，并找出難點問題。這樣，學(xué)生帶著問題進入課堂學(xué)習(xí)，教師帶著問題實施課堂教學(xué)。“導(dǎo)疑”教學(xué)法，既能使學(xué)生的學(xué)習(xí)變成主動行為，又能夠提高學(xué)生的自學(xué)能力和發(fā)現(xiàn)問題、分析問題和解決問題的能力，使原本充滿問題的教學(xué)實踐過程，變成充滿樂趣、師生互動的交流過程。二、以智啟趣語文教學(xué)的過程也可以說是知識的不斷擴散、激發(fā)學(xué)生求知興趣的智力活動過程。新知識的吸引力往往就是學(xué)生積極參與教學(xué)雙邊活動的原動力。已知的延伸條件是對未知的興趣，由已知的基礎(chǔ)拓展出嶄新的境界，這是一種創(chuàng)造力。從某種程度說，舉一反三，觸類旁通，即是創(chuàng)造的體現(xiàn)。記得在講課外閱讀時，有一處句子形容一人物又白又胖的臉“像剛出鍋的饅頭”，比喻十分精彩。講到此處，同學(xué)們都笑了。在以往學(xué)過的文章中，還有沒有形容人的比較精彩的比喻句呢？有的同學(xué)想起《故鄉(xiāng)》中的楊二嫂“張著兩腳，正像一個畫圖儀器里細腳伶仃的圓規(guī)”等等。我趁機講：“比喻一定要形象、貼切、生動，對人物的比喻一定要符合該人物的身份與本質(zhì)性格特征，要像那些句子一樣富于創(chuàng)造性?！币淮?，學(xué)生的作文中就產(chǎn)生了很經(jīng)典的比喻句，“仲秋，初升的月亮看上去像一只腌透的鴨蛋黃……”寫一位老人布滿皺紋的臉“像一只歲月的篩子……”由于學(xué)生的興趣在由已知向未知擴散中形成了一種創(chuàng)造興趣，對作文的興趣也有了相應(yīng)的提高。如何圍繞“學(xué)”展開“教”，這是現(xiàn)代語文教育教學(xué)課堂實踐中最現(xiàn)實的課題。在講授《孔乙己》這一課的時候，由于這篇結(jié)尾文字沒有明確交代孔乙己的結(jié)局，但根據(jù)文中交代的孔乙己最后一次到酒店喝酒的情景推測他一定死了，這時設(shè)置一個疑問：孔乙己到底死沒死？根據(jù)是什么？會是怎么死的？我要求學(xué)生快速構(gòu)思一個續(xù)寫，看誰寫得又快又好，既新奇又合理。學(xué)生們飛快地構(gòu)思、草寫，構(gòu)思的最后結(jié)局，有說凍死餓死的，有說淹死摔死的，還有說被狗咬死的，等等，想象合理新奇全面，令我這個語文老師也大開眼界。三、設(shè)趣導(dǎo)趣發(fā)現(xiàn)學(xué)生的其他興趣，抓住時機及時引導(dǎo)，使之產(chǎn)生學(xué)習(xí)興趣，不失為一種良策。我在講《醉花陰》這首詞的時候，為了讓學(xué)生了解李清照這位千古才女，并對這首詞產(chǎn)生興趣，我首先向?qū)W生介紹了李清照和丈夫趙明誠的故事。當初，李清照把這首詞寫完之后，寄給了在萊州做官的丈夫。趙明誠一看：天啊，這也寫得太好了。但是趙明誠不甘心，覺得不能輸給妻子。于是他把自己關(guān)了起來，廢寢忘食想了三天三夜，寫出了五十首詞。然后耍了個小心眼，他把這五十首詞和李清照的這首《醉花陰》混在一起，送給了自己的一個朋友，讓他看怎么樣。這個朋友看后只說了一句話，就三句寫得好。趙明誠問：“哪三句？”這個朋友說，“莫道不銷魂，簾卷西風(fēng)，人比黃花瘦”。這個小故事很能證明李清照的詞達到的高度。一石激起千層浪，學(xué)生聽了這個故事不禁議論紛紛，對這首詞產(chǎn)生了極大的興趣和期待，從而大大提高了學(xué)生學(xué)習(xí)該詞的主動性，課堂效果顯著增強。高校的安全、穩(wěn)定是高校學(xué)生管理的一個主要環(huán)節(jié)，涉及到學(xué)校的教學(xué)秩序和人才培養(yǎng)目標的落實，也涉及到大學(xué)生的健康成長和發(fā)展，因此，高校管理工作意義非常重大。上世紀末開始，我國高校人才培養(yǎng)任務(wù)發(fā)生了重大改革，高校擴招導(dǎo)致大學(xué)生數(shù)量的大幅增長。既給高校的管理工作增加了許多壓力，也給高校管理者提出了諸多要求。由此而產(chǎn)生的許多新情況、新問題，給學(xué)校管理者提出了新的挑戰(zhàn)。面對新形勢、新要求高校學(xué)生工作者必須創(chuàng)新學(xué)生管理新模式，改變傳統(tǒng)的管理手段，要把服務(wù)放在首位，通過服務(wù)學(xué)生體現(xiàn)管理，以提高學(xué)生的綜合素質(zhì)和能力。一、高校學(xué)生管理工作在形式上要創(chuàng)新隨著我國高等教育進入發(fā)展的關(guān)鍵時期，高校的學(xué)生管理在方法上、在內(nèi)容上發(fā)生了諸多變化，那么高校學(xué)生管理工作就有了新的挑戰(zhàn)，新問題。第一，學(xué)生的組成發(fā)生了重大變化。按照國家發(fā)展要求，我國高等教育毛入學(xué)率在2015年達到41%左右，隨著我國經(jīng)濟的不斷發(fā)展，并將逐步提高這個比例，使高等教育在我國成為大眾化教育，再加上降低或取消了高考的設(shè)置門檻，包括年齡等，使得越來越多的不同年齡層次、不同社會經(jīng)歷、不同專業(yè)的人依靠自己的能力，都有可能接受高等教育。除了數(shù)量上大幅增加之外，年齡結(jié)構(gòu)，知識層次等都發(fā)生了很大變化。這就給學(xué)生管理加大了難度，增加了不少工作量。第二，學(xué)生的理念發(fā)生了較大變化。隨著改革開放的不斷深入，學(xué)生的總體目標不會改變，但對個人的追求和發(fā)展空間或多或少受社會思潮的影響，少部分學(xué)生追求的價值理念發(fā)生了變化。尤其是價值目標、職業(yè)定位、個人理想等，少部分學(xué)生變得庸俗，就是這少部分同學(xué)，導(dǎo)致學(xué)校管理者要耐下心，入腦人心給他們講、說，重樹他們的理想信念，這要求學(xué)校管理者要在工作方法上創(chuàng)新。第三，學(xué)生的維權(quán)意識增強。在法治觀念越來越強的今天，提國家倡依法治國，高校提出依法治校，大學(xué)生認為自己是繳費上學(xué)，學(xué)校有義務(wù)做好所有學(xué)生的一切服務(wù)，使他們的主體意識進一步增強，稍有不如意就要維權(quán)，這確實是學(xué)生理念的一大進步，使學(xué)生享受到了更多權(quán)力和義務(wù)，但個別學(xué)生由于不好好學(xué)習(xí)，導(dǎo)致學(xué)業(yè)掛科，留級或開除等，學(xué)生認為他們是教育的投資者，學(xué)校沒有權(quán)利給他們?nèi)魏翁幏?，這要求管理工作既要熟悉校紀校規(guī)，又要懂法律知識，要求學(xué)生管理干部要不斷加強學(xué)習(xí)，增強自己的工作能力。二、高校學(xué)生管理工作在認識上要創(chuàng)新高校學(xué)生管理者要認真謀劃，要認識到學(xué)生管理的重要性，要迎難而上，要在思想認識上有所創(chuàng)新。第一，堅持以生為本，確立學(xué)生至上理念。學(xué)校要充分認識到，沒有學(xué)生就沒有學(xué)校，就沒有學(xué)校的一切。所以高校要本著對學(xué)生高度負責(zé)的態(tài)度，把學(xué)生作為高校的主體，把學(xué)生當作第一服務(wù)的對象，學(xué)生的滿意才是我們的追求目標。對學(xué)生既要嚴格管理，又要關(guān)心愛護，工作思路要清，舉措要明，方法要新，采用各種方式潛移默化影響學(xué)生，教育學(xué)生，使他們健康成長。學(xué)生管理作為人才培養(yǎng)的重要環(huán)節(jié)之一，高校應(yīng)當確立以生為本的理念。樹立這種理念和認識是對學(xué)生管理的工作要求和目標要求，使他們在思想上重視，行動上落實，只有把“以生為本”落實了，才能體現(xiàn)出育人的真正目的和意義，育人理念就成為在學(xué)生管理工作中的一項重要內(nèi)容，是學(xué)生工作的根本出發(fā)點，也成為培養(yǎng)學(xué)生成長成才的關(guān)鍵任務(wù)。那么，培養(yǎng)高素質(zhì)人才成為高校學(xué)生管理的首要任務(wù)，培養(yǎng)學(xué)生養(yǎng)成自主性學(xué)習(xí)的良好習(xí)慣，把立德樹人滲透到學(xué)生培養(yǎng)的全過程，努力使他們掌握過硬的專業(yè)技能，激發(fā)學(xué)生的內(nèi)在動力，努力使學(xué)生成為一個有價值追求的合格建設(shè)者和接班人。第二，打造優(yōu)良學(xué)風(fēng)，提升質(zhì)量至上理念。加強學(xué)風(fēng)建設(shè)既是高校育人目標的客觀要求，也是培養(yǎng)基礎(chǔ)扎實、知識面寬、能力強、素質(zhì)高、富有創(chuàng)新精神的高素質(zhì)人才的重要環(huán)節(jié)。學(xué)風(fēng)建設(shè)這是一項各高校都非常重視的教育環(huán)節(jié)，各學(xué)校把抓學(xué)風(fēng)放在了教育學(xué)生的首位，只有堅持不懈地抓緊抓實，才能收到實效。學(xué)風(fēng)建設(shè)直接體現(xiàn)了高校學(xué)生的管理水平，對大學(xué)生的管理一定要培養(yǎng)他們的成才意識，方法要創(chuàng)新，目標上定位要準?？刹捎枚喾N形式的教育活動，利用主題班會、團日活動、講座、座談、研討等方式提高學(xué)生對學(xué)習(xí)的認識、態(tài)度，使學(xué)生養(yǎng)成踏實敬業(yè)，認真鉆研的學(xué)習(xí)精神，高校學(xué)生管理者只有通過這些有效的活動、科學(xué)規(guī)范的管理，才能提高學(xué)生的學(xué)習(xí)成績和綜合能力。高校學(xué)生管理者還要和任課教師積極主動配合，既可通過任課教師嚴抓課堂教學(xué)紀律、嚴格考勤和作業(yè)檢查，也可由高校管理者抽查，以此確保學(xué)校的教學(xué)秩序正常。并且要根據(jù)檢查結(jié)果，提出整改的措施和目標，對曠課、逃課的學(xué)生進行談話，重點分析他們?nèi)闭n的原因，適當?shù)臅r候還要進行心理輔導(dǎo)。尤其還要重點關(guān)注夜不歸宿、上網(wǎng)聊天、打游戲等荒廢學(xué)業(yè)的學(xué)生，建立和完善各項制度，還要定期與學(xué)生家長取得聯(lián)系，把學(xué)生中存在嚴重影響學(xué)習(xí)和健康的一些事及時告知家長，讓家長及時了解孩子，把家庭教育與學(xué)校教育有機結(jié)合起來，確保學(xué)生健康發(fā)展。第三，明確培養(yǎng)目標，樹立服務(wù)至上理念。教育、管理、服務(wù)作為高等學(xué)校育人的一種理念，已經(jīng)深深地滲透到學(xué)生成長成才的各個環(huán)節(jié)。傳統(tǒng)的學(xué)生工作管理已跟不上時代的潮流，已經(jīng)不能很好的為教育服務(wù)，這就要求學(xué)生工作的管理理念要創(chuàng)新，要緊跟時代的步伐。高校需對三者之間的目標定位要準確，要重新審視它的內(nèi)涵意義，這就要求學(xué)生管理工作者要轉(zhuǎn)變思想觀念，轉(zhuǎn)變工作思維，拓寬管理視野和服務(wù)質(zhì)量，自覺為學(xué)生成長成才，目標培養(yǎng)，確立服務(wù)至上的理念。學(xué)生管理必須從傳統(tǒng)的管理模式中解放出來，健全管理制度，改進工作方法，注重人性化管理，真正落實以生為本。在管理的內(nèi)涵中，要發(fā)揮人的主觀能動性，切實結(jié)合制度，聯(lián)系工作實際，倡導(dǎo)服務(wù)理念，在正面引導(dǎo)和反面懲誡方面，要發(fā)揮教育的能動作用，以教育為主，懲為輔。通過正面教育引導(dǎo)，激勵和鼓舞學(xué)生來激發(fā)學(xué)生成才的內(nèi)在動力，從而使學(xué)生明確什么是對的，什么是錯的，哪些事能做，哪些事不能做，規(guī)范自身行為，正確選擇適合自身發(fā)展的學(xué)習(xí)技巧和生活方式。三、高校學(xué)生管理工作在措施上的創(chuàng)新第一，構(gòu)建立德樹人理念，樹立全員育人意識。國家“兩個一百年”的目標確立和“中國夢”的宏偉藍圖的繪制，給高校教育提出了更高的要求。把立德樹人作為高等學(xué)校育人的新理念，給高等學(xué)校指明了方向，就是要培養(yǎng)有理想、有追求，志存高遠的社會主義建設(shè)者和接班人，既要有崇高的道德情操，還要有扎實的理論知識；既能心系祖國安危，又要熱愛社會事業(yè)，能真正落實好社會主義核心價值觀，把立德樹人放在首位。這要求學(xué)校育人不僅僅是教師或?qū)W生管理者，應(yīng)包括全體成員，這就涉及到方方面面。要樹立全員育人的大局意識，學(xué)生管理工作不僅是學(xué)生工作者的任務(wù)，也是全校教職員工的任務(wù)，要在全校教職工中樹立“全員育人”的思想理念，形成人人都關(guān)心學(xué)生，關(guān)愛學(xué)生，關(guān)心他們的成長，關(guān)注他們的發(fā)展，在高校中形成一種育人的氛圍。第二，凝聚學(xué)工管理隊伍，夯實學(xué)生管理水平。要使學(xué)生工作水平上臺階，必須強化這支隊伍的工作作風(fēng)和工作態(tài)度，使他們向職業(yè)化、專業(yè)化、專家化方向發(fā)展。職業(yè)化學(xué)生管理工作就是讓學(xué)工干部樹立終身職業(yè)理想，熱愛這個崗位，按照教育部的要求1：200配備專職輔導(dǎo)員，但各高校基本上還未達到這個比例，所以，基本就形成了“以專職為主體，以兼職為骨干”的學(xué)生工作隊伍。大多數(shù)學(xué)工干部缺乏專業(yè)的培訓(xùn)，因此專業(yè)化程度相對較低。所以，從人員編制、專業(yè)培訓(xùn)、職稱待遇等方面人手，主動關(guān)心學(xué)工隊伍的發(fā)展，在職稱評審時指標單列，在提拔干部時把做過學(xué)生工作作為重要指標參考，解決他們的后顧之憂，從而切實解決學(xué)生工作人員不安心的現(xiàn)狀。另外，學(xué)生工作隊伍要養(yǎng)成一種愛崗敬業(yè)，甘于奉獻的精神，既要潛心研究的學(xué)問，又要立志從事學(xué)生管理工作，做到理論聯(lián)系實際，努力向?qū)＜一较虬l(fā)展，使學(xué)生管理工作水平再上一個新臺階。第三，落實全面素質(zhì)教育，創(chuàng)新學(xué)生管理理念。學(xué)校的目標是培養(yǎng)德、智、體、美全面發(fā)展的社會主義建設(shè)者和接班人，所以大學(xué)生是祖國的未來和希望，提升他們的綜合能力就顯得更加重要，各高校要把實施學(xué)生素質(zhì)教育工程放在人才培養(yǎng)的首位，把培養(yǎng)創(chuàng)新精神和實踐能力作為培養(yǎng)學(xué)生的目標。教育和引導(dǎo)學(xué)生要積極參加素質(zhì)教育培訓(xùn)，形成自覺學(xué)習(xí)的良好氛圍，還要加強對全校師生員工的教育培訓(xùn)，讓全體人員參與到學(xué)生的素質(zhì)教育上來，做到一切為了學(xué)生，為了一切學(xué)生。另外，在素質(zhì)教育中要強化職業(yè)能力教育和職業(yè)生涯規(guī)劃，各年級要有不同的目標和側(cè)重點，新生進校時要抓好他們品德教育，要樹立遠大的理想，從一開始就要養(yǎng)成良好的學(xué)習(xí)態(tài)度和進取精神。大二、大三重點進行專業(yè)教育和業(yè)務(wù)能力培養(yǎng)，既要有扎實的理論基礎(chǔ)，還要有處理和應(yīng)對突發(fā)的困難和化解矛盾的能力，畢業(yè)前要對自己的職業(yè)理想、目標途徑、價值追求都要有一個總體規(guī)劃，在這些能力具備的基礎(chǔ)上還要創(chuàng)新。因此，無論條件多么艱苦，創(chuàng)造條件也要牢固確立“以生為本”的理念，把學(xué)生真正培養(yǎng)成為有理想、有目標、有追求的社會主義建設(shè)者和接班人。VB可視化程序設(shè)計基礎(chǔ)11、不為五斗米折腰。VB可視化程序設(shè)第2章VB可視化程序設(shè)計基礎(chǔ)

模擬計算器程序設(shè)計窗體基本的輸入/輸出控件命令按鈕VisualBasic程序設(shè)計語言基礎(chǔ)基本語句數(shù)組過程知識延伸——焦點12/9/20222第2章VB可視化程序設(shè)計基礎(chǔ)模擬計算器程序設(shè)計12/9/知識回顧通過一個文字移動的例子，講解VB功能特色集成開發(fā)環(huán)境可視化編程的基本概念（類和對象）可視化編程的基本步驟工程管理和程序調(diào)試提問：什么是類？什么是對象？提問：可視化程序設(shè)計的三種工作模式？提問：可視化程序設(shè)計編程的基本步驟。12/9/20223知識回顧通過一個文字移動的例子，講解提問：什么是類？什么是對本章目標熟悉窗體、標簽、文本框和命令按鈕的使用掌握VB的基本語法掌握三種控制語句掌握數(shù)組的定義和使用掌握過程的定義和使用能根據(jù)所學(xué)基礎(chǔ)知識開發(fā)簡單應(yīng)用程序12/9/20224本章目標熟悉窗體、標簽、文本框和命令按鈕的使用12/9/20引例二示例：模擬Windows附件中的計算器。

要求： 1.存在兩種運算模式：標準模式和科學(xué)模式。 2.在標準模式中進行簡單的加、減、乘、除操作。 3.在科學(xué)模式中還能進行sqr、exp、sin、cos操作。 4.同時在文本框上面顯示當前所處的模式。（查看代碼）12/9/20225引例二示例：模擬Windows附件中的計算器。（查看代碼）12.2窗體什么是窗體在程序設(shè)計時，窗體是設(shè)計的平臺在程序運行時，窗體是應(yīng)用程序與用戶交互的平臺窗體由系統(tǒng)菜單、標題欄、最小化和最大化按鈕、關(guān)閉按鈕組成系統(tǒng)菜單標題欄最小化按鈕最大化按鈕關(guān)閉按鈕12/9/202262.2窗體什么是窗體在程序設(shè)計時，窗體是設(shè)計的平臺窗體窗體—常用屬性(3-1)示例：模擬黑板。（單擊查看代碼）剛運行時單擊后雙擊后12/9/20227窗體—常用屬性(3-1)示例：模擬黑板。（單擊查看代碼）剛運NameBackColor和ForeColorBorderStyleHeight和WidthCaption用來指定窗體的名稱，在代碼中用來引用窗體用來指定窗體的背景顏色和前景顏色用來指定窗體的邊框樣式用來指定窗體的高度和寬度，單位：twip用來指定窗體的標題信息（單擊查看補充材料）12/9/20228Name用來指定窗體的名稱，在代碼中用來引用窗體用來指定窗體窗體—常用屬性(3-2)Left和TopStartUpPositionFontMaxButton和MinButtonWindowState指定窗體的左邊緣距離容器左邊緣的距離以及窗體頂端距離容器定頂端的距離，單位：twip用來指定窗體首次出現(xiàn)時的位置用來指定窗體上顯示文本的字體（是一個對象）指定窗體標題欄的最大化和最小化按鈕是否顯示指定窗體運行時的可見狀態(tài)0-手動1-所有者中心2-屏幕中心3-窗口缺省0-Normal1-Minimized2-Maximized當MaxButton和MinButton兩個屬性中的一個設(shè)置為False時會怎樣？兩個都設(shè)置為False時又會怎樣?方法一Form1.FontSize=20方法二Form1.Font.Size=2012/9/20229窗體—常用屬性(3-2)Left和Top指定窗體的左邊緣距窗體—常用屬性(3-3)VisibleEnabledAutoRedrawPicture用來指定窗體是否可見指定窗體運行時是否可響應(yīng)用戶或系統(tǒng)的操作用來實現(xiàn)窗體上輸出內(nèi)容的持久顯示如：當單擊窗體時，窗體是否能否調(diào)用窗體單擊事件過程即：當窗體由非激活狀態(tài)轉(zhuǎn)回到激活狀態(tài)時，仍然能夠顯示原來輸出的內(nèi)容用來設(shè)置窗體上顯示的圖形LoadPicture函數(shù)的使用Form1.Picture=LoadPicture("圖形文件路徑")（單擊查看補充材料）12/9/202210窗體—常用屬性(3-3)Visible用來指定窗體是否可見指窗體—事件Load（加載）事件窗體被裝入內(nèi)存工作區(qū)時觸發(fā)該事件通常用來在啟動程序時對屬性和變量進行初始化Click（單擊）事件鼠標單擊窗體時觸發(fā)DblClick（雙擊）事件鼠標雙擊窗體時觸發(fā)Resize事件當窗體第一次顯示或改變大小時觸發(fā)Resize事件使用。（單擊查看代碼）12/9/202211窗體—事件Load（加載）事件Resize事件使用。（單擊窗體—常用方法（2-1）Print用于在窗體上輸出數(shù)據(jù)格式[對象.]Print[{tab(n)|spc(n)][表達式列表][;|,]Cls清除運行時在窗體上顯示的文本和圖形不能清除設(shè)計階段窗體上的文本和圖形12/9/202212窗體—常用方法（2-1）Print12/9/202212窗體—常用方法（2-2）Show用于顯示一個窗體Hide用于暫時隱藏一個窗體，但窗體仍在內(nèi)存Move用于移動并改變窗體或控件的位置和大小格式[對象.]MoveLeft,[Top],[Width],[Height]12/9/202213窗體—常用方法（2-2）Show12/9/202213幾個練習(xí)例題示例：在Load事件中通過代碼為窗體和命令按鈕的屬性設(shè)置初始值。單擊按鈕實現(xiàn)窗體向屏幕右下角移動，同時實現(xiàn)用Print方法顯示窗體的當前位置。單擊窗體實現(xiàn)窗體恢復(fù)至登錄時的位置。（單擊查看代碼）示例：在窗體上顯示一個圖片，使圖片充滿整個窗體且在窗體大小發(fā)生變化的時，仍然是圖片充滿整個窗體（單擊查看代碼）（提示：需用Image控件）12/9/202214幾個練習(xí)例題示例：（單擊查看代碼）示例：（單擊查看代碼）（提2.3基本的輸入/輸出控件標簽用于顯示文本信息起提示作用在運行的時候用戶不能直接錄入信息文本框是一個文本編輯區(qū)域用于輸入、編輯、修改和顯示文本信息在運行的時候用戶可以直接錄入信息12/9/2022152.3基本的輸入/輸出控件標簽12/9/202215標簽—屬性（2-1）CaptionBorderStyleBackStyleAlignmentBackColor和ForeColor用標簽制作浮雕效果文字。（單擊查看代碼）用來設(shè)置標簽要顯示的內(nèi)容用來設(shè)置標簽有無邊框0-None標簽無邊框（默認）1-FixedSingle標簽有立體邊框用來設(shè)置標簽背景是否透明0-Transparent透明1-Opaque不透明（默認）用來設(shè)置標簽內(nèi)文本的水平對齊方式12/9/202216標簽—屬性（2-1）Caption用標簽制作浮雕效果文字。（標簽—屬性（2-2）AutoSize設(shè)置標簽是否可以自動調(diào)整水平大小以顯示所有內(nèi)容取值：True或FalseWordWrap設(shè)置標簽是否可以自動調(diào)整垂直大小以顯示內(nèi)容在AutoSize屬性取值為True時，WordWrap的取值才有效AutoSizeTrue：標簽控件寬度隨文本改變而改變，高度上只保存一行字的尺寸，不能換行False：標簽保持設(shè)計時的大小，如果內(nèi)容太長，則只能顯示一部分（默認值）WordWrapTrue：標簽保持水平大小不變，隨文本大小其垂直展開或縮短False：標簽保持一行文字的垂直大小，水平方向隨文本大小展開或縮短（默認值）12/9/202217標簽—屬性（2-2）AutoSizeAutoSizeWord標簽—事件ClickDblClick在實際應(yīng)用中，標簽一般只起到顯示文字和提示作用，因此一般不用編寫事件過程12/9/202218標簽—事件Click12/9/202218文本框控件用文本框制作一個登錄界面。窗體上有系統(tǒng)的標題窗體上有用戶名和密碼的輸入單擊“確定”按鈕，判斷輸入的用戶名和密碼是否正確如果正確，提示“歡迎光臨?。?！”如果不正確，提示“用戶名和密碼錯誤，請重新輸入！”同時，清空密碼文本框內(nèi)容，并把焦點放到用戶名文本框，讓用戶重新輸入單擊“取消”按鈕，退出程序的運行（單擊查看代碼）12/9/202219文本框控件用文本框制作一個登錄界面。（單擊查看代碼）12/9文本框—屬性（4-1）Text文本框沒有Caption屬性Text屬性設(shè)置顯示的文本信息對文本框中字符格式的設(shè)置將會影響文本框全部內(nèi)容，不能只對部分內(nèi)容設(shè)置格式MaxLength設(shè)置文本框允許輸入的最大字符數(shù)默認為0，表示無限制PassWordChar設(shè)置是否在文本框中顯示用戶鍵入的字符如PassWordChar不為空，文本框中顯示指定字符，但此時Text屬性值仍然為實際文本內(nèi)容；否則，文本框顯示實際輸入文本內(nèi)容。12/9/202220文本框—屬性（4-1）Text如PassWordChar不為文本框—屬性（4-2）SelStart、SelLength和SelText只能在運行時（即在代碼中）設(shè)置SelStart：選定文本的開始位置，第一個字符的位置是0SelLength：選定文本的長度SelText：選定文本的內(nèi)容當同時設(shè)置了SelStart和SelLength屬性后，被選中的內(nèi)容自動存入SelText屬性12/9/202221文本框—屬性（4-2）SelStart、SelLength和文本框—屬性（4-3）創(chuàng)建多行文本框： 默認情況下，文本框只顯示單行文本，無滾動條，不支持回車換行。MultiLine只能在設(shè)計時（即屬性窗口中）設(shè)置只有在ScrollBars為非零值時有效取值為True或FalseScrollBars只能在設(shè)計時（即屬性窗口中）設(shè)置設(shè)置文本框是否具有水平或垂直滾動條ScrollBars0-None無滾動條1-Horizontal只有水平滾動條2-Vertical只有垂直滾動條3-Both具有水平和垂直兩種滾動條12/9/202222文本框—屬性（4-3）創(chuàng)建多行文本框： 默認情況下，文本框只文本框—屬性（4-4）Enabled設(shè)置是否相應(yīng)用戶或系統(tǒng)的操作取值為True或FalseLocked設(shè)置文本框是否可以編輯取值為True或False兩者的區(qū)別？相同點：兩者都不允許用戶直接錄入內(nèi)容不同點：Locked為True時，可以接受焦點；Enabled為False時，不能接受焦點。12/9/202223文本框—屬性（4-4）Enabled12/9/202223屬性類型總結(jié)只能在設(shè)計階段設(shè)置的屬性MultiLine、ScrollBars只能在運行階段設(shè)置的屬性SelStart、SelLength、SelText可同時在運行和設(shè)計階段設(shè)置的屬性問題：設(shè)計階段選中某個控件，在屬性窗口中顯示該控件的所有屬性。12/9/202224屬性類型總結(jié)只能在設(shè)計階段設(shè)置的屬性問題：設(shè)計階段選中某個控練習(xí)例題示例：文本信息的復(fù)制建立4個文本框，其中兩個文本框允許多行輸入，兩個文本框不允許多行輸入第一個文本框（源文本框），只有垂直滾動條，且初始化一段文本信息第二個文本框（目標文本框），具有水平和垂直兩種滾動條，且文本為空第三個文本框用來輸入要復(fù)制文本的起始位置第四個文本框用來輸入要復(fù)制文本的長度單擊“確認”按鈕，根據(jù)輸入的要復(fù)制文本的起始位置和長度，把對應(yīng)的源文本框的相應(yīng)信息放到目標文本框中顯示（單擊查看代碼）12/9/202225練習(xí)例題示例：文本信息的復(fù)制（單擊查看代碼）12/9/202文本框—事件Click和DblClickChange在改變文本框的Text屬性時觸發(fā)該事件問題：如果有Text1_Change事件過程，運行時用戶在文本框中輸入“Change”，會觸發(fā)幾次Text1_Change事件過程？LostFocus當文本框失去焦點時觸發(fā)GotFocus當文本框獲得焦點時觸發(fā)6次12/9/202226文本框—事件Click和DblClick6次12/9/202練習(xí)例題示例：要求輸入合法數(shù)字數(shù)據(jù)。在第一個文本框輸入信息，當輸入結(jié)束時，判斷數(shù)據(jù)是否有效對于輸入正確的數(shù)據(jù)，在第二個文本框中顯示“正確??！”對于輸入錯誤的數(shù)據(jù)，則顯示錯誤信息，并清除第一個文本框中輸入的信息，使焦點重新回到文本框提示：判斷是否為數(shù)字，使用函數(shù)IsNumeric(參數(shù))（單擊查看代碼）12/9/202227練習(xí)例題示例：要求輸入合法數(shù)字數(shù)據(jù)。（單擊查看代碼）12/92.4命令按鈕Caption設(shè)置命令按鈕上顯示的文本信息可以設(shè)置對應(yīng)按鈕的熱鍵：輸入Caption屬性時，在要設(shè)置為熱鍵的字母前加“&”，則該字母顯示時有下劃線示例：建立一個允許剪切、復(fù)制和粘貼的簡單編輯程序，如下圖所示。（單擊查看代碼）12/9/2022282.4命令按鈕Caption示例：建立一個允許剪切、復(fù)制和命令按鈕—屬性（2-1）Picture設(shè)置命令按鈕中要顯示的圖形必須在Style屬性設(shè)置為1-Graphical時有效Style設(shè)置命令按鈕的顯示類型0-Standard：標準類型，只能顯示文本信息，不能顯示圖形和背景顏色1-Graphical：圖形類型，不僅可以顯示文本信息，還可以顯示圖形和背景顏色ToolTipText在運行時，在鼠標停留時顯示的提示文本信息12/9/202229命令按鈕—屬性（2-1）Picture12/9/202229命令按鈕—屬性（2-2）Value

設(shè)計階段無效，只能在運行時獲取或設(shè)置用于檢查或設(shè)置按鈕當前是否被按下True：按下 False：未按下Default設(shè)置窗體中的某個命令按鈕為缺省按鈕當按Enter鍵時，相當于單擊該按鈕Cancel設(shè)置窗體中的某個命令按鈕為取消按鈕當按Esc鍵時，相當于單擊該按鈕在同一窗體中，只能有一個命令按鈕的Default屬性為True，也只能有一個按鈕的Cancel屬性為True。12/9/202230命令按鈕—屬性（2-2）Value在同一窗體中，只能有一個命命令按鈕—事件Click按鈕沒有DblClick事件12/9/202231命令按鈕—事件Click12/9/2022312.5VB程序設(shè)計語言基礎(chǔ)編碼規(guī)則數(shù)據(jù)類型變量和常量運算符和表達式常用函數(shù)12/9/2022322.5VB程序設(shè)計語言基礎(chǔ)編碼規(guī)則12/9/202232編碼規(guī)則VB代碼不區(qū)分字母的大小寫語句書寫自由在同一行可以書寫多條語句，語句間用冒號“:”分隔一條語句可以分若干行書寫，此時在后面添加續(xù)行符（一個空格后面跟一個下劃線）一行允許多達255個字符注釋有利于程序的維護和調(diào)試Rem：作為一個單獨的語句出現(xiàn)撇號“‘”：可以直接出現(xiàn)在語句的后面12/9/202233編碼規(guī)則VB代碼不區(qū)分字母的大小寫12/9/202233數(shù)據(jù)類型標準數(shù)據(jù)類型數(shù)值型（Numeric）邏輯型（Boolean）日期型（Date）字符型（String）可變型（Variant）對象型（Object）用戶自定義類型標準數(shù)據(jù)類型12/9/202234數(shù)據(jù)類型標準數(shù)據(jù)類型標準數(shù)據(jù)類型12/9/202234標準數(shù)據(jù)類型（4-1）數(shù)值類型字節(jié)型（Byte）整型（Integer）：類型符為%長整型（Long）：類型符為&單精度型（Single）：類型符為!雙精度型（Double）：類型符為#貨幣型（Currency）：類型符為 定點實數(shù)，最多保留小數(shù)點右邊4位和小數(shù)點左邊15位12/9/202235標準數(shù)據(jù)類型（4-1）數(shù)值類型12/9/202235標準數(shù)據(jù)類型（4-2）邏輯型（Boolean）只有兩個值：True、False可以和數(shù)值互換

True：-1（非零值） False：0例如：(1+2)AndTrue？ TrueXorNot10？字符型（String）雙引號是字符串的界定符VB用兩個字節(jié)表示一個字符（包括西文字符和中文字符）采用的是Unicode字符集分為定長字符串和不定長字符串如："可視化程序設(shè)計VisualBasic"3或True10或True長度：1912/9/202236標準數(shù)據(jù)類型（4-2）邏輯型（Boolean）3或True1標準數(shù)據(jù)類型（4-3）日期型（Date）日期范圍：從公元100年1月1日到9999年12月31日時間范圍：從0:00:00到23:59:59

用“#”把日期括起來 如：#September26,2004#,#9/26/2004#, #2004-9-2610:20:30am#用數(shù)字序列表示 小數(shù)點左邊：日期；小數(shù)點右邊：時間 參照時間：1899年12月31日0:00:00 如：DimTAsDate:T=-2.5:PrintT?補充材料：國際化代碼1899年12月28日12:00:0012/9/202237標準數(shù)據(jù)類型（4-3）日期型（Date）補充材料：國際化代碼標準數(shù)據(jù)類型（4-4）變體類型（Variant）一種特殊的數(shù)據(jù)類型

是所有未定義變量的數(shù)據(jù)類型對數(shù)據(jù)的處理取決于上下文的需要例如：DimaAsVarianta=10% 'a此時是整型a=“VB” 'a此時是字符型a=True 'a此時是布爾類型12/9/202238標準數(shù)據(jù)類型（4-4）變體類型（Variant）12/9/2自定義類型是由用戶自己定義的數(shù)據(jù)類型，它由若干個標準數(shù)據(jù)類型組成。定義語句格式

[Private|Public]Type類型名 元素名As數(shù)據(jù)類型 元素名As數(shù)據(jù)類型 ……EndType例如TypeStudent NumberAsInteger NameAsString*6 AgeAsInteger BirthdayAsDate SexAsBooleanEndType12/9/202239自定義類型是由用戶自己定義的數(shù)據(jù)類型，它由若干個標準數(shù)據(jù)類型變量與常量常量在程序執(zhí)行過程中保持不變的數(shù)據(jù)文字常量

如：3.14 20% True “VB”符號常量：用標示符表示一個固定Const常量名[As數(shù)據(jù)類型]=表達式通常常量名的所有字母都大寫如：ConstPIAsDouble=3.1415926系統(tǒng)常量：VB系統(tǒng)提供的符號常量如：vbMinimized（最小化）12/9/202240變量與常量常量12/9/202240變量與常量變量在程序運行過程中其值可以發(fā)生改變的量每一個變量都有名字和數(shù)據(jù)類型變量名用來唯一地標志每一個變量數(shù)據(jù)類型表明了該變量的類型變量的聲明顯示聲明隱式聲明（初學(xué)者最好不要使用隱式聲明）Public|Dim|Static|Private變量名As數(shù)據(jù)類型[,變量名As數(shù)據(jù)類型…]Public|Dim|Static|Private變量名<類型符>[,變量名<類型符>…]例如：DimintAAsInteger,intB%

隱式聲明：不顯式聲明變量而直接使用此時變量被默認為Variant數(shù)據(jù)類型12/9/202241變量與常量變量Public|Dim|Static|變量變量的命名規(guī)則必須以字母或漢字開頭由字母、漢字、數(shù)字和下劃線組成長度小于或等于255個字符不能使用VB中的關(guān)鍵字VB中不區(qū)分變量名的大小寫

如：MyName,myname,myName是同一個變量變量名由多個單詞組成時，建議每個單詞的第一個字母大寫，其余字母小寫變量的作用域單擊窗體時，輸出單擊的次數(shù)（查看代碼）12/9/202242變量變量的命名規(guī)則變量的作用域單擊窗體時，輸出單擊的次數(shù)（查運算符算術(shù)運算符/（浮點除） \（整除）%（取余）關(guān)系運算符兩個漢字用拼音進行比較漢字字符大于西文字符邏輯運算符Not And Or或Xor Eqv Imp字符運算符+ &優(yōu)先級（重點）算術(shù)運算符>字符運算符>關(guān)系運算符>邏輯運算符/（浮點除）：同數(shù)學(xué)的除法，結(jié)果可以是小數(shù)\（整除）：對兩數(shù)進行除法運算后取商的整數(shù)部分。若參與運算的兩個數(shù)都是整數(shù)，則可直接進行運算。若參與運算的兩個數(shù)中有實數(shù)，則先將實數(shù)的小數(shù)部分進行四舍五入，再進行運算。%（取余）：對兩數(shù)進行除法運算后取商的余數(shù)部分。參與運算的兩個數(shù)的處理同整除運算。例如：16.5\3=5

字符串只有連接運算

區(qū)別 +：兩邊必須是字符串&：兩邊不一定是字符串，但必須有空格例如

"abcdef"&12345'結(jié)果為"abcdef12345“"abcdef"+12345'出錯"123"&456'結(jié)果為"123456""123"+456'結(jié)果為579 "123"+"456“'結(jié)果為123456注意："123"+True=12212/9/202243運算符算術(shù)運算符/（浮點除）：同數(shù)學(xué)的除法，結(jié)果可以是小數(shù)表達式什么是表達式？

由常量、變量、函數(shù)、運算符以及括號連接起來的有意義的式子稱為表達式。書寫規(guī)則運算符不能相鄰。例a+-b是錯誤的。乘號不能省略。例x乘以y應(yīng)寫成：x*y。括號必須成對出現(xiàn)，均使用圓括號。從左到右在同一基準上書寫，無高低、大小。能用系統(tǒng)函數(shù)的地方盡量使用系統(tǒng)函數(shù)。12/9/202244表達式什么是表達式？12/9/202244幾個練習(xí)例題用人單位招聘秘書：年齡小于40歲的女性，學(xué)歷?？苹虮究颇挲g學(xué)歷And本科?？芆r招聘條件(學(xué)歷=“?？啤監(jiān)r學(xué)歷=“本科”)And年齡<40And性別=“女”算術(shù)表達式x大于等于3，并且小于等于73<=xAndx<=7性別12/9/202245幾個練習(xí)例題用人單位招聘秘書：年齡小于40歲的女性，學(xué)歷?？瞥Ｓ煤瘮?shù)函數(shù)類型

內(nèi)部函數(shù)用戶自定義函數(shù)內(nèi)部函數(shù)（標準函數(shù)）數(shù)學(xué)函數(shù)字符串函數(shù)轉(zhuǎn)換函數(shù)時間/日期函數(shù)隨機函數(shù)格式輸出函數(shù)函數(shù)調(diào)用方法

函數(shù)名([參數(shù)表])12/9/202246常用函數(shù)函數(shù)類型12/9/202246數(shù)學(xué)函數(shù)Abs(x)函數(shù)：求x的絕對值，x為數(shù)值型參數(shù)Exp(x)函數(shù)：求ex的值Log(x)函數(shù)：求x的自然對數(shù)，返回lnx的值，且x>0Sgn(x)函數(shù)：求x的符號值（符號函數(shù)）Sqr(x)函數(shù)：求x的算術(shù)平方根，x≧0Int(x)和Fix(x)函數(shù)：均為取整運算（但有區(qū)別）隨機函數(shù)Rnd()三角函數(shù)12/9/202247數(shù)學(xué)函數(shù)Abs(x)函數(shù)：求x的絕對值，x為數(shù)值型參數(shù)12/Int和Fix函數(shù)的區(qū)別共同點均刪除參數(shù)的小數(shù)部分，返回整數(shù)部分取整時均不進行四舍五入當參數(shù)為正數(shù)時，兩者功能相同區(qū)別當參數(shù)為負數(shù)時Int返回小于或等于參數(shù)的第一個負整數(shù)Fix返回大于或等于參數(shù)的第一個負整數(shù)例題（單擊查看代碼）（單擊查看補充資料）12/9/202248Int和Fix函數(shù)的區(qū)別共同點例題（單擊查看代碼）（單擊查看隨機函數(shù)用來產(chǎn)生隨機數(shù).形式Rnd[（x）]：返回一個單精度的隨機數(shù)取值范圍：0<=Rnd<1 [0，1)RandomizeRandomize[（x）]產(chǎn)生隨機數(shù)的種子，保證每次運行產(chǎn)生不同的隨機數(shù)求某個必區(qū)間[下界，上界]的隨機整數(shù)

公式：Int((上界－

下界+1)×Rnd())+下界

產(chǎn)生在區(qū)間[1，6]上的隨機整數(shù)（查看代碼）12/9/202249隨機函數(shù)用來產(chǎn)生隨機數(shù).產(chǎn)生在區(qū)間[1，6]上的隨機整數(shù)（查轉(zhuǎn)換函數(shù)Asc(c)函數(shù)：將字符c轉(zhuǎn)換成ASCII碼值Chr(n)函數(shù)：將ASCII碼值轉(zhuǎn)換成字符LCase(c)函數(shù)：將字符串c中的大寫字母轉(zhuǎn)換為小寫字母UCase(c)函數(shù)：將字符串c中的小寫字母轉(zhuǎn)換為大寫字母Str(n)函數(shù)：將數(shù)值n轉(zhuǎn)換成字符串Val(c)函數(shù)：將數(shù)字字符轉(zhuǎn)換成數(shù)值Str（）函數(shù)將非負數(shù)值轉(zhuǎn)化成字符類型后，會在轉(zhuǎn)換后的字符串左邊增加空格，即數(shù)值的符號位。CStr$()：不加符號位。

Val（）將數(shù)字字符串轉(zhuǎn)化為數(shù)值類型，當字符串中出現(xiàn)數(shù)值類型規(guī)定的字符外的字符時，則停止轉(zhuǎn)換。12/9/202250轉(zhuǎn)換函數(shù)Asc(c)函數(shù)：將字符c轉(zhuǎn)換成ASCII碼值St字符串函數(shù)Len(c)函數(shù)：求字符串c的長度Left(c,n)和Right(c,n)：返回字符串c左(右)邊的n個字符Mid(c,n1,n2)函數(shù)：自字符串c的第n1個字符開始向右取n2個連續(xù)的字符。LTrim(c)、RTrim(c)和Trim(c)函數(shù)：去掉字符串c左邊、右邊、左右兩邊的空格String(n,c)函數(shù)：返回字符串c的首字符組成的n個字符的字符串。InStr([n1,]c1,c2)函數(shù)：在字符串c1中從第n1個字符開始查找字符串c2，若找到返回位置值；若找不到，則返回0Space(n)函數(shù)：產(chǎn)生由n個空格組成的字符串12/9/202251字符串函數(shù)Len(c)函數(shù)：求字符串c的長度12/9/202時間/日期函數(shù)Time()或者Time函數(shù)：返回系統(tǒng)時間Date()或者Date函數(shù)：返回系統(tǒng)日期Year(d)函數(shù)：返回參數(shù)d的年號d為日期類型參數(shù)Month(d)函數(shù)：返回參數(shù)d的月份號Day(d)函數(shù)：返回參數(shù)d的日期號WeekDay(d)：返回參數(shù)d的星期號Now函數(shù)：返回系統(tǒng)的日期和時間12/9/202252時間/日期函數(shù)Time()或者Time函數(shù)：返回系統(tǒng)時間12格式輸出函數(shù)格式：Format(<表達式>，<格式字符串>)功能：按格式字符串指定的格式輸出表達式的值。說明：表達式可以是數(shù)值型、字符型、日期型數(shù)據(jù)。示例：運行下面代碼查看結(jié)果（單擊查看代碼）PrivateSubForm_Click() PrintFormat(2.71828,“#####.##")PrintFormat(2.71828,”00000.00”)PrintFormat(Date,"dddddd")PrintFormat(time,“ttttt”)EndSub（單擊查看代補充資料）12/9/202253格式輸出函數(shù)格式：Format(<表達式>，<格式字符串>Shell函數(shù)負責(zé)執(zhí)行一個可執(zhí)行文件。形式：Shell(命令字符串[，窗口類型])命令字符串：要執(zhí)行的應(yīng)用程序名，包括路徑，且必須是可執(zhí)行文件（擴展名為exe、com、bat）窗口類型：執(zhí)行應(yīng)用程序的窗口大小。返回一個Variant。

如果成功，代表這個程序的進程ID； 若不成功，則會返回0。12/9/202254Shell函數(shù)負責(zé)執(zhí)行一個可執(zhí)行文件。12/9/202254Shell函數(shù)示例i=Shell("c:\windows\calc.exe")j=Shell("c:\command",1)提示：如果不知道應(yīng)用程序的路徑名，可用Start命令啟動程序：i=Shell(start&"calc.exe")；i=Shell(start&"vb6.exe")12/9/202255Shell函數(shù)示例i=Shell("c:\windows常見錯誤邏輯表達式書寫錯，在VB沒有造成語法錯而形成邏輯錯例如，數(shù)學(xué)表達式3≤x＜10

VB表達式寫為

3<=x<10。問題在于VB中的邏輯量與數(shù)值量可相互轉(zhuǎn)換。同時給多個變量賦值，在VB沒有造成語法錯而形成邏輯錯例如：Dimx%，y%，z%:x=y=z=1標準函數(shù)名寫錯變量名寫錯檢查方法：在通用聲明段加OptionExplicit語句書寫位置錯在通用聲明段只能有Dim語句，不能有賦值等其他語句12/9/202256常見錯誤邏輯表達式書寫錯，在VB沒有造成語法錯而形成邏輯錯12.6基本語句順序結(jié)構(gòu)選擇結(jié)構(gòu)循環(huán)結(jié)構(gòu)其他輔助控制語句Exit語句Goto語句12/9/2022572.6基本語句順序結(jié)構(gòu)12/9/202257順序結(jié)構(gòu)—賦值語句格式[Let]變量名=表達式 將表達式的值賦值給變量名[Let][對象名.]屬性名=表達式 將表達式的值賦值給對象的屬性說明表達式可以是任何類型，一般應(yīng)與變量名的類型一致賦值號左邊只能是變量或?qū)ο髮傩?，不能是常量常?shù)符號或表達式不能在同一個賦值語句中，同時給多個變量賦值 例如：x=y=z=1交換A、B兩個值（單擊查看代碼）12/9/202258順序結(jié)構(gòu)—賦值語句格式交換A、B兩個值（單擊查看代碼）12/順序結(jié)構(gòu)—InputBox函數(shù)（2-1）功能只需一行即可實現(xiàn)輸入窗體的功能產(chǎn)生一個對話框，作為輸入數(shù)據(jù)的界面，等待用戶輸入并返回所輸入的內(nèi)容。格式

InputBox$(prompt$,[title$],[default$],[xpos],[ypos])說明prompt：提示信息，最大長度為1024個字符title：對話框標題，默認為當前工程的名稱default：輸入?yún)^(qū)中缺省顯示信息，默認為空串函數(shù)返回值是字符串類型12/9/202259順序結(jié)構(gòu)—InputBox函數(shù)（2-1）功能12/9/202順序結(jié)構(gòu)—InputBox函數(shù)（2-2）顯示如下圖所示的對話框。語句表示為：DimstrNameAsStringstrName=InputBox("請輸入你的姓名"+vbCrLf+"然后單擊確定","輸入框")使用InputBox函數(shù)一次只能輸入一個數(shù)據(jù).12/9/202260順序結(jié)構(gòu)—InputBox函數(shù)（2-2）顯示如下圖所示的對話順序結(jié)構(gòu)—MsgBox函數(shù)（2-1）格式

函數(shù)形式：MsgBox%(prompt$,[buttons],[title])過程形式：MsgBoxprompt,[buttons],[title]功能

在屏幕上顯示諸如提示、詢問、警告或錯誤等消息，對用戶的操作作出提醒或反饋。通過用戶在對話框中選擇的按鈕識別用戶所做的響應(yīng)，作為程序繼續(xù)執(zhí)行的依據(jù)。說明Prompt和title同InputBox函數(shù)buttons：數(shù)值表達式，用來控制在對話框內(nèi)顯示的按鈕種類和數(shù)量以及圖標類型。（由四類數(shù)值相加產(chǎn)生）函數(shù)返回值是整數(shù)類型12/9/202261順序結(jié)構(gòu)—MsgBox函數(shù)（2-1）格式12/9/20226順序結(jié)構(gòu)—MsgBox函數(shù)（2-2）Button參數(shù)建立一個退出對話框，對退出再次確認。（查看代碼）12/9/202262順序結(jié)構(gòu)—MsgBox函數(shù)（2-2）Button參數(shù)建立一個練習(xí)例題修改文本框章節(jié)中的登錄界面。如果用戶名和密碼正確，彈出對話框，提示“歡迎光臨?。。　比绻徽_，彈出對話框，提示“用戶名和密碼錯誤，是否重新輸入？”如果選擇是，清空密碼文本框內(nèi)容，并把焦點放到用戶名文本框，讓用戶重新輸入；如果選擇否，推出應(yīng)用程序的執(zhí)行注意：學(xué)生的用戶名一般輸入的是學(xué)號，而學(xué)號全部是數(shù)字字符。在進行有效性檢查時也用對話框提示錯誤信息（單擊查看代碼）12/9/202263練習(xí)例題修改文本框章節(jié)中的登錄界面。（單擊查看代碼）12/9命名參數(shù)的使用注意 InputBox()、MsgBox()中的參數(shù)必須按語法要求規(guī)定的順序提供數(shù)值， 默認部分也要用逗號占位符跳過。引入“命名參數(shù)”

命名參數(shù)可用“:=”以任意順序賦值

prompt：提示 buttons：按鈕 title：標題 default：默認 xPos：x坐標 yPos：y坐標例如：InputBox("請輸入您的學(xué)號","學(xué)生成績查詢系統(tǒng)") InputBox(Title:="學(xué)生成績查詢系統(tǒng)",prompt:="請輸入您的學(xué)號")MsgBox("登錄成功",vbOKOnly+vbInformation,"成功登錄頁面") MsgBox(Title:="成功登錄頁面",buttons:=vbOKOnly+vbInformation,prompt:="登錄成功")12/9/202264命名參數(shù)的使用注意12/9/202264順序結(jié)構(gòu)—Print方法語法 [對象名稱.]Print[tab(n)|spc(n)][表達式列表][;|,]功能

在指定對象上輸出表達式的值說明對象可以是窗體、圖形框和打印機Tab(n)：表示在參數(shù)n指定的位置輸出表達式的值Spc(n)：表示跳過n個空格Print方法在Form_Load事件過程中不起作用。如果要在該事件中顯示數(shù)據(jù)，必須在該過程中加上Form1.Show方法或把AutoRedraw設(shè)置為True.12/9/202265順序結(jié)構(gòu)—Print方法語法Print方法在Form_Loa幾個練習(xí)例題顯示下圖所示的圖形。用Print方法輸出圖形。改變（單擊查看代碼）（單擊查看代碼）Fori=1To5PrintTab(i);String(6-i,"▼");Spc(6);String(i,"▲")Nexti若把程序中的Spc(6)換成Tab(6)會怎樣？;Tab(6);12/9/202266幾個練習(xí)例題顯示下圖所示的圖形。用Print方法輸出圖形。改選擇結(jié)構(gòu)特點：根據(jù)所給定條件的真假，選擇不同的語句。兩種類型If語句SelectCase語句12/9/202267選擇結(jié)構(gòu)特點：根據(jù)所給定條件的真假，選擇不同的語句。12/9If語句（4-1）單分支結(jié)構(gòu)If<表達式>Then語句塊EndIf或If<表達式>Then<語句表達式語句塊TF例如：已知兩個數(shù)x和y，比較兩個數(shù)的大小，使x大于yIfx<yThent=x:x=y:y=tEndIf或Ifx<yThent=x:x=y:y=t12/9/202268If語句（4-1）單分支結(jié)構(gòu)表達式語句塊TF例如：已知兩個數(shù)If語句（4-2）雙分支結(jié)構(gòu)If<表達式>Then語句塊1Else 語句塊2EndIf或If<表達式>Then<語句塊1>Else<語句塊2>表達式語句塊1TF語句塊2計算分段函數(shù)單分支結(jié)構(gòu)實現(xiàn)：y=cos(x)－x^3+3*xIfx<>0Theny=sin(x)+sqr(x*x+1)

雙分支結(jié)構(gòu)實現(xiàn)：

Ifx<>0Theny=sin(x)+sqr(x*x+1)Elsey=cos(x)－x^3+3*xEndIf12/9/202269If語句（4-2）雙分支結(jié)構(gòu)表達式語句塊1TF語句塊2計算分If語句（4-3）多分支語句

If<表達式1>Then <語句塊1>

ElseIf<表達式2>Then <語句塊2> … [Else

語句塊n+1]

EndIf求一元二次方程ax2+bx+c=0的根。（查看代碼）12/9/202270If語句（4-3）多分支語句求一元二次方程ax2+bx+c=If語句的嵌套If語句的嵌套是指If或Else后面的語句塊中又包含If語句。形如： If<表達式1>Then

If<表達式11>Then … EndIf

… EndIf示例：已知x,y,z三個數(shù)，使得x>y>z。要求：用一個If語句和一個If嵌套實現(xiàn)。

Ifx<yThent=x:x=y:y=t

Ify<zThent=y:y=z:z=tIfx<yThent=x:x=y:y=tEndIf

EndIfIf語句（4-4）12/9/202271If語句的嵌套示例：已知x,y,z三個數(shù)，Ifx幾個練習(xí)例題示例：已知變量strC中存放了一個字符，判斷該字符是字母字符、數(shù)字字符還是其他字符。IfUcase(strC)>="A"AndUcase(strC)<="Z"Then PrintstrC+"是字母字符"ElseIfstrC>="0"AndstrC<="9"Then PrintstrC+"是數(shù)字字符"Else PrintstrC+"其他字符"EndIf12/9/202272幾個練習(xí)例題示例：已知變量strC中存放了一個字符，判斷該字示例：已知百分制成績mark，顯示對應(yīng)的五級制成績哪些正確，哪些錯誤？√√（返回常見錯誤）12/9/202273示例：已知百分制成績mark，顯示對應(yīng)的五級制成√√（返回常SelectCase語句格式SelectCase變量或表達式 Case表達式列表1 語句塊1 Case表達式列表2 語句塊2 … [CaseElse

語句塊n+1]EndSelect數(shù)值型或字符串表達式<表達式列表>：與<變量或表達式>同類型的下面四種形式之一：表達式 例:"A"一組枚舉表達式(用逗號分隔) 例:2,4,6,8

表達式1To表達式2 例:60To100

Is關(guān)系運算符表達式 例:Is<6012/9/202274SelectCase語句格式數(shù)值型或字符串表達式<表達式列幾個練習(xí)例題SelectCasestrC Case"a"To"z"，"A"To"Z" PrintstrC+"是字母字符" Case"0"To"9" PrintstrC+"是數(shù)字字符" CaseElse PrintstrC+"其他字符"EndSelect示例：已知變量strC中存放了一個字符，判斷該字符是字母字符、數(shù)字字符還是其他字符。示例：判斷成績等級。SelectCasescoreCase90To100Print"優(yōu)"Case80To89Print"良"Case70To79Print"中"Case60To69Print"及格"CaseElsePrint"不及格"EndSelect制作簡單的計算器。在三個文本框中分別輸入兩個操作數(shù)和一個運算符。單擊“計算”按鈕，根據(jù)輸入的運算符進行相應(yīng)計算，并把結(jié)果寫入第四個文本框。單擊“清除”按鈕，清空四個文本框。單擊“退出”按鈕，結(jié)束應(yīng)用程序的執(zhí)行。（單擊查看代碼）12/9/202275幾個練習(xí)例題SelectCasestrC示例：已知變量題：已知坐標點(x,y)，判斷其落在哪個象限內(nèi)方法一

Ifx>0Andy>0ThenPrint"在第一象限"

ElseIfx<0Andy>0ThenPrint"在第二象限"

ElseIfx<0Andy<0ThenPrint"在第三象限"

ElseIfx>0Andy<0ThenPrint"在第四象限"

EndIf

方法二SelectCasex,yCasex>0Andy>0 Print"在第一象限"Casex<0Andy>0 Print"在第二象限"Casex<0Andy<0 Print"在第三象限"Casex>0Andy<0 Print"在第四象限"EndSelect上面兩段代碼，哪個能實現(xiàn)，哪個不能實現(xiàn)？√

SelectCase后不能出現(xiàn)多個變量；Case后不能出現(xiàn)變量及有關(guān)運算符。（返回常見錯誤）12/9/202276題：已知坐標點(x,y)，判斷其落在哪個象限內(nèi)條件函數(shù)IIf函數(shù)

格式：Iif(<條件>,<條件為True時的值>,<條件為False是的值>)例如：求x,y的最大值max=IIf（x>y，x，y）Switch函數(shù)

格式：Switch（條件表達式1，條件表達式1為True時的值[，條件表達式2，條件表達式2為True時的值……]）例如：學(xué)生成績等級Switch(grade>=90,“優(yōu)秀”,grade>=80,“良好”，grade>=70,“中等”,grade>=60,“及格”,grade<=60,“不及格”)Choose函數(shù)格式：Choose（數(shù)字類型變量，值為1的返回值，值為2的返回值……）例如：Op=Choose（Nop，"+"，"-"，"×"，"÷"）12/9/202277條件函數(shù)IIf函數(shù)12/9/202277常見錯誤在選擇結(jié)構(gòu)中缺少配對的結(jié)束語句對多行式的If塊語句中，應(yīng)有配對的EndIf語句結(jié)束。多分支選擇ElseIf關(guān)鍵字的書寫和條件表達式的表示ElseIf不要寫成ElseIf；多個條件表達式次序問題，見示例。SelectCase語句的使用SelectCase后不能出現(xiàn)多個變量；Case子句后不能出現(xiàn)變量，見示例。12/9/202278常見錯誤在選擇結(jié)構(gòu)中缺少配對的結(jié)束語句12/9/202278循環(huán)結(jié)構(gòu)指對同一程序段執(zhí)行若干次，被重復(fù)執(zhí)行的語句塊成為循環(huán)體。For/Next循環(huán)Do/Loop循環(huán)While/Wend循環(huán)12/9/202279循環(huán)結(jié)構(gòu)指對同一程序段執(zhí)行若干次，被重復(fù)執(zhí)行的語句塊成為循環(huán)For/Next循環(huán)計數(shù)循環(huán)語句，用于控制循環(huán)次數(shù)預(yù)知的循環(huán)格式：

For<循環(huán)變量>=<初值>to<終值>[Step<步長>]

<語句塊>[ExitFor]<語句塊>Next[<循環(huán)變量>]循環(huán)變量賦初值循環(huán)變量<=終值語句塊語句塊循環(huán)變量加步長TExitFor·F有無計算1到100的奇數(shù)和Dimi%,ss=0Fori=1To100step2s=s+iNexti12/9/202280For/Next循環(huán)計數(shù)循環(huán)語句，用于控制循環(huán)次數(shù)預(yù)知的循環(huán)步長循環(huán)次數(shù)=注意出了循環(huán)，循環(huán)控制變量值的問題。允許循環(huán)變量在循環(huán)體內(nèi)被賦值，但這樣會影響原來的循環(huán)控制規(guī)律。ExitFor：強制退出循環(huán)步長=1可省略Fori=2To13Step3循環(huán)執(zhí)行次數(shù)Printi, 輸出i的值分別為:Nexti 25811Print“I=“,i 出了循環(huán)輸出為:I=1412/9/202281步長步長=1可省略Fori=2To13St練習(xí)例題求最大最小值問題要求：隨機產(chǎn)生10個[100，200]之間的整數(shù)輸出，并求最大值。如圖所示Max=100Fori=1To10x=Int(Rnd*101+100):Printx,

Ifx>MaxThenMax=xNextiPrint"最大值=";Max12/9/202282練習(xí)例題求最大最小值問題Max=10012/9/2022Do/Loop循環(huán)形式1：前測試循環(huán)

Do{While|Until}<條件>語句塊[ExitDo語句塊]Loop形式2：后測試循環(huán)Do語句塊[ExitDo語句塊]Loop{While|Until}<條件>12/9/202283Do/Loop循環(huán)形式1：前測試循環(huán)練習(xí)例題