2012年计算机考试二级VB考点及习题（7）
|
注意： F按值传递参数 形参和实参的类型不一定要统一，VB自动进行数据的转换。 –例如：Private Sub Form_Click() Dim a As String : a = 2 Call sub1(a) Print a End Sub Private Sub sub1(ByVal b As Integer) b = b + 1 : Print b End Sub F按地址传递参数 –当实参是变量时：如果形参规定了类型，则实参必须跟形参保持一致 如果形参没有规定类型，则VB按要求进行数据类型转换 –当实参是常量或表达式时： VB自动用“按值传递”的方式进行处理，如果数据类型不统一，VB自动进行数据转换 例如：1、在应用程序中用“Private function Fun(X as integer,Y as single)”定义了函数Fun。调用函数Fun的过程中的变量I、J均为Integer型，能正确引用函数Fun的是( ) A.Fun(I,J) B.Call Fun(I,3.56) C.Fun(3.14,234) D.Fun("245","231.5") 2.程序中的不同过程之间，不能通过_________进行数据传递。 ①全局变量 ②窗体或模块级变量 ③形参与实参结合 ④静态变量 A. ①②④ B. ①②③ C.②④ D.④ 二级考试必考题型：(课后习题) 传值 传地址 Static变量 同名变量 递归过程 例如： 1、以下有关变量作用域的说法中，错误的是( ) A. 只有在标准模块中用public语句说明的变量才是全局变量 B. 在过程中不能使用public语句说明全局变量 C. 在标准模块的通用声明处可用private语句说明模块级变量 D. 在窗体的通用声明处可用private语句说明窗体级变量 2.一个名为frm1的窗体，在窗体通用声明处和过程sub1中分别定义：public k as integer、dim k as integer如何在sub1中访问全局变量k( ) A.frm1.k B.form.k C.form1.k D.k 例：阅读程序，给出输出结果： (1)字符串处理(数组参数) Option Base 1 Private Sub Form_Click() Dim st As String, char As String Dim data() As String, i As Integer, j As Integer st = "10281018123811181038" For i = 1 To Len(st) If Mid(st, i, 1) <> "8" Then char = char & Mid(st, i, 1) Else j = j + 1 ReDim Preserve data(j) data(j) = char char = "" End If Next i Call conver(data, char) Print char End Sub Private Sub conver(a() As String, ch As String) Dim i As Integer, j As Integer Dim n As Integer, dec As Integer For i = 1 To UBound(a) n = Len(a(i)) For j = 1 To n dec = dec + Val(Mid(a(i), j, 1) * 8 ^ (n - j)) Next j ch = ch & Chr(dec) dec = 0 Next i End Sub 相关资料 |
