当前位置：文档之家 › VBNET总复习

VBNET总复习

  • 格式：doc
  • 大小：66.00 KB
  • 文档页数：8

总复习------编程篇以模拟题为基础，注意知识点的拓展一、简单界面设计和属性设置（涉及窗体、标签、按钮、文本框、单选钮等）1．新建项目，在窗体上创建1个标签(Label1)、2个命令按钮(Button1,Button2)。

(1) 在属性窗口中设置:标签文字为你的姓名，1个命令按钮上的文字为“日期”，1个命令按钮上的文字为“粗体”。

(2) 编写代码，要求：运行程序，单击按钮“日期”，窗体标题栏上显示系统当前日期(要求使用函数)。

单击按钮“粗体”，将标签文字改为粗体。

【本题要求上传窗体文件】Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click me.Text = TodayEnd SubPrivate Sub Button2_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles Button2.ClickLabel1.Font = New Font("宋体", 12, FontStyle.Bold)End Sub知识拓展：1.本题用到“日期”函数：TODAY, 注意其他常用函数NOW2. 设置标签的字体：粗体：FontStyle.Bold斜体：FontStyle .Italic , 删除线：FontStyle .Strikeout下划线：FontStyle .Underline2. 新建项目，在窗体上创建2个文本框(TextBox1,TextBox2)和2个命令按钮(Button1,Button2)。

(1) 在属性窗口中设置:窗体标题栏为你的姓名，命令按钮上的文字分别为“计算”,“清除”。

(2) 编写代码，要求：运行程序，在TextBox1文本框中输入若干英文字符。

单击按钮“计算”，在TextBox2文本框中显示字符的个数，以及其中第3~第8个字符。

单击按钮“清除”，清除文本框中的内容。

【本题要求上传窗体文件】Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click TextBox2.Text = Len(TextBox1.Text) & Mid(TextBox1.Text, 3, 6)End SubPrivate Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click TextBox1.Text = ""TextBox2.Text = ""End Sub知识拓展：1.本题涉及文本框、窗体的属性设置2.简单的数学计算：注意常用函数的使用如：字符串函数等3. 新建项目，在窗体上创建1个命令按钮(Button1)、1个标签(Label1)和3个单选按钮(RadioButton1~RadioButton3)(1)在属性窗口中设置:标签文字为你的姓名，命令按钮上的文字为“退出”，3个单选按钮上的文字分别为“16”、“18”、“28”。

(2) 编写代码，要求：运行程序，单击单选按钮可相应改变标签文字的大小。

单击命令按钮“退出”可关闭窗体。

【本题要求上传窗体文件】Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.ClickClose()End SubPrivate Sub RadioButton1_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles RadioButton1.Click Label1.Font = New Font("宋体", 16)End SubPrivate Sub RadioButton2_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles RadioButton2.Click Label1.Font = New Font("宋体", 18)End SubPrivate Sub RadioButton3_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles RadioButton3.Click Label1.Font = New Font("宋体", 28)End Sub知识拓展：1.涉及利用单选钮控制标签上文字的大小2. 拓展：利用单选钮控制标签的背景颜色、前景色：Label1.backColor =color.red二、分支1. 用输入对话框InputBox输入一个正整数，判断其能否同时被5和17整除，如能则用标签输出“xxx能同时被5和17整除”，否则输出“xxx不能同时被5和17整除”。

其中，标签中的“xxx”应显示为实际输入的数据。

【本题要求上传窗体文件】Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click Dim n As Integern = InputBox("输入一个正整数")If n Mod 5 = 0 And n Mod 17 = 0 ThenLabel1.Text = n & "能同时被5和17整除"ElseLabel1.Text = n & "不能同时被5和17整除"End IfEnd Sub2. 输入一个代表购物款的实数，判断并输出其对应的实际付款金额。

其中，100元以下为“没有折扣”，[100,500)元为“九五折”，[500,1000)元为“九折”，1000元及其以上为“八五折”。

【本题要求粘贴源程序】Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click Dim x, y As Singlex = Val(TextBox1.Text)Select Case xCase Is < 100y = xCase Is < 500y = 0.95 * xCase Is < 1000y = 0.9 * xCase Elsey = 0.85 * xEnd SelectTextBox2.Text = yEnd Sub知识拓展：1.If ….then …elseif 例4.42.Select case 例4.5-4.6三、循环1.有一个数列，其前二项分别为1、2，从第三项开始，每项均为其相邻的前二项之和的1/3。

判断该数列从第几项开始小于0.0001。

