版权说明:本文档由用户提供并上传,收益归属内容提供方,若内容存在侵权,请进行举报或认领
文档简介
123456789DDDBCDADDCCDACDBCAC、CBDCBBCADABB、)c)D)?(a)d)类)D&B+CDBbb。。3X3383xd"""。。空C。【】1。S.3.............D..用.....。.....。....。....。....b)....和...”..D..V.B.0x大于0且小于10的VB表达式是b。A、0<x<10B、x>0Andx<10D、x>0:x<10C、x>0Orx<10表达式33MOD17\3*2的值是A.10B.1。bC.2D.3c)A."5*20"B.出现错误信息C.5*20D.100..D。.)..D.–,–________。(a)43B344,–433。.a)Ba)))D)。...2,,3,33x#yZ4=51、通过单击第一个按键控件实现窗体颜色为红色PrivateSubCommand1_Click()Form1.BackColor=RGB(255,0,0)EndSub2、通过单击第二个按键控件实现窗体颜色为红色PrivateSubCommand2_Click()UnloadMeEndSub3、以下程序用于判断向文本框Text1中输人的数据。如果该数据能被3或7整除,则输出否则将焦点定位在文本框Textl中,选中其中的文本,等待重新输入。试补充以下程序。PrivateSubCommand1_Click()x=Val(Text1.Text)IfThenIfxmod3=0orxmod7=0ThenPrintxElseText1.SetFocusText1.SelStart=0Text1.SelLength=Len(text1.text)在VB生成EXE程序。程序和该试卷存放到本人班级姓名命名的文件夹中,提交作业。在窗体上使用一个table标签和一个文本框,一个按钮编写一个程序实现下列计算:1+2+3+……+100=PrivateSubCommand1Click()DimsASlong,IASintegers=0:i=1(10分)DoWhilei<=100s=s+ii=i+1LoopText1.Text=sEndSub410分)于输入数据和显示计算结果。运行时,用户在“边长”文本框中输入某一个正整数,当单击“计算”按钮时,则在“面积”文本PrivateSubCommand1_Cl
温馨提示
- 1. 本站所有资源如无特殊说明,都需要本地电脑安装OFFICE2007和PDF阅读器。图纸软件为CAD,CAXA,PROE,UG,SolidWorks等.压缩文件请下载最新的WinRAR软件解压。
- 2. 本站的文档不包含任何第三方提供的附件图纸等,如果需要附件,请联系上传者。文件的所有权益归上传用户所有。
- 3. 本站RAR压缩包中若带图纸,网页内容里面会有图纸预览,若没有图纸预览就没有图纸。
- 4. 未经权益所有人同意不得将文件中的内容挪作商业或盈利用途。
- 5. 人人文库网仅提供信息存储空间,仅对用户上传内容的表现方式做保护处理,对用户上传分享的文档内容本身不做任何修改或编辑,并不能对任何下载内容负责。
- 6. 下载文件中如有侵权或不适当内容,请与我们联系,我们立即纠正。
- 7. 本站不保证下载资源的准确性、安全性和完整性, 同时也不承担用户因使用这些下载资源对自己和他人造成任何形式的伤害或损失。
最新文档
- 2026年文案策划面试技巧及答案
- 2026年医疗器械销售经理面试参考题及解答
- 中小学生禁毒知识竞赛题库(试题及答案)
- 新疆维吾尔自治区卫生专业技术资格考试(神经电生理(脑电图)技术初级师)模拟练习题及答案解析(2026年)
- 幼师消防安全培训记录课件
- 癌痛患者出院指导要点
- 2025年护士年终个人述职报告
- 2025年公司管理层年终总结报告
- 投放服务合同模板(3篇)
- 归纳推理考试题目及答案
- DB43∕T 1608-2019 基于优良度的马尾松种子质量分级
- 监狱企业车辆管理办法
- 城市基础设施提质升级改造项目可行性研究报告
- 急性牙髓炎病例分析与诊疗方案
- 军事体能培训课件
- 学堂在线 雨课堂 学堂云 科研伦理与学术规范 期末考试答案
- 山东省环境卫生作业计价定额编制说明
- ktv中高层管理制度
- 口腔诊所前台接待礼仪规范
- 全麻剖宫产麻醉专家共识
- 供电公司催费管理制度
评论
0/150
提交评论