二、2012年春江苏省二级vb(阅读程序)1学习.docVIP

2012年春季南天计算机 江苏二级VB考前强化班资料 第二部分：VB填空 一、VB语言基础 1、算术运算符 ^（乘方）、/（除）、\（整除）、Mod（取余）、（字符串连接） 2、程序的基本算法结构 三种基本结构： 顺序结构 分支结构：IFFor I=1 to 10 s=s+I Next I I=1 Do While I=10 s=s+I I=I+1 Loop 【1】2008年春 填空1 【2】2010年秋 填空1 【3】2011年春 填空1 3、VB公共函数 （1）、转换函数：Int(x)，Fix(x)，CInt(x) Str(x)，Cstr(x) ★★：Str(x)：将数值型数据转换为字符串，包含符号位 CStr(x)：将x转换成字符串型，如x为数值型的，则正数不保留符号位。 【1】正确表示命题“A是一个带小数的正数，且B是一个带小数的负数”的逻辑表达式是__________。（2003年春填空1） （2）、字符函数：Len(x)、Mid(x,n1,n2)、Left(x,n)、Right(x,n)、Ltrim(x)、Rtrim(x)、Trim(x)、Instr([n,]x,”字符”)、string(n,”字符”)、Space(n) InStr函数返回 Variant (Long【1】2005年春 填空7 【2】2007年春 填空7 【3】2007年秋 填空1 【4】2008年秋 填空5 【5】2009年春 填空7 【6】2009年秋 填空5 【7】下面程序的功能是求两个特大整数之和。由于VB中能够表示的整数大小有一定限制，所以必须用新的方法求特大整数之和。本程序将特大整数使用字符类型进行处理，其中函数Add用于求两个1位整数之和，参数c用于保存进位。注意：求和前需先将两个整数按位对齐。（2010年春 填空8） Option Explicit Private Sub Command1_Click() Dim s1 As String, s2 As String, s3 As String Dim i As Integer, n1 As Integer, n2 As Integer Dim c As Integer, n As Integer s1 = Text1: s2 = Text2 n =____________________________ If Sgn(n) 0 Then s2 = ______________________________ 函数String(n,0)返回包含n个0的字符串 ElseIf Sgn(n) 0 Then s1 = String(Abs(n), 0) s1 End If For i = Len(s1) To 1 Step -1 n1 = Val(Mid(s1, i, 1)) n2 = Val(Mid(s2, i, 1)) s3 = _________________________ Next i If c 0 Then __________________________ Text3 = s3 End Sub Private Function add(x As Integer, y As Integer, c As Integer) As String add = CStr((x + y + c) Mod 10) ______________________________ End Function （3）、数学函数Abs（）、Sqr（）等 【1】下列程序的功能是计算圆周率π（计算精确到第n项减1的绝对值小于10-5为止）。（2005年春 填空6） Option Explicit Private Sub Form_Click() Dim y As Single, t As Single, a As Single y = 2 t = 0 Do _______________________ a = 2 / t If _________________________Then Exit Do y = y * a Loop Print pi=; y End Sub （4）、格式化函数 Format[$] 格式化函数Format[$]是专门用于将数值、日期和时间数据按指定格式输出的函数。它的一