- 二一组卷

题型：综合题题类：常考题难易度：普通

浙江省高中信息技术 VB基本语句同步练习

下面VB程序的功能是：程序运行时，在文本框Text1中输入正整数n，单击命令“生成”按钮Command1后，在文本框2中输出n,n-1,…,2,1,2,…,n-1,n。若n=6，在文本框Text2中输出“6 5 4 3 2 1 2 3 4 5 6”。程序运行界面如图所示。

实现上述功能的VB程序代码如下，但加框处语句有误，请改正。

Private Sub Command1_Click()

Dim i As Integer, n As Integer, s As String

n = Val(Text1.Text)

s = “”

For i = 1 To ‘①

If i<= n Then

s = s + Str(n - i + 1)

Else

‘②

End If

Next i

Text2.Text = s

End Sub

程序中①处应改为;

程序中②处应改为。

举一反三

a = a + b

b = a + b

a和b的值分别为（）

图中空白处理框①和②处应填入的是（）

奇数阶幻方的构造是所有幻方中最简单的，可以按照如下规则来实现：

⑴将1放在第一行中间一列；(如图2)

⑵从2开始直到n*n为止，各数按下列规则存放：

假设当前要存放的数为k，则k存放在k-1)数的右上方并按照规则

①若(k-1)放在第1行且不是最后一列，则将k存放在n行，(k-1)所在列右侧；(如图3)

②若(k-1)放在第n列且不是第一行，则将k存放在第1列，k-1)的上1行；(如图4)

③若(k-1)即不在第1行也不在最后1列：

若(k-1)右上方有数，则将k放在(k-1)的下1行的同一列。(如图5)

若(k-1)右上方没有数，则将k放在(k-1)的右上方；(如图6)

④若(k-1)在第1行第n列，将k填在(k-1)的正下方(如图7)

相关试卷