VB辅导前半部分(测试题).ppt

程序理解题 测试题：（05年秋）下列过程的功能是为形参a所对应的n个元素的实参数组送数；第一个元素赋值n，其他元素为2位随机整数，要求这n个数各不相同（多次考）。 1 A、rnd*99 B、10+rnd*90 C、rnd*100 D、int(rnd*100) 2 A、i B、n-1 C、i-1 D、n 3 A、break B、exit sub C、j=j-1 D、exit for 4 A、ji B、j=i C、xa(i) D、ji 请写出连续两次单击后的结果 *综合例题1：写出程序首次运行后文本框的结果： Dim y As Integer Private Sub Command1_Click() Dim x As Integer x = 2 Text1.Text = func1(func2( func1(x), y )) Print X=; x; Y=; y End Sub Private Function func1(x As Integer) As Integer x = x + y y = x + y func1 = x + y End Function Private Function fun