2. 计算机
  3. 设有一个10个元素的数组，下列程序将该数组的第一个元素与第十个元素交换，第二个元素与第九个元素交换……，第五个元素与第六个元素交换，请补充完该程序。 Private Sub Commnd1_Click() Dim a(1

设有一个10个元素的数组，下列程序将该数组的第一个元素与第十个元素交换，第二个元素与第九个元素交换……，第五个元素与第六个元素交换，请补充完该程序。 Private Sub Commnd1_Click() Dim a(1

admin2010-03-30  29
问题 设有一个10个元素的数组，下列程序将该数组的第一个元素与第十个元素交换，第二个元素与第九个元素交换……，第五个元素与第六个元素交换，请补充完该程序。
   Private Sub Commnd1_Click()
               Dim a(1 To 10)As Integer
               Dim i As Integer
               Dim p As Integer
               Dim t As Integer
               Dim j As Integer
               For i=1 To 10
                   a(i)=i
               Next i
               For j=1 To 5
             【   】
             【   】
             【   】
               Next j
               For i=1 To 10
                    Print a(i)
               Next i
   End Sub
选项
答案t=a(j) , a(j)=a(10-j+1) ,a(10-j+1)=t
解析
转载请注明原文地址:https://jikaoti.com/ti/ppq0FFFM
本试题收录于： 二级VB题库NCRE全国计算机二级分类
0

二级VB

NCRE全国计算机二级

相关试题推荐
随机试题
最新回复(0)