VB实验指导例题
37页1、实验A V环境和可视化编程基础1()运行界面(2)参考代码:Priate SuCoan1_lick()ptin = txt1。Txtnd Sb2.模仿教材例1。1,将事件过程中自上而下移动改为自右向左移动,也要考虑文字出窗体边界的情况。(1)运行界面(2)参考代码:Privat Sboan1_lick()TierIerval = 0allmeEndSubSub mmov()Lal1Mov Lael1Lf - 20If Lableft 0 Ten LabeLft = For。idtnd Surte Sub ommnd2_Clic()Tmer1。Interval= 00EndSubPvte Sub Timer1Ti()Cal myoedSu3编写一程序,在文本框中统计在该窗口上鼠标单击的次数。(1)运行界面:()编写代码:ivtSubFo_Click()ext1 =Val(Text1)+En Subivate Sub Fomoad()TxtTe ”Eub4代码:Priva Sub orClck()ptn = ”鼠标单击For.Ptue LoadPitu(”d:1j)EndSbPrivate
2、Sub FmDClick()tion =”鼠标双击”Form1Pctre = oPitue(”:2jpg)d SubPrateb FormLod()o1iture= oadPctue(”d:3。jpg)nd b命令按钮、字号、内容和格式的复制练习(1)运行界面()参考代码:Privt Sub Commad1_Clck()Text1.Fntae =”黑体ex.FntSiz 5EdSubPiate Sub CommanClck()Text2Text =Text.elTtText2。otNme= x.FontNmex2FontSze = Txt1FonSizTxt1.SeFocEd Sub实验 顺序结构1 编一个华氏温度与摄氏温度之间转换的程序,要求用按钮实现转换。既单击“华氏转摄氏”按钮,则将华氏温度转换为摄氏温度;同样,单击“摄氏转华氏”按钮,则将摄氏温度转换为华氏温度。代码:Private ub omnd1_Cck()Dm f!, c!f Val(TxtTe)c 5 /9 * (f 2)Text2.Text = omt(c, 000”)E Suriae SubComa2_Click()
3、Dim!,c! = al(et) = 9 / 5 c +32ext。Txt = Fomat(f, 0.00)nd ub2 (1)运行界面(2)参考代码Priae ub Cmand1_ic()r =Text。Textion Format(3.4 r r,00)Tx。SetFousEnubPriteSb Command2Click()r Val(ext。Tet)ton = Format(34 2r, ”。00)Text。Focud ubPrivat Sub Txt1_Keys(ecii Intge)If KeyAsci=3ThenIf NotNumec(Tex1)ThenMgBox 输入有误,请重输入Tx1。SeFousText1.lSat = 0Text.SlLenh= Ln(Tex1ex)End IfEndIfEnSubPriate Sub Text1_Lotocus()fNt sumerc(T1) ThenMsBox ”输入有非数字字符,请重新输入”, ,22”Txt1.SetFouTxt1。SSta = 0Te。Selgth = en(ext1.Tex)EdIfnd Sub3 我国
《VB实验指导例题》由会员hs****ma分享,可在线阅读,更多相关《VB实验指导例题》请在金锄头文库上搜索。
浙江省长兴县自然资源和规划局招考3名编外工作人员模拟卷(第84期)
市委秘书长黄道安:发挥法治建设护民安民的关键作用(0723)
第一场雪小学作文
一体化生物智研平台建设项目可行性研究报告模板立项审批
食品安全管理体系检查表
综合部经理2021年工作总结.doc
收房授权委托书
保健品销售员年度工作总结模板(四篇).doc
团员自我鉴定
《孝经》诵读课
春季人才交流大会职位信息
植物光合测定仪的技术参数
广告策划书
影响中国历史的十大人物(共5页)
可行性研究分析
大连理工大学22春《道路勘测设计》补考试题库答案参考10
有关初三开学作文三篇
2022年考博英语-南京大学考前拔高综合测试题(含答案带详解)第125期
2023中学实习班主任个人工作总结.doc
(精选汇编)教师培训总结范文汇总10篇
2024-01-26 14页
2023-12-01 14页
2023-06-13 12页
2023-09-23 14页
2024-02-19 11页
2023-12-25 12页
2023-05-26 11页
2022-10-21 11页
2023-03-06 5页
2022-11-06 2页