




下载本文档
版权说明:本文档由用户提供并上传,收益归属内容提供方,若内容存在侵权,请进行举报或认领
文档简介
1、第2章1.新建工程,在窗体上创建两个命令按钮Command1、Command2,个标签 Labell,界面如图2-5所示,程序运行要求如下:1) 单击“改变颜色”按钮,标签上的文字内容改为“颜色已经改变”,文字颜色改为红色。 “改变颜色”按钮代码:Labell.ForeColor = vbRed慌敢??灡楴湯?尠颜色已经改变2) 单击“改变字体”按钮,标签上的字体改为“黑体”。“改变字体”按钮代码:慌敢??湯乴浡??黑体-ini "J汁痒柿睜g咲图2-5程序运行界面最后将工程文件、窗体文件分别以 lx2-2.vbp、lx2-2.frm为文件名保存在 D:EX文件夹下。2. 设计一个留
2、言薄。新建一个工程,在窗体上创建 2个标签,2个文本框,1个命令按钮,属性 设置如图2-6所示,。要求单击“提交”按钮后,上面的文本框内容复制到下面的文本框中,且 下面文本框中的内容不能修改。单击“清除"按钮则清除两个文本框中的内容。“提交”按钮代码:Text2.Text = Text1.Text“清除”按钮代码:Text1.Text = Text2.Text = IE $鈞冷-晁瓦尿1述码TI71雷京淸眸图2-6程序界面最后将工程文件、窗体文件分别以lx2-4.vbp、lx2-4.frm为文件名保存在 D:EX文件夹下。3. 设计一个程序,程序界面如图2-7所示。当单击“显示”按钮
3、时,在文本框中显示“欢迎使用VB !”;当单击“清除”按钮时,清除文本框内的文本;当单击“退岀”按钮时,结束程序运行。“显示”按钮代码:敔瑸?敔瑸?尠欢迎使用VB!“清除”按钮代码:Textl.Text = “退出”按钮代码:End图2-7程序运行界面最后将工程文件、窗体文件分别以Ix2-5.vbp、Ix2-5.frm为文件名保存在D:EX文件夹下第3章4. 设计一个程序,在文本框中输入一个3位整数,单击按钮后,在标签上输出该数的百位数、十位数和个位数,运行界面如图3-3所示。最后将工程文件、窗体文件分别以文件夹下。D:EX为文件名保存在 SL3-3.frm、SL3-3.vbp图3-3程序运行
4、界面TriTat- 5-ib "onnnm41_Cli九 IT M 丸 biC. &m -iJ CTeii l. I cm i I = “ iiqqe = n Ikd IDi晶u c屮皿=苫:* 也 *, : * * i *." « c初e汕5. 设计一个程序,实现简单计算的功能,运行界面如图3-7所示。最后将工程文件、窗体文件分别以lx3-3.vbp、lx3-3.frm为文件名保存在D:EX文件夹下。图3-7程序运行界面ft j二讪Jl.CLjl骷 11 応暫畫 E:Oim 陆op = IndKSilacl Cut 昨C-L1« teiflJ.
5、 Ttzt. = VaL iTa-it I Ter+ V*L (Tea 1:2 Teit) Ubell.CJ >匚It«lJ T«!l = VJ. CT«ll T«i) - VJ.(T«t2 r.xt)L<fih« Captiifn =ru. 2- YiLCltitJLTaffiJ « ¥让(1口巴 1吐初 “libidh Fhplr】翊-*<u匚2.电3leKU.Iei'L = Juraiel'IVUUrtiU. TtLLB / Fit (It«t2. Teit). P
6、. wTP Cta «i - V*End SelectEn4迪Ff i x-Lle Sub Fflonri Ldc£iO Tixtl Twt -"-TnfcE TkI -" r-±t3.7ni ="End 5提示: 空字符串的意思,按钮的代码:是双引号clear函数输入某品牌电脑的单价和购inputbox,使用设计一个程序(程序运行界面自定)6.买的数量,计算并用msgbox函数输岀需付款金额。最后将工程文件、窗体文件分别以Ix3 4vbp、lx3 -4.frm为文件名保存在 D:EX文件夹下。Private Sub ForR_Cll
7、ck()Din dj K, shllp je&*ij - al(lnp«tBdx"®J扎某品牌岂脑的单价9 _Shi = Uai(inputBDx(A4?品牌正播囱购买的數量严门 je - dj shlIfcgBMC 嚅付款全樹 u MLnd 号uU7. rnd函数产生一个0 , 1)的单精度随机数。设计一个程序(程序运行界面自定),用此函数产生一个两位的随机整数并用msgbox函数输岀该整数值。最后将工程文件、窗体文件分别以lx3-5.vbp、lx3-5.frm为文件名保存在 D:EX文件夹下。Priwhip Sull lor»ii l:l i
8、ckf)Din ztiftRandDnlzczh = Int(PQ * Rnd) + 1D貼gBDJi “两位的随机整数足:“良前Lnd Sub第4章一、顺序结构例:输入数据输人时何t小时*分.秒熔培愉出 总计參少秒、*解:法_=便用文从框输入豪据运行时界面如下:“计算”按钮和“结束”按钮的click事件代码如下:Plirwtr &|1b Cr«nniHi!i| (IkU >I>|jn hhw nHn*|. 胡*Him <Miti Shli Vri( Iritllnw VU(JeitZ)*i Valt IciUntAll HJWOIl- uQiiM;r hh
9、 Jp 屮科鲁 mu 特 in Ou'Utr Outptr t vb£i« 耳计I TuiOuUrtr."Hdl; * *End SubPrivte uh Qwd2 C LukOndEr id 费血1最后将工程文件和窗体文件分别以 ceshi3-3-1.vbp 和ceshi3-3-1.frm 文件名保 存,并保存在D:EX文件夹下。9.从输人梅中愉入岡的半径,计算圆的周氏利面积诩建理用用序的用户界面和设童对伞屈性0)单写稈序代码PrfraU Sab Co* m »n d 1 _1kkQD« r As Sisfile, k As. Sog
10、le s Asr=购CJjiiwflJtyr请输入團的半径蔦"HWlEll的馬长利面籾为 k = 2*3J4iS9*rs-A14iS!?*r* rTvitLTexl kTutl.Texl sMm恥 呗算已充畑二严1算回的砒和面押End SabFmatr Svb Cu nvi2_ClidkO宰EidEnd Sab¥最后将工程文件和窗体文件分别以ceshi3-4.vbp 和ceshi3-4.frm 文件名保存,并保存在D:EX文件夹下。10.给定一个曲位載曲购,交换个拉歆和十位数的垃蓋,把 处理后的数显示在囱体上编写的询体单缶事枠it程代玛如下Ptn ah" S
11、87;l> EMm”口MU)Di k As* As T.tcg&rLhn b As lilecer t As larcter輩十3jR+fc*Fri处理后时数:"nEad Sab运存程序惜单击宙体,魅出第黑息 业胡的敌T i3最后将工程文件和窗体文件分别以.(长度大于2),单击“处理”按钮合并后显示在第二个文本框中。如文件名保存,ceshi3-5.frm 和 ceshi3-5.vbp 并保存在D:EX文件夹下。11.编制程序,在一个文本框中输入一串字符 时,则取出该字符串的头、尾部各一个字符, 输入“ ABCDEF”则输出“ AG。a Textl.lextPrivate
12、 Sab Co iniMaBdl_Clicl£O Dim. I As String, y As String T*xtl.Text-xTeiT2.Textyy = Ufig 1) + 殛鹹昭 1) y = Teit2.TextEnd Sub最后将工程文件和窗体文件分别以ceshi3-6.vbp 和ceshi3-6.frm文件名保存,并保存在D:EX文件夹下。二、选择结构12 请参考如图4-8所示程序的运行结果,新建一个工程,完成“健康称”程序的设计。具体要 求如下:(1) 窗体的标题为“健康称”,固定边框。(2) 窗体的左边有两个标签,Label1的标题为“身高” 、Label2的标
13、题为“体重”;它们的旁边 分别有两个文本框,Text1用于输入身高、Text2用于输入体重;在文本框的右边有两个标签, Label3的标题为“ cm",Label4的标题为“ kg”。(3 )将两个文本框文字对齐方式均设置为右对齐,最多接受3个字符。(4)两个文本框均不接受非数字键。(5 )单击“健康状况"按钮(Command1),根据计算公式将相应的提示信息显示在标签Label5中。计算公式为:标准体重 =身高-105 ;体重高于标准体重*1.1为偏胖,提示“偏胖,注意节食” ; 体重低于标准体重*0.9为偏瘦,提示“偏瘦,增加营养” ;其他为正常,提示“正 。常,继续
14、保持”Si*-Bin虹侶训“匸花 *. rnt*g*r0 n U: anzhnr. itajcb Jtkcngg 蛆=* n*t L. T*r tI i. il-jisas VbJ IS T«ki Jhi口rhun 二 <hao;£ liJ5I f la ftliEM-ig、Vi n.D eku* + 1.1 Tliwdi 訪叹皿=rssi切 聲倉节&B15.4T1 tj. Eh<.rig x t i Li zluui -09 O-i«r.EhiMhl =叫if由IflJlQ言轉耳B1E4shad诅=正種蛙粪傑特BU HLaK*! > C
15、-* Mt =吟hu旷hidEM池Pri Titfr iil" Ttfift Ibjun!泸 QIS TeIutvbo" l e (Tkk 11 P*3.xh nkm Tisll *Cud JubEri7<t« Sutn IcluWfLr (T科握)-F'wJSh Tbii Ta «t 2 - * 已就5ub最后将工程文件、窗体文件分别以Ix4-1.vbp、Ix4-1.frm为文件名保存在 D:EX文件夹下图4-8实验题目1运行界面13编写模拟袖珍计算器的程序,运行界面如图 4-9所示。要求如下:输入两个操作数和一个四则运算操作符,根据操作
16、符决定所做的运算。输入的数据进行合法检验,当输入岀错时,调用MsgBox()提示。OpliuLi Exidlcilfrials J-ub Cmwiui.11_C1i:kU£>an 盂I# y!港=恤ItTwitlUr = vaititEi莽"iM CAr TtHCase *+'T«t+兰开4 fTest4 - 3i - y Ctf# 7Twt4 = 3T * yCw 7*I£ r s Q Ttvi&肌応曲供辭住* *T加乩th皿Tuaetl = zLl& m / rtrill IfSh;Fr iviU亍讪 匚时世崔CLi :
17、kO ElBuii 瑚最后将工程文件、窗体文件分别以lx4-2.vbp、lx4-2.frm为文件名保存在 D:EX文件夹下* WT EtrlCL 冃覺"HZ 徉四闷匕叫埒 r丽戶图4-9实验题目2运行界面三、循环结构14. 输入任意一个整数N,求1到N之间所有偶数和;(可参考课本p89页)利用文本框来实现数据的输入和输岀。最后将工程文件、窗体文件分别以XH4-1.vbp、XH4-1.frm为文件名保存在 D:EX 文件夹下。15. 输入任意一个整数N,计算N阶乘;5 ! =5*4*3*2*1(可参考课本p90页)利用文本框来实现数据的输入和输岀。最后将工程文件、窗体文件分别以 XH4
18、 -2.vbp、XH4 -2.frm为文件名保存在 D:EX文件夹下。16. 输入任意一个整数 N,输岀1+1/2+1/3+1/N的计算结果;(可参考课本p93页)利用文本框来实现数据的输入和输岀。最后将工程文件、 窗体文件分别以 XH4 -3.vbp、XH4 -3.frm为文件名保存在 D:EX文件夹下。17. 输入任意一个整数 N,输岀N以内3的倍数之和(即 3+6+9);(可参考课本p93页)利用 文本框来实现数据的输入和输岀。最后将工程文件、窗体文件分别以XH4 -4.vbp、XH4 -4.frm为文件名保存在D:EX文件夹下。222 1 8.输入任意一个整数 N,输岀1 X 2X 3
19、 xx N的计算结果;(可参考课本p90页)利用文本框 来实现数据的输入和输岀。最后将工程文件、窗体文件分别以XH4 -5.vbp、XH4-5.frm为文件名保存在D:EX文件夹下。(可参考课本p90页)利用文本框来XH4 -6.vbp、XH4 -6.frm 为文件名保19. 输入任意一个整数 N,输岀N以内的所有5的倍数的积; 实现数据的输入和输岀。最后将工程文件、窗体文件分别以 存在D:EX文件夹下。20. 输入任意一个整数N,输岀B 3+1/4:+.的计算结果;(可参考课本p93页)利用文本框来实现数据的输入和输岀。最后将工程文件、窗体文件分别以 XH4 -7.vbp、XH4 -7.fr
20、m为文件名 文件夹下。D:EX保存在.21. 输入任意一个整数 N,输岀1!+2!+n!的累加和;(可参考课本p90页和课本p93页)利用 文本框来实现数据的输入和输岀。最后将工程文件、窗体文件分别以XH4-8.vbp、XH4-8.frm为文件名保存在D:EX文件夹下。Dini ik 現課 nX s b 0P : 1in - ¥al (TenII Teit)Fur i - 1 To ilj> = P * i土 t 卜 phit7«Et£-= 3En& 孔t22. 编程求岀50之内的全部素数;(可参考课本p98页)。最后将工程文件、窗体文件分别以XH4
21、-9.vbp、XH4-9.frm为文件名保存在D:EX 文件夹下23. 编写程序打印如下九九乘法表(使用双重循环实现)。(可参考课本p97页)最后将工程文件、窗体文件分别以 XH4-10.vbp、XH4-10.frm为文件名保存在 D:EX文件夹下。1 x 1=1 2X 1=2 2 X 2=49X 1=1 9 X 2=189 X 9=8124. 编一程序,显示所有的水仙花数,如下图。所谓水仙花数,是指一个3位数,其各333位数字立方和等于该数字本身。例如,153=1+5+3。最后将工程文件、窗体文件分别以XH4-11.vbp、XH4-11.frm为文件名保存在 D:EX文件夹下。I lla i
22、l:l 匕,. 1frl Tcile JCwnfiriiL CJ1 ilkOni<*阿遇叭c>Tor i = EDO To 弓汨» i Liit (l / 1DDJb =- 解 1QD) f 1Q»e - i - fa -4 IDO t * IOI£ J 3 i 1 b 3 + g 3 Thu F和臥 i?VakI讪Sub25. 我国古代数学家张丘建在“算经”里提出一个世界数学史上有名的百鸡百元问题:鸡翁一,值钱五;鸡母一,值钱三;鸡雏三,值钱一。百元买百鸡,问鸡翁、鸡母、鸡雏各几何?意思是:用100元钱买100只鸡,公鸡5元一只,母鸡3元一只,小鸡1
23、元3只;100只鸡中必须包括鸡 翁、鸡母和鸡雏。自行设计界面并在图形框中输岀百鸡百元的几种解。最后将工程文件、窗体文件分别以XH4-12.vbp、XH4-12.frm为文件名保存在 D:EX文件夹下。提示:按题意列岀方程组,并己知鸡翁不能超过19只,鸡母不能超过32只。tri ra tc Sb C onrjMi ek 0Uirii 声 j% ki,rictwei 珂St r<t 0:写涔F T丘 I:归h "竜冃扩:了让 IM 1; F丐” Fm l = L Ig 坦j s 1 Td 12i = IQQ " i jIE l 5 + j < -3 h ? 3
24、177; IJU 丁* = FL I 1Pulurta. rraiiiTIU; Sr It b. ft r w T«b(Sl; i; T-iKlJ;k Enl IfWeft jTart iEndl S-uthi 百応計油($nr u_Ui ck.£ndtud 沁第5章26. 编写程序,将随机产生的两位数的一维数组A(10 )中的元素向后移动一个位置,最后一个元素移到第一个元素的位置上。最后将工程文件、窗体文件分别以1x6-2.vbp、Ix6-2.frm文件夹下D:EX为文件名保存在.Frirtlfc SuhC in 旧)Aaln谍luidnn: zfrEx a 1 Tt 1
25、0就订5 Tut (inn i险町 I£ a = 1 Thn E珥祇惑.组为: ITi j>ii t 1 (1|," * J换辭电E f g*lunci = «|1Oi = Ti? 1 W 岬-t <(i t 1二 uL)fix I i4 0)=如,fr i = 1 T<? 10If i 1 Thq Fritil 讥商?|巧:*: Frimt itiB:刊七f-ez i. iEnd Suh27. 输入某小组5个同学的成绩,计算总分和平均分 数来输入成绩,输入完毕后经过计算,再采用Print(取小数后一位)。本例利用InputBox函直接在窗体上输
26、出结果。最后将工程文件、窗体文件分别以 SZ5-1.vbp 、SZ5-1.frm为文件名保存在 D:EX 文件夹下Jin d石*=Jlfl 艮匚 llLtAG; La 1.1 lb jIlIu 吐 7 帖 ILXlw此)=eiLAui贮witn兀r.Ei建.生闘晰:弋上養虫r.讪7 = Par j = 1 Tft 5Ut ul 3 l&t tai * i i)加I i<74J= t EbLaL ,? 6F4ltold?iriMi 平为牙:;肌wa: k他r今28. 输入10名学生的成绩,求岀最高分和最低分讯 Forml I® X:;Lat©ll功能要求:通过A
27、rray 函数输入10个分数;单击"查找"按钮(Command2)后,开始查找最、SZ5-2.vbp窗体文件分别以最后将工程文件、上。Label1 找到后显示在标签高分和最低分,文件夹下。为文件名保存在D:EXSZ5-2.frmCplLQU 13 1匚:ir G.nauf a X-; V-at- j iniJk i,dG“时 Lv*OLaltall. Cwtim ="查找“翳开苗查我舅巴卄内呈业:-caw* > “t峥鸥 m, et, ar, g 乜也 亀 线 聞恥5炜®d;_Jl cii 0Tift *«f pr Jn 1 *!cerd
28、 r :t.貼 TnJ+Cry = «*Tepl没岂吕5in - scire I' JFbt i = ? r* I f w= £ xcro-r » (l Tk*a" 乓甘rlt -監吃廿专Q11 I XU > 5C4T It(L ) IllMDL础虑召"run iEid IfBest iLaN?ll C sjiti ttT 二! £iS5i : " + 51r Inar) +Eh ajj * 财4 Eub皿中输入一组数Textl ,在控件数组29.建立一个文本框控件数组Textl 和一个文本框Text2为文窗体
29、文件分别以Text2 。最后将工程文件、SZ5-4.vbp 、SZ5-4.frm把累加值存放在后,件名保存在D:EX文件夹下。Text2Text1(0)Text1(1)Text1(2) 文本框 Command1Text1(3)控件数组 Text1Fx i£ ab CjJl j dL,1x = 07 DE L fll H 9« ? I 4" U4hl CTW1 b) Twt)HeSt LTTeiJ. s 3End单选按钮构成控件数组,要求当单击某个单选按钮()共3个按下图设计窗体,其中SZ5-5.frm窗体文件分别以能够改变文本框中文字的大小。时,最后将工程文件、文
30、件夹下。D:EX为文件名保存在.一组 30.SZ5-5.vbp控件数组Friwtte Sub FtrnJuMdf皿皿)vz = J”屢定甲一f曰MS議T-rtl F:nt5iw - 12也起工如=龄专Ead SvbFTivit i £iti ift. _n i rl? CTt.e.im!二匸 IntSelect Cu? Inde±东蜕言口匚IcKlJ.Fimtai z* = LE匸“ T«kIL fofttSa = 3DEa.eo 2Twll. F«a<Sa i« - 26Era 5 blctlAd Sub章第7,另有一个命令按“体育”、
31、“音乐” 31.在窗体上放置三个复选框,标题依次为“旅游”。程序运行后,选中复选框,再点击命令按钮,则在窗体上显示相应的钮,标题为“兴趣” LX10-1.frm -12的信息。运行界面如图10所示。最后将窗体文件、工程文件分别以存在D:EX文件夹下。LX10-1.vbp复选框运行界面10-12 图吁机的typlieKI1? i.vhi4 4 盂alk UcnrawriJL Ligule 口 Li 匸hicU. VilMn ; L IlMEi> =-* r>S?blad IEEC 皿4£, Viv* = 11U IfLf EjmoJJ.亍ila:兰 L IbAiQ
32、1; £ « A戸昔丹b瓦d IFFZ珈强T A d32. 设置如图10-13所示界面所示的程序,要求程序运行时选中组合框中的某一项,将弹岀如下对话框加以说明。最后将窗体文件、工程文件分别以LX10 -2.frm、LX10 -2.vbp为文件名保存在D:EX文件夹下。组合框运行界面图10-13P2 u - it iJonibad LJ.l ufc-d皿Pj <¥»< h f ul F»rii_Lti*d tJ cm.giw宜卷 Csn bwlLA.£dZ; - "二主" CctbcL Mdl:r :必育
33、: Cqf b m a划虹i st博豺“ 匚-s-iibEH."上.阪rDid Suh33. 在窗体上画一个名称为HS1的水平滚动条(min=0,max=100 )和三个名称分别为 C1,C2,C3 ,标题分别为“左端”,“居中”,“右端”的命令按钮。编程是的程序运行后,单击C1,则滚动框位于滚动条的最左端;单击C2,则滚动框位于滚动条的中间处;单击C3,则滚动框位于滚动条的最右端,运行界面如图10-14所示。最后将窗体文件、 工程文件分别以 LX10-3.frm、LX10-3.vbp 为文件名保存在 D:EX文件夹下。图10-14滚动条运行界面f tl'/dtv Jut l
34、l_l 11'= ) 旳,E 0El4沁hi归仙二心 KJliskDHtd MabSub CzriiclcO 居】.=LEI1eu站34. 列表框举例。窗体上添加二个列表框、二个命令按钮,设置完属性后的界面如图10-16所示。要求:(1)选中列表框中的某一条目,单击命令按钮,将其移动到另一列表框中。(2)双击列表框中的某一条目,直接将其移动到另一列表框中。完成运行界面所达到的要求,最后将窗体文件、工程文件分别以LX10 -6.frm、LX10 -6.vbp为文件名保存在D:EX文件夹下。的运行结果)6的设计界面(其中右图为题目6题目10-16图Sub Fni九L= =tl A 1 an Si JdJliF Lsitj ALfIt«i UkLLAHGivi Ihctl Alii tanLigLl. AliUteii-* - * 口一_陆至川折尢 ,:广=-T-P-' $
温馨提示
- 1. 本站所有资源如无特殊说明,都需要本地电脑安装OFFICE2007和PDF阅读器。图纸软件为CAD,CAXA,PROE,UG,SolidWorks等.压缩文件请下载最新的WinRAR软件解压。
- 2. 本站的文档不包含任何第三方提供的附件图纸等,如果需要附件,请联系上传者。文件的所有权益归上传用户所有。
- 3. 本站RAR压缩包中若带图纸,网页内容里面会有图纸预览,若没有图纸预览就没有图纸。
- 4. 未经权益所有人同意不得将文件中的内容挪作商业或盈利用途。
- 5. 人人文库网仅提供信息存储空间,仅对用户上传内容的表现方式做保护处理,对用户上传分享的文档内容本身不做任何修改或编辑,并不能对任何下载内容负责。
- 6. 下载文件中如有侵权或不适当内容,请与我们联系,我们立即纠正。
- 7. 本站不保证下载资源的准确性、安全性和完整性, 同时也不承担用户因使用这些下载资源对自己和他人造成任何形式的伤害或损失。
最新文档
- 2025服装设计师(初级)考试试卷中对服装设计市场的研究与预测
- 2025年理财规划师(初级)考试试卷:理财规划实务操作案例分析集
- 参观博物馆的作文5篇
- 2025年多媒体应用设计师考试:多媒体行业案例分析与应用实践试卷
- 2025年初中地理学业水平考试模拟试题(地理实验探究技巧解析)
- 2025年锂电池正极材料项目立项申请报告
- 儿童心理障碍的早期诊断与治疗策略
- 2025年成人教育终身学习平台运营成本控制与效率提升报告
- 分析医疗设备更新对医疗行业的重要性
- 城市地下综合管廊建设项目2025年专项债券资金申请与工程进度监控研究报告
- 自动寻优控制系统在生料立磨中的应用实践
- 土地延期合同范本
- 四川省绵阳市涪城区2024-2025学年七年级上学期开学考试语文试题(解析版)
- DL∕T 796-2012 风力发电场安全规程
- 部编版八年级升九年级历史暑假预习知识清单(填空+答案)
- 四川省自贡市2023-2024学年七年级下学期期末数学试题(解析版)
- (正式版)JB∕T 11108-2024 建筑施工机械与设备 筒式柴油打桩锤
- 大型分析仪器原理与应用智慧树知到期末考试答案章节答案2024年山东第一医科大学
- 企业员工保密协议书范本
- 营销管理培训生轮岗方案
- 气相色谱分析苯系物实验报告
评论
0/150
提交评论