- 1、本文档共3页,可阅读全部内容。
- 2、有哪些信誉好的足球投注网站(book118)网站文档一经付费(服务费),不意味着购买了该文档的版权,仅供个人/单位学习、研究之用,不得用于商业用途,未经授权,严禁复制、发行、汇编、翻译或者网络传播等,侵权必究。
- 3、本站所有内容均由合作方或网友上传,本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺!文档内容仅供研究参考,付费前请自行鉴别。如您付费,意味着您自己接受本站规则且自行承担风险,本站不退款、不进行额外附加服务;查看《如何避免下载的几个坑》。如果您已付费下载过本站文档,您可以点击 这里二次下载。
- 4、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等,请点击“版权申诉”(推荐),也可以打举报电话:400-050-0827(电话支持时间:9:00-18:30)。
- 5、该文档为VIP文档,如果想要下载,成为VIP会员后,下载免费。
- 6、成为VIP后,下载本文档将扣除1次下载权益。下载后,不支持退款、换文档。如有疑问请联系我们。
- 7、成为VIP后,您将拥有八大权益,权益包括:VIP文档下载权益、阅读免打扰、文档格式转换、高级专利检索、专属身份标志、高级客服、多端互通、版权登记。
- 8、VIP文档为合作方或网友上传,每下载1次, 网站将根据用户上传文档的质量评分、类型等,对文档贡献者给予高额补贴、流量扶持。如果你也想贡献VIP文档。上传文档
查看更多
《Visual Basic程序设计》第一次作业讲评
同学们好:
第一次作业主要覆盖教材第1-2章的内容,要求在第四周以前完成。
第一部分:选择题
选择题主要考核概念,多数答案可从书中找到,此处只讲几个编程基础题,其他概念题不再赘述。
第5题考核对象属性的表示方法(对象名.属性名),这里是一个代表,所有的vb中的对象属性表示方法都是如此,需引起注意。
第9题,选项A和D容易混淆,Visible=false时可导致文本框在运行时被隐藏,而Locked=true可导致文本框在运行看得见但是不能编辑,选择答案时注意审题。
第10题,答案为C,这又是一个代表,所有控件是否能用或是否开启都取决于Enable属性,该属性为true则开启,该属性为false则不开启。
第11题,注意题目要求在窗体内显示一个字符串“myfrm”,应使用print方法,而该窗体的名称为form1,所以是form1.print “myfrm”,选择C,选项A不是在窗体内显示而是在窗体名称处显示。
第13题,赋值语句的左边永远是一个变量,所以A和C不对,而D选项中的圆周率数学符号,在计算机中是无法表示的。
第二部分:填空题
填空题考核概念较多,多数答案可从书中找到。
第7题,定时器的时间间隔单位是毫秒,所以要将时间间隔设为4秒,则Interval的值为 4000 。
第10题,注意给文本框赋予文本,需要设置text属性的值,所赋予的文本必须用用引号括起来,该双引号必须是英文状态的,答案为txtshow.text=GOOD WORK!
第11题,第一个须填写单击事件,为 Click() ,第二个空为打开一个窗口frm1,为 frm1.show 。
第12题,响应该过程的对象名就是符号“_”前面的那个名称,为cmd1,时间名就是符号“_”后名的那个名称为Click()。
第三部分:问答题
问答题都能够从书中总结出答案,参考答案如下:
1.参考答案
答:可视化编程是目前最直观的编程方法,Visual一词表示它。之所以叫做可视,。Windows应用程序开发工具。
在中引入了控件的概念,每个控件都有若干方法属性来控制控件的外观。,随意点几下鼠标,一个按钮就完成了,也可由代码间接引发(例如当代码装载其他窗体时产生的Load事件nd语句或单击“结束”按钮停止程序的运行。
第四部分:程序设计题
第1题,在该题目中没有规定控件的名称,可自己规定,参考答案中窗体、文本框、两个命令按钮分别采用的是默认名称,分别为form1,text1,command1,command2。
该题目需要完成三个事件
第一个是窗体载入事件,需要在文本框中显示VB程序设计几个字,并且文字大小为16号,代码如下:
Private Sub Form_Load()
Text1.Text = VB程序设计
Text1.FontSize = 16
End Sub
第二个事件是单击命令按钮1时隐藏文本框
Private Sub Command1_Click()
Text1.Visible = False
End Sub
第三个事件是单击命令按钮2时显示文本框
Private Sub Command2_Click()
Text1.Visible = True
End Sub
第2、3题参考答案如下:
2.
Private Sub Command1_Click()
Text1.Text =
Text2. Text =
[Text3.Text =
End Sub
Private Sub Command2_Click()
If Text1 Text = Or Text2.Text = Or Text3.Text = Then
MsgBox 成绩输入不全!
Else
Text4.Text = (Val(Text1.Text) + Val(Text2.Text) + Val(Text3.Text)) /3
End If
Sub End
Private Sub Command3_Click()
Unload Me
End Sub
3.
Private Sub Command1_Click()
If Text1.Text = Then
MsgBox 至少要输出单价!
Text1.SetFocus
Exit Sub
End If
If Text2.Te
您可能关注的文档
- visa卡安全码VISA卡号和美国身份.doc
- 2011年6年级语文毕业模拟考试试题1.doc
- windiruserprofileXP下类似变量说明.doc
- WindowsServer01怎样进行系统映像还原.doc
- 2011年5年级上册英语教学总结[1].doc
- Windows桌面图标9大故障解决方法.doc
- Wjy0122012015年送贺卡感谢信—4.doc
- 2011年8年级地理下册期末试题.doc
- 2011年9年级世界历史上册期末试题doc.doc
- Word基本的操作实验汇报.doc
- 2025年安徽工商职业学院单招职业技能测试题库带答案(典型题).docx
- 2025年洛阳科技职业学院单招职业技能测试题库带答案(新).docx
- 2025年荆门职业学院单招职业技能测试题库及答案(易错题).docx
- 2025年宣化科技职业学院单招职业技能测试题库(精练).docx
- 2025年包头职业技术学院单招职业技能测试题库带答案(新).docx
- 2025年江西工商职业技术学院单招职业技能测试题库带答案(精练).docx
- 2025年黑龙江农业经济职业学院单招职业技能测试题库精编.docx
- 2025年山东艺术设计职业学院单招职业技能测试题库带答案(基础题).docx
- 2025年陕西工商职业学院单招职业技能测试题库带答案(突破训练).docx
- 2025年承德护理职业学院单招职业技能测试题库【word】.docx
文档评论(0)