题目内容

65（）

A. raise
B. settle
C. grow
D. unite

查看答案

搜索结果不匹配？点我反馈

更多问题

61（）

A. restrained
B. retained
C. reserved
D. restricted

以下程序在文本框Text1中输入任一字符串，并按相反的次序显示在文本框Text2中。请将空白处补充完整。 Private Sub Command1_Click() Dim N As String,C As String,D As String N=Text1.Text M= For i=M To 1 Step-1 C=Mid(N,i,1) D=D & Next i Text2.Text=D End Sub

63（）

A. influence
B. make
C. afford
D. provide

以下程序的功能是将多维数组a(1 To m，1 To n)中的元素转移到一个名为b(1 To n)的一维数组中，请填写空白处，完成该程序。 Option Base 1 Private Sub Command1_Click() Dim a(1 To 4,1 To 5) Dim b() ReDim For i=1 To 4 For j=1 To 5 a(i,j)=i*j Next i Next i Call Transf(a,4,5,B) End Sub Sub Trasf(a(),m,n,b()) Dim x As Integer x=1 For i=1 To m For i=1 To n b(x)= x=x+1 Next i Next i End Sub