Visual-Studio-2010-入门.pptVIP

  1. 1、本文档共29页,可阅读全部内容。
  2. 2、有哪些信誉好的足球投注网站(book118)网站文档一经付费(服务费),不意味着购买了该文档的版权,仅供个人/单位学习、研究之用,不得用于商业用途,未经授权,严禁复制、发行、汇编、翻译或者网络传播等,侵权必究。
  3. 3、本站所有内容均由合作方或网友上传,本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺!文档内容仅供研究参考,付费前请自行鉴别。如您付费,意味着您自己接受本站规则且自行承担风险,本站不退款、不进行额外附加服务;查看《如何避免下载的几个坑》。如果您已付费下载过本站文档,您可以点击 这里二次下载
  4. 4、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等,请点击“版权申诉”(推荐),也可以打举报电话:400-050-0827(电话支持时间:9:00-18:30)。
  5. 5、该文档为VIP文档,如果想要下载,成为VIP会员后,下载免费。
  6. 6、成为VIP后,下载本文档将扣除1次下载权益。下载后,不支持退款、换文档。如有疑问请联系我们
  7. 7、成为VIP后,您将拥有八大权益,权益包括:VIP文档下载权益、阅读免打扰、文档格式转换、高级专利检索、专属身份标志、高级客服、多端互通、版权登记。
  8. 8、VIP文档为合作方或网友上传,每下载1次, 网站将根据用户上传文档的质量评分、类型等,对文档贡献者给予高额补贴、流量扶持。如果你也想贡献VIP文档。上传文档
查看更多
Visual-Studio-2010-入门

第二讲:第 2 讲 Visual Studio 2010 入门 内容包括3.1,3.2,3.3,3.5以及自编部分 该课程是一门强调实践性的课程,我们实验环境是:硬件环境-双核、2G内存,软件环境-Windows7,Visual Studio2010。 Visual Studio2010包含了一系列高效的、智能的开发工具,它结合以往编程语言( VB, C# )的优势,提供了很多全新的、强大的功能。 现在,进入了 .NET 时代, 只要 Visual C++ 和 Visual C# 能完成的事情, VB .NET几乎都可以完成,因为它们都是面向对象的,而且,都是建立在 .NET Framework 之上的,共享公共语言运行库(Common Language Runtime,CLR)和 .NET Framework 类库,只是语法上有所差异。 所以,VB .NET是一种功能齐全的开发工具,可使编程比以前更加容易,我们应该认真学习。 在进行软件项目开发的时候,我们应该选择哪种编程语言? 首先,要考虑有无实用的开发环境支持。一个好的开发环境使用便捷,能有效地提高软件开发效率。其次,要考虑该编程语言是否为主流语言。主流语言掌握的程序员比较多,便于交流与维护,而且,该语言能得到商家的关注而持续发展。Visual Basic是一门快速语言,有非常便捷的开发环境,也是Microsoft公司的主流语言,这就是我们选择Visual Basic作为本书的主要编程语言的原因。 2.1 Visual Basic的开发环境 工具箱中显示的是常用的内置控件,如果需要其它控件,或者第三方控件,就需要打开Project(工程)菜单,选择Components(控件)子菜单,然后,选择合适的控件。比如,我们最常用的串行通信控件,可以核选其中的“Microsoft Comm Control 6.0”,即MSComm32.ocx,此时,工具箱中就多了一个话机图标,增加了一个控件。 2.2 教学计划计算器 系统需求:在制订教学计划的过程中,需要根据所讲授课程的每章的学时数、起始的周数、每周讲授的课时数来计算每章讲授的周次。 程序设计及代码编写 :程序的源代码见光盘目录Ch02-1。核心代码如下: 双击“计算”按钮,输入如下代码: Private Sub txtCalculate_Click() Dim I As Integer Dim nCurWeek As Integer ‘当前周次 ‘如果没有输入数据,就提示输入,然后退出 If txtSource.Text = Or txtStart.Text = Or (txtSingle.Text = And _ txtDouble.Text = ) Then MsgBox Please input data at first!, vbCritical + vbOKOnly Exit Sub End If ‘以空格分隔章学时数,计算有多少章 nChapters = FeatureCount(txtSource.Text, ) If nChapters 1 Then MsgBox Please input more data!, vbExclamation + vbOKOnly Exit Sub End If ‘根据求得的章数来定义可变数组 txtResult.Text = ReDim nCourse(nChapters) ReDim nResult(nChapters) ‘获取相关数据,并转换为整型 nSingle = Val(txtSingle.Text) nDouble = Val(txtDouble.Text) nStart = Val(txtStart.Text) ‘检查数据 If (nDouble 1 And nSingle 1) Or nStart = 0 Then MsgBox Data error!, vbCritical + vbOKOnly Exit Sub End If ‘核心代码,计算并输出结果 For I = 0 To nChapters nCourse(I) = Val(GetNoString(txtSource.Text, , I)) If I = 0 Then nResu

文档评论(0)

zijingling + 关注
实名认证
文档贡献者

该用户很懒,什么也没介绍

1亿VIP精品文档

相关文档