（30）窗体上有两个文本框Text1、Text2以及一个命令按钮Commandl,编写下列程序：

         Dim y As Integer

         Private Sub Commandl_Click()

         Dim x As Integer

x=2

       Text1.Text=p2(pl(x),y)

       Text2.Text=p2(x)

         End Sub

         Private Function p2(x As Integer,y As Integer)

        x=x+y：y=x+y

        pl=x+y

         End Function

         Private Function p2(x As Integer,y As Integer)As Integer

        p2=2*x+y

          End Function

         当单击1次和单击2次命令按钮后，文本框Text1和Text2内的值分别为（  ）。

（10）假设有下列程序段：

         For i=1 To 3

           For j=5 To 1 Step -1

          Print i*j

           Next j

         Next i

则语句Print i*j的执行次数是，i的值为______，j的值为______。

（11）下列是一个体操评分程序。设满分为10分，20位评委，除去一个最高分和一个最低分，计算平均分。

         Private Sub Command1_Click()

          Max=0

          Mix=10

          For i=1 To 20

         n=Val(InputBox("请输入分数"))

         If n>Max Then Max=n

         If n>Mix Then Mix=n

         s=s+n

 s=s-Mix-Max

          P=s/18

          Print"最高分";Max;"最低分";Mix

          Print"最后得分：";p

         End Sub

（9）滚动条的最小值属性是，最大值属性是______。

（8）在程序的空白处填写适当的语句，完成下列功能：依次自动将列表框List2中所有列表项目移入列表框List1中，并将移入List1中的项目从List2中删除        

Do While List2.ListCount

           _____________________

           List2.RemoveItem 0

        Loop

下列程序段的功能是：从文本框中输入一个数值，如果该数值满足“除以4余1，除以5余2”条件，则在窗体上输出文本框中的数值，否则，将焦点定位在文本框中，并清除文本框的内容。请填空。

        Private Sub Command1_Click()

       x=Val(Text1.Text)

       IfThen

          Print x

       Else

          ________

          Text1.Text=""

       End If

        End Sub

（4）在面向对象方法中，类之间共享属性和方法的机制称为。

（5）软件是程序、数据和的集合。

（6）表达式Len(Str(1.3))Mod2的值为。

（3）树中度为零的结点称为。

（2）按照逻辑结构分类，结构可以分为线性结构和非线性结构，栈属于。