张明明和戴季小说:求这个VB问题的代码!

来源:百度文库 编辑:中科新闻网 时间:2024/04/27 20:35:09
小弟初学VB,刚刚开始,买了一本书,可是上面的题没答案,我做不出来,请教会的朋友写下啦!
题目是:求1到300之间所有能被11整除的数,并按首行10个数,次行9个数递减显示满足条件的数!
很简单,呵呵。。可是我下午开始学的,找不到怎么下手!

i = 1
For j = 10 To 1 Step -1
For k = 1 To j
Do While (i <= 300)
If (i Mod 11) = 0 Then
Print i & Chr(9);
i = i + 1
Exit Do
Else
i = i + 1
End If
Loop

Next k
Print
Next j
运行结果:
11 22 33 44 55 66 77 88 99 110
121 132 143 154 165 176 187 198 209
220 231 242 253 264 275 286 297

我学的是DELL编程,这个问题就是说找出从1到300能被11整除的数,如11,121等 然后把你找的数 按照第一行10个 第2行9个 这样排。另外谁能给我推荐几本DELL编程的书