第1章VisualBasic的基本概念.pptVIP

本课程学习方案 学习方式 课堂学习（54学时） 讲授28，实验26 课外自主学习 每周2学时，共26学时的上机 上网学习:172.18.1.15/jpk 本课程学习方案 学习计划 第1章 2+1 学时 第2章 2+1 学时 第3章 4+1+1 学时 第4章 4+1+1 学时 第5章 4+1+1 学时 第6章 2+1 学时 第7章 2 +1 学时 第8章 2+1 学时 第9章 2+1 学时 本课程学习方案 考核方式 平时成绩 40% 考核方式：作业、考勤20%，综合训练20% 期末成绩 60% 考核方式及内容：上机考试.。内容参照上海市高校计算机二级考模式，题型为选择题、读程题和编程题等。 本课程学习方案 答疑时间、地点： 每星期1，3，4晚上、星期2下午 .信息学院311. 参考书： Visual Basic 程序设计教程（6.0），龚沛曾，高等教育出版社 Visual Basic 程序设计教程，李春葆，清华大学出版社 关于本课程 第1章 Visual Basic的基本概念 程序设计 程序 程序设计 程序设计语言 程序设计工具 可视化编程 面向对象的程序设计 程序设计工具——VB编程环境 面向对象的程序设计 类 对象 属性、方法、事件 事件过程 事件驱动 程序设计步骤 打开已有工程文件 设计用户界面 设置对象属性 编写代码 调试代码 保存文件 【文件】|【保存Form1】 【文件】|【保存工程另存为…】 程序设计步骤 Print方法 格式：[对象名.]Print[表达式列表] 功能：在对象上输出表达式的值 说明：Print方法与Tab函数及Spc函数一起使用可以对输出定位 例： Cls方法 案例——文本信息复制 实验 了解窗体、文本框属性，熟悉常用属性（P9-21） 作业 案例实训 * * 第10章2 +1学时 按学习小组完成综合作业，通过答辩得到成绩。综合作业期中选题。 Private Sub Cmdequ_Click() If op Then Select Case op Case / If Val(txtshow.Text) 0 Then valu = Val(opd) / (Val(txtshow.Text)) Else MsgBox 除数不能是0, 0 + 48, 警告 End If Case * valu = Val(opd) * (Val(txtshow.Text)) Case + valu = Val(opd) + (Val(txtshow.Text)) Case - valu = Val(opd) - (Val(txtshow.Text)) End Select End If txtshow.Text = Str$(valu) b = -1 op = End Sub 利用编程工具提供的可视化 “控件”来创建对象的编程方法 第1步 第2步 第3步 窗体设计器 工具箱 工程资源 管理器 对象属 性窗口 查看对象 查看代码 Private Sub cmdcaculate_Click() Lbldollar.Caption = txtRMB.Text / 7 End Sub Private Sub Form_Load() txtRMB.Text = 请输入现有人民币 End Sub Private Sub Form_Click() txtRMB.SetFocus End Sub 设置属性： 对象名.属性名=属性值 FontName: 属性是字符型，决定对象上正文的字体（缺省为宋体）。 FontSize: 属性是整型，决定对象上正文的字体大小。 FontBold: 属性是逻辑型，决定对象上正文是否是粗体。 FontItalic: 属性是逻辑型，决定对象上正文是否是斜体。 FontStrikeThru: 属性是逻辑型，决定对象上正文是否加一删除线。 FontUnderLine: 属性是逻辑型，决定对象上正文是否带下划线。 Form（窗体）、Debug（立即窗口）、PictureBox（图片框）、Printer（打印机）。省略“对象名”表示在当前窗体上输出。 省略“表达式列表”输出一个空行；表达式之间用“，”或“；”分割。用“，”分割，各输出项在以14个字符位置为单位划分出的区段中输出。用“；”分割一紧凑格式输出。 Private Sub Form_Click() Print 输出以下表达式的值： Print Print Tab(10); 3*4+5=