vb基础操作.pptx

2.4 综合应用;2.4 综合应用;2.4 综合应用;2.4 综合应用;4.1 顺序结构的程序设计;4.1 顺序结构的程序设计;4.1 顺序结构的程序设计;4.1 顺序结构的程序设计;4.1 顺序结构的程序设计;4.1 顺序结构的程序设计;4.1 顺序结构的程序设计;4.1 顺序结构的程序设计;4.1 顺序结构的程序设计;4.1 顺序结构的程序设计;4.1 顺序结构的程序设计;4.1 顺序结构的程序设计;4.1 顺序结构的程序设计;4.1 顺序结构的程序设计;4.1 顺序结构的程序设计;4.1 顺序结构的程序设计;4.1 顺序结构的程序设计;4.1 顺序结构的程序设计;4.1 顺序结构的程序设计;4.1 顺序结构的程序设计;4.1 顺序结构的程序设计;编写程序，在实数范围内求解一元二次方程：aX2+bX+c=0;4.1 顺序结构的程序设计;4.1 顺序结构的程序设计;4.1 顺序结构的程序设计;4.1 顺序结构的程序设计;4.1 顺序结构的程序设计;4.1 顺序结构的程序设计;4.1 顺序结构的程序设计;;4.1 顺??结构的程序设计;4.1 顺序结构的程序设计;编写程序，输入一个X的值，按照以下表达式计算 Y 的值： 1＋X2 (X0) ① Y= 0 (X=0) ② 1－X2 (X0) ③ ;4.2 选择结构的程序设计;4.2 选择结构的程序设计;编写程序，将学生的百分制成绩按要求转换成相应的等次输出。等次分为五种，具体划分为： 90 ～ 100： 优秀 80 ～ 89： 良好 70 ～ 79： 中等 60 ～ 69： 及格 0 ～ 59： 不及格;4.2 选择结构的程序设计;4.2 选择结构的程序设计;4.2 选择结构的程序设计;4.2 选择结构的程序设计;4.2 选择结构的程序设计; 4.2.3 多分支选择结构的程序实现;1.该语句也被叫做“错误陷阱”语句。 错误处理程序依靠 Err 对象的 Number 属性中的值来确定错误发生的原因。;显示输入数据的算术平方根。;4.2 选择结构的程序设计;4.2 选择结构的程序设计;Private Sub cmdStart_Click() Dim X!, XSqrt! X = Val(InputBox(, 输入数据)) XSqrt = Sqr(X) lblResult.Caption = X 的算术平方根为： XSqrt End Sub;4.2 选择结构的程序设计; 有一张面积足够大的纸，如果可能，你将它不断的对折。编写程序，计算对折多少次以后可以超过珠穆朗玛峰（8844430mm）的高度？; 有一张面积足够大的纸，如果可能，你将它不断的对折。编写程序，计算对折多少次以后可以超过珠穆朗玛峰（8844430mm）的高度？;Private Sub cmdStart_Click() Dim H#, N% N = 0 H = Val(InputBox(输入纸的厚度（mm）)) lblPaper.Caption = 纸的厚度： H mm While H = 8844430 H = H * 2 N = N + 1 Wend lblH.Caption = 对折 N 次后的厚度为： H mm End Sub;4.3 循环结构的程序设计;4.3 循环结构的程序设计;任给一自然数，编写程序，求其反序数 。; 编写程序，利用固定次数循环计算 ; 例 4.17 ; 相传古代印度国王舍罕要褒奖他聪明能干的宰相（国际象棋发明者）达依尔。国王问达依尔需要什么，达依尔说：国王只要在国际象棋的棋盘上第一格放一粒麦子，第二格放两粒麦子，第三格放四粒麦子，以后都按此比例每一格都是前一格的两倍，一直放到第64格为止，我将感激不尽！国王一听马上便答应下来，结果，他让扛过来的麦子，不一会儿就用完了。国王很纳闷，这到底是怎么回事呢？我们下面编程序，让计算机来算一算这笔帐，假定1.42×108粒小麦/m3，计算一下这么多小麦有多大的体积。; 这实际上是计算： ; 这实际上是计算： ; 这实际上是计算： ;编写程序，判断输入的整数是否是素数。;编写程序，判断输入的整数是否是素数。;编写程序，