考题分类总结2013春.pptVIP

江苏省计算机二级VB考题分类总结 典型题型 1.与素数相关 找一定区间范围内的素数 孪生素数（差为2的一对素数） 幻影素数（原数和其逆序数都为素数） 歌德巴赫猜想（偶数可以表示成任意两个素数） 超级素数：等于两个整数平方和的素数 由不同数字组成的素数 首位和末位相同的素数 首末两位之和等于中间两位之和的素数 判断一个数是否是素数 判断一个数是否是孪生素数 验证哥德巴赫猜想 判断一个数是否是超级素数 Dim N As Integer, M As Integer, k As Integer Dim i As Integer, j As Integer, s As String N=Text1: M=Text2 For i = N To M If Prime(i) Then For j = 2 To Sqr(i) – 1 ’超级素数 k = i - j ^ 2 If Sqr(k) = Int(Sqr(k)) Then ’完全平方数 s = Str(i) = Str(j ^ 2) + Str(k) List1.AddItem s Exit For End If Next j ’先判断是否是素数，再判断是否由两个完全平方数组成 End If Next I 找出给定范围内满足有关条件的所有的数 2.字符处理（For循环＋Mid函数） 从一串大小写字母混合的字符串中把其中的大写字母提取出来 从一串数字字母混合的字符串中把其中的单个或连续的数字或字符提取出来，然后再处理 字符串的加密、解密 统计字符串中各字符的次数 查找字符串中最大、最小字符 删除或插入指定字符 3.数字处理 各种进制数之间的转换 十进制转换成N进制 N进制转换成十进制 回文数 完数（找因子） 升序数、降序数 armstrong数（等于各位的n次方和） 找出某个数的质因子 判断某整数的各位数字互不相同 （掌握如何将某整数的各位数字存放在动态数组中再进行比较） 十进制—N进制：方法是除N取余，注意逆序 N进制—十进制：按权求和 二进制——十六进制 十六进制——二进制 回文数：左右对称的数为回文数 求因子算法与求判断是否为完数算法 判断一个数是否为升序数 判断一个数是否是Armstrong数 Private Function sx(x As Integer) As Boolean Dim j As Integer, m As Integer，S As String S=CStr(N) : k = Len(S) For j = 1 To k m = m + Val(Mid(S, j, 1)) ^ k Next j If m = N Then Prime = True End Function 找出某个数的质因子 如:120=2*2*2*3*5 判断整数n由不同的数字组成 Private Function judge(n As Long) As Boolean Dim k As Integer, a() As Integer, i As Integer, j As Integer Do k = k + 1 ReDim Preserve a(k) a(k) = n Mod 10 n = n \ 10 Loop Until n = 0 For i = 1 To UBound(a) - 1 For j = i + 1 To UBound(a) If a(i) = a(j) Then Exit Function Next j Next i judge = True End Function 4.关于数组处理 如何生成数组长度由用户输入的随机数组，并在窗体、文本框、图片框输出数组； 如何生成不含重复数的一维数组； 一维数组排序、找数组最大、最小的元素，找离平均值（最大、最小）最近的元素及位置； 删除数组中最大/最小数； 调整符合条件的数在数组中的位置：如将第i个元素调至数组第一位或最后; 二维数组中找最大、最小元素，并记录位置，求主、副对角线元素之和、周边元素之和、鞍点； 求二维数组每行（列）最大、最小元素，再做处理 在图片框和文本框中输出二维数组 生成无重复数数组 Dim n As Integer, i As Int