1、l已知运输公司的运费计算公式为：F=P*W*S*(1 d)其中：F为总运费，P为每吨货每公里的基本运费，W为货物重，S为路程距离，d为折扣。折扣d的计算标准如下：2500%2505002%50010005%100020008%2000300010%300015%ssssssl行结构If Then Else l块结构If Then Else End IfIf ThenElseIf Then ElseIf Then Else End IfSelect Case Case Case Case ElseEnd Selectl:下列格式中的一个或多个(,)l精确表示：,，如：1,3,5,7,9l范围表示
2、：To，如：A To Zl关系表示：Is ，如：Is=60l用下列公式求的近似值，要求直到最后一项的小于10-6为止l根据下列公式求 e 的近似值，要求直到直到最后一项的小于10-6为止1111143579 1111111!2!3!4!5!e l功能：以指定的次数重复执行循环体l格式：For 变量=初值 To 终值 Step 步长 语句块 Exit For 语句块 Next 变量步长为循环控制变量的每次改变增量，缺省为1 Exit For为强制退出循环语句循环体l格式:Do While|Until 语句块Exit Do语句块Loop While|Until 循环体l用条件来控制循环体的重复执行
3、l格式：While Wendl与Do WhileLoop结构相当1.寻找循环变量 i 的通项表达式：For i=注意初终值和步长(Step)T=关键在于写出通项S=S+TNext i2.寻找迭代式（前后两项的关系）：For i=T=T 关键在于写出迭代式S=S+TNext il单击窗体后，在窗体上显示如下数字字符金字塔：l模板：For i=1 To n n行 Print Spc(x);每行起始x空格 For j=1 To m 每行m个 Print“A”;图案字符 Next j Print 换行Next il单击窗体时，从键盘上输入两个年份m和n，然后求出m和n之间的所有闰年l穷举法又称蛮力法，
4、它的思路是列举出所有可能的情况，逐个判断哪些符合问题所设的条件，从而得到问题的解l如：l素数、水仙花数、桃花数、同构数l最大公约数、最小公倍数l百鸡问题、韩信点兵l单击窗体时，先随机产生10个两位整数，然后将它们按从大到小的顺序输出在窗体上l数组是数组变量的简称，是一批具有相同名字但具有不同下标的变量（又称下标变量）。通常利用数组来保存多个具有相同类型的数据l单击Command1，判断文本框Text1中的内容是否回文；单击Command2，用InputBox输入一文本内容，然后统计它在文本框Text1中出现的次数lLen(s)l取出字符串s的长度(字符个数)，如：L=Len(s)lMid(s,
5、i,n)l从字符串s的第i个字符取出n个字符l取出第i个字符：x=Mid(s,i,1)l取出倒数第i个字符：y=Mid(s,L i+1,1)lInStr(s1,s2)l判断字符串s2在s1中的位置，如果不在则返回0，否则返回具体的位置l在文本框Text1中输入任意字符串，单击命令按钮Command1时，将此字符串按ASCII码从大到小的顺序输出在标签Label1上l下列程序运行时，设文本框Text1.Text为空，在Text1获得输入焦点后，依次按下列按键：“1”、“2”、“+”、“3”、“4”、“-”、“5”、“6”、回车键。分别写出文本框中和窗体上的输出结果 Private Sub Tex
6、t1_KeyPress(k As Integer)If k Asc(9)Then k=0 Print Text1.Text End IfEnd Sub l已知文本框Text1初始为空，阅读以下程序，在相应的选项中选择正确的答案来回答问题(31)、(32)和(33)Private Sub Text1_Change()Dim s As Integer s=s+Val(Text1.Text)Print sEnd Subl过程级变量（局部变量）l变量在事件过程中声明l有两种声明方法：Dim和Staticl用Dim语句声明的变量，在过程结束后，系统将释放变量占用的内存空间，即变量不存在了l用Static
7、语句声明的变量，在过程结束后，系统依然保留变量占用的内存空间，通常把Static声明的变量称为静态变量l模块级变量l在通用|声明中用Dim语句或Private语句声明的变量l模块级变量能在此模块的所有事件过程中被调用l模块级变量只有在本模块被卸载时占用的内存空间才会被释放l应用程序级变量（全局变量）l在通用|声明中用Public语句声明的变量l应用程序级变量在工程中的所有模块的所有事件过程中均可调用，但在调用时必须指明调用的变量是在哪个模块中声明的l应用程序级变量只有在程序结束运行时占用的内存空间才会被释放l编写自定义函数过程Sum(n As Integer)，用于计算1到n所有数的和。单击C
8、ommand1时，用InputBox从键盘输入一个整数n，然后调用Sum函数，求出下式的值：s=1+(1+2)+(1+2+3)+(1+2+3+4+n)l编写一个Sub过程Sub PrntPrime(x()As Integer)，用于判断某数组中是否有素数，若有则将其显示在窗体上。单击命令按钮Command1生成20个两位的随机整数，然后调用该过程，将此20个数中是素数的数显示在窗体上？l写出下列程序运行时，单击命令按钮Command1后窗体上的显示结果？Function f2(ByVal n1 As Integer,n2 As Integer)As Integer Dim i As Integ
9、er Do While n2=n1 f2=f2+n2:n2=n2-1 LoopEnd FunctionPrivate Sub Command1_Click()Dim a As Integer,b As Integer a=5:b=8 Print f2(a,b)Print f2(b,a)End Suba=5b=4f2=26a=3b=4f2=9l按地址传递ByRefl形式参数与实际参数共享同一内存空间，两个变量名都指向相同的地址l调用时实参形参，而后形参的任何改变都同时影响实参l按值传递ByVall形式参数与实际参数指向各自的内存空间l调用时实参形参，是单向传递，形参的改变不影响实参l形参没有用声明时，默认为ByRefl实参为表达式时，均视为ByVal注意：调用过程时，实参个数必须与形参的个数一致，且数据类型也须一致
