（26）在窗体上放置一个命令按钮Command1，并编写下列单击事件的程序：

         Private Option Base 1

         Sub Command1_Click()

         Dim c As Integer,d As Integer

       d=0

       c=6

       X=Array(2,4,6,8,10,12)

       For i=1 To 6

           IfX(i)>c Then

          d=d+X(i)

          c=X(i)

                 Else

          d=d-c

           End If

       Next i

       Print d

         End Sub

         程序运行后，单击命令按钮，则在窗体上输出的结果是 。

（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）按照逻辑结构分类，结构可以分为线性结构和非线性结构，栈属于。