DIM AS INTEGER A(6),I,T,J,P T=0 FOR I=1 TO 6:A(I)=7-I:NEXT F

来源：学生作业帮编辑：搜搜考试网作业帮分类：综合作业时间：2024/07/28 00:36:24

DIM AS INTEGER A(6),I,T,J,P T=0 FOR I=1 TO 6:A(I)=7-I:NEXT FOR I=1 TO 5 FOR J=1 TO 5 IF A(J)>A(

Dim k As Integer
n = 0
Total = 0
For k = 0 To 25
Label1(k) = Chr(97 + k) Ne '----------可能差个运着符或 "&"连接符吧
next '-----------------
end sub,------------没这个咋行.代码太少看不清意思,只能看语法了,
猜测是按a-Z键.Label1(K)控件会对应显示,a-Z的26个字符.

DIM AS INTEGER A(6),I,T,J,P T=0 FOR I=1 TO 6:A(I)=7-I:NEXT F Dim a(1 To 10) As Integer Dim i As Integer a(1) = 1 For i = dim a(10,10) as integer for i=1 to 10 for j=1to 10 a(i,j)=i* vb程序Dim a(1 To 20) As Integer,i As Integer,j As Integer 评定等级() Dim i As Integer For i = 3 To 11 t = Sheets(1).Cells( Private Sub Command1_Click() Dim i,j As Integer For i = 3 To dim i as integer dim sum as integer sum=0 for i=0 to 5 sum=s VB dim x as integer dim i as integer x = 100 for i = 1 to 10 Dim i As Integer,n As Integer For i = 0 To 50 i = i + 3 n = Dim x(3,5) As Integer For i = 1 To 3 For j = 1 To 5 x(i,j) = 求结果dim a(6) for i=0 to 6 a(i)=i+1 next for i=0 to 6 count=co Dim x(100), a For i = 1 To 100 x(i) = i Next i For Each a In