【本题要求粘贴源程序与运行结果】Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click Dim n As Integer, t1 As Single, t2 As Single, t As Singlet1 = 1 : t2 = 2n = 2Dot = (t1 + t2) / 3t1 = t2 : t2 = tn = n + 1Loop Until t < 0.0001Debug.Print(n)End Sub或用数组实现改为输出数列的前30项Dim a(30) As Singlea(1) = 1: a(2) = 2For i = 3 To 30a(i) = (a(i - 1) + a(i - 2)) * 3Next iFor i = 1 To 30Textbox1.text= Textbox1.text & a(i)& vbcrlfNext i知识拓展：1.求数列的部分和，当S大于1000时求和终止并输出结果：例4.192. 从第几项开始该项小于0.001，请输出该项的序号和数值2. 求[200,2000]内的全部素数，统计并输出素数的个数。

【本题要求粘贴源程序与运行结果(只需填写个数)】Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.ClickDim n, i, count As Integer, flag As BooleanFor n = 200 To 2000flag = TrueFor i = 2 To n - 1If n Mod i = 0 Thenflag = FalseExit ForEnd IfNextIf flag ThenTextBox1.Text = TextBox1.Text & n & vbCrLfcount = count + 1End IfNextTextbox2.Text = countEnd Sub四、数组一维数组1.声明一个有15个元素组成的一维数组，利用随机函数给数组赋值，要求计算其中最大的5个元素的平均值。

要求：随机数种子Randomize （2），产生的数据为(0,10)之间的实数。

【本题要求粘贴源程序与运行结果】~9.092091Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click Dim a(14) As Single, s, t As SingleRandomize(2)For i = 0 To 14a(i) = Rnd() * 10Next iFor i = 0 To 13For j = i + 1 To 14If a(i) < a(j) Thent = a(i) : a(i) = a(j) : a(j) = tNext jNext iFor i = 0 To 14TextBox1.Text = TextBox1.Text & a(i) & vbCrLfNext iFor i = 0 To 4s = s + a(i)Next iTextBox2.Text = Val(s / 5)End Sub知识拓展：1.输出最大的5个奇数或偶数2.输出最大的5个元素与最小的5个元素之和或差c = 0For i = 1 To15If a(i) Mod 2 <> 0 ThenDebug.Print( a(i))c = c + 1If c = 5 Then Exit ForEnd IfNext i二维数组声明一个5行5列的二维数组，其元素由[10,55]之间的整数组成，要求分别计算第2行和第4列的数据之和。

合集下载

VBnet总复习x.doc

VBnet总复习x.doc

第1章Visual 程序开发环境.NET的目的以互联网作为新一代操作系统的基础。

.NET开发平台包括.NET框架和.NET开发工具等组成部分，.NET框架包括公共语言运行库和.NET类库。

VB2008利用.NET框架提供的功能，引入了更严格的面向对象特性，如封装、继承、可重载性、多态性等。

对象的三要素：属性、事件和方法启动Visual ⏹第一种方法：使用“开始”菜单中的“程序”命令⏹第二种方法：使用“资源管理器”⏹第三种方法：使用“开始”菜单中的“运行”命令⏹第四种方法：建立启动Visual 的快捷方式退出Visual 应用程序：End或Application.Exit()窗体设计器、解决方案管理器窗口、资源管理器与属性窗口、工具箱窗口、代码窗口❑（1）解决方案文件。

其扩展名为.sln（solution），相当于Visual Basic 6.0中的工程组（.vbp）文件。

❑（2）项目文件。

其扩展名为.vbproj，每个项目对应一个项目文件。

❑（3）窗体和代码模块文件。

其扩展名为.vb，在Visual 中，所有包含代码的源文件都以.vb作为扩展名。

除主窗口外，集成开发环境中还有其他一些窗口，这些窗口可以在需要时打开，不需要时关闭或隐藏。

其他窗口的显示方式主要有4种，分别为“可停靠”、“隐藏”、“浮动”和“自动隐藏”。

第2章VB2008数据类型和表达式Visual Basic中的语句：❑语句的构成（由Visual Basic关键字、对象属性、运算符、函数以及能够生成Visual Basic编辑器可识别指令的符号组成。

）❑自动语法检查❑复合语句行（各语句之间用冒号（:）隔开）❑续行（使用的续行符是下划线（_），续行符与它前面的字符之间至少要有一个空格）注释语句：REM 注释内容或' 注释内容数据类型：①字符（Char）、字符串（String $）②短整型（Short）、整型（Integer %）、长整型（Long &）③单精度数（Single ！）、双精度浮点数（Double #）、Decimal类型@④字节（Byte）、布尔（Boolean）、日期（Date）、对象（Object）[以32位（4个字节）的地址形式存储，此地址为对象引用。

《VBnet复习》PPT课件

《VBnet复习》PPT课件


