1、VB 算法总结:1、最大公约数算法说明 1) 最大公约数：用辗转相除法求两自然数 m、n 的最大公约数。（1） 首先，对于已知两数 m、n，比较并使得 mn；（2） m 除以 n 得余数 r；（3） 若 r0，则 n 为求得的最大公约数，算法结束；否则执行步骤（4）（4） mn nr 再重复执行（2）譬如： 10 与 5分析步骤： m=10 n=5r=m mod n=0所以 n(n=5)为最大公约数24 与 9分析步骤： m=24 n=9r=m mod n=6r0 m=9 n=6r=m mod n=3r0 m=6 n=3r=m mod n=0所以 n(n=3)为最大公约数算法实现Private
2、 Function GCD(ByVal m As Long, ByVal n As Long) As LongDim temp As LongIf m o n = m Mod r m = m r If n 9 Then StrDtoR = Chr(65 + n - 10) MaxPrint “在第“ “第“ （3）若所取字符是“空格” ， “逗号”， “分号”或“ 感叹号”等单词的分隔符， 则表示字符不是单词内字符，让 WT=False;(4) 再依次取下一个字符，重得（2）(3) 直到文本结束。下面程序段是字符串 strI 中包含的单词数Nw = 0: Wt = FalsestrI = “I
3、 am a student,I am a teacher“nL = Len(RTrim(strI)For i = 1 To nLstrT = Mid$(strI, i, 1) 取第 i 个字符Select Case strTCase “ “, “,“, “;“, “!“Wt = FalseCase ElseIf Not Wt ThenNw = Nw + 1Wt = TrueEnd IfEnd SelectNext iPrint “单词数为：“, Nw10、穷举法穷举法（又称“ 枚举法”）的基本思想是：一一列举各种可能的情况，并判断哪一种可能是符合要求的解，这是一种“在没有其它办法的情况的方法”
4、，是一种最“笨” 的方法，然而对一些无法用解析法求解的问题往往能奏效，通常采用循环来处理穷举问题。例： 将一张面值为 100 元的人民币等值换成 100 张 5 元、1 元和 0.5 元的零钞，要求每种零钞不少于 1 张，问有哪几种组合？Dim i%, j%, k%Print “5 元 1 元 0.5 元“For i = 1 To 20For j = 1 To 100 - ik = 100 - i - jIf 5.0 * i + 1.0 * j + 0.5 * k = 100 ThenPrint i, j, kEnd IfNext jNext i11、递归算法用自身的结构来描述自身，称递归VB
5、 允许在一个 Sub 子过程和 Function 过程的定义内部调用自己，即递归 Sub子过程和递归 Function 函数。递归处理一般用栈来实现，每调用一次自身，把当前参数压栈，直到递归结束条件；然后从栈中弹出当前参数，直到栈空。递归条件：（1）递归结束条件及结束时的值；（2 ）能用递归形式表示，且递归向终止条件发展。例：编 fac(n)=n! 的递归函数Function fac(n As Integer) As IntegerIf n = 1 Then fac = 1Elsefac = n * fac(n - 1)End IfEnd FunctionASCII 码表信息在计算机上是用二进
6、制表示的，这种表示法让人理解就很困难。因此计算机上都配有输入和输出设备，这些设备的主要目的就是，以一种人类可阅读的形式将信息在这些设备上显示出来供人阅读理解。为保证人类和设备，设备和计算机之间能进行正确的信息交换，人们编制的统一的信息交换代码，这就是 ASCII 码表，它的全称是“美国信息交换标准代码”。八进制 十六进 制 十进制 字符 八进制 十六进制 十进制 字符00 00 0 nul 100 40 64 01 01 1 soh 101 41 65 A02 02 2 stx 102 42 66 B03 03 3 etx 103 43 67 C04 04 4 eot 104 44 68 D0
7、5 05 5 enq 105 45 69 E06 06 6 ack 106 46 70 F07 07 7 bel 107 47 71 G10 08 8 bs 110 48 72 H11 09 9 ht 111 49 73 I12 0a 10 nl 112 4a 74 J13 0b 11 vt 113 4b 75 K14 0c 12 ff 114 4c 76 L15 0d 13 er 115 4d 77 M16 0e 14 so 116 4e 78 N17 0f 15 si 117 4f 79 O20 10 16 dle 120 50 80 P21 11 17 dc1 121 51 81 Q22
8、 12 18 dc2 122 52 82 R23 13 19 dc3 123 53 83 S24 14 20 dc4 124 54 84 T25 15 21 nak 125 55 85 U26 16 22 syn 126 56 86 V27 17 23 etb 127 57 87 W30 18 24 can 130 58 88 X31 19 25 em 131 59 89 Y32 1a 26 sub 132 5a 90 Z33 1b 27 esc 133 5b 91 34 1c 28 fs 134 5c 92 35 1d 29 gs 135 5d 93 36 1e 30 re 136 5e 94 37 1f 31 us 137 5f 95 _40 20 32 sp 140 60 96 41 21 33 ! 141 61 97 a42 22 34 “ 142 62 98 b43 23 35 # 143 63 99 c44 24 36 $ 144 64 100 d45 25 37 % 145 65 101 e46 26 38 173 7b 123 74 3c 60 176 7e 126 77 3f 63 ? 177 7f 127 del