描述
回车符 换行符 水平制表符 正常
Click：用户在窗体中任意位置单击时触 发 Load：窗体在内存中被加载时触发
第6页
1.4.1 窗体——常用事件
常用事件
TextChanged：修改文本框中的内容时触发 KeyPress：按某个键结束时触发
第7页
1.4.2 基本控件——TextBox 控件
常用属性
MultiLine：是否多行显示，逻辑值
⑤续行：空格+“_” ⑥注释语句： “Rem”或“’”。可单独成行，也可在语
句后
⑦绿色下划波浪线：语法错误。鼠标悬停可查看错误信息
第4页
对象的通用属性
Name：对象的名称，在程序中引用。 Text：与控件关联的文本。 Enable：是否启用该控件。 Visible：控件是否可见。
第5页
1.4.1 窗体——常用事件
对象的三要素
对象的 对特象征的特征
与状态
属性
方法
对象行为和功能
事件
发生在对象 上的活动
1.3.1 应用程序结构与编码规 则
编码规则
①程序代码不区分大小写。 ②名称遵守标识符命名规则。
③ 在语句格式中：[]可选项；<>必选项；|二选一； [，…]如果出现重复，以逗号隔开
④ 一行可书写若干语句，语句之间用“：”隔开。
负数：-3.402823E38~ -1.401298E-45 正数：1.401298E-45 ~ 3.402823E38 有效数字位最多7位
负数：-1.79769313486231D308 ~ -4.94065645841247D-324 正数：4.94065645841247D-324 ~ 1.79769313486231D308
VB复习

VB复习


Dim a() As Integer, n%, i%, sum% n = Val(InputBox("n=")) ReDim a(n - 1) 重定义数组 For i = 0 To n - 1 a(i) = Int(Rnd() * 100 + 1) Label1.Text &= a(i) & " " sum = sum + a(i) Next ReDim Preserve a(n) a(n) = sum Label1.Text &= a(n) & " " & vbCrLf For i = 0 To n Label1.Text &= a(i) & " " Next
结构类型 Structure studType ' studType为类型名 Dim Name As String ' 姓名 Dim Sex As Char ' 性别 Dim Telephone As Long ' 电话 End Structure Dim s1 ，s2 ,s(10) As studType
c1 = CountC(TextBox1.Text)
子过程：
Sub CountC(ByVal s$, ByRef count%) Dim i%, t%, c$ For i = 1 To Len(s) c = Mid(s, i, 1) If Asc(c) < 0 Then count = count + 1 Next i End Sub 调用： Dim k% Call CountC(TextBox1.Text , k)
运算符和表达式:
• 优先级
vb期末考试复习资料

vb期末考试复习资料

vb期末考试复习资料vb期末考试复习资料1.Visual 的特点是什么？答：1构造函数2继承的完善 3完全的面向对象 4自由线程 5方法的概念6 Web表单和Web服务功能2. 面向对象语言必须满足的三个基本条件是什么？答：1封装性 2继承性 3多态性因此，Visual 已经实现了完全的面向对象。

3. 代码的书写规则是什么？答：1一行可书写若干条语句2语句的续行 3注释语句4. Visual 的工作模式是什么？答：1设计模式 2运行模式 3中断模式5. 常见的错误类型是什么？答：1编译错误2运行错误 3逻辑错误6. 什么是？答：是 Framework 的重要组成部分，中包含用于连接至数据源、提交查询以及处理结果的类，利用中最主要的非连接对象DataSet （数据集）能以脱机方式处理数据，可以对数据进行排列、搜索、筛选等操作。

使用 可以对多种数据源中的数据进行有效处理，从而轻松地在 Framework 中创建出分布式、数据共享的应用程序。

7. 对象模型的组成及作用是什么？答：对象模型由两类基本组件构成：.NET数据访问对象和DataSet。

作用：数据访问对象可以直接处理特定数据源中的数据，这些对象分别用于连接到数据库、执行命令和检索结果。

DataSet 则可以看做是一种数据储存，可以用于多个不同的数据源，本质上讲，DataSet是一个内存中的数据库，但它并不直接和数据库打交道，不从数据库直接取得数据，在DataSet中所作的地操作也不能直接反映到数据库中的原始数据上。

如想在DataSet中放入数据库中的数据，首先要使用数据访问对象中的Connection对象建立连接，然后使用DataAdapter对象取得数据填充相应的数据集。

8. 什么是对象并举例说明？答：简单地说，对象是对客观世界中实体的映射。

如手机、学校、消费者、汽车、一个部门等都是真实存在的实体。

9. 对象是面向对象编成的基本元素是什么？答：1属性2方法 3事件10. 什么是属性？答：属性是描述对象状态的数据，如计算机的品牌、规格、内存大小和颜色等状态就是属性。