求解自幂数不用计算机,水仙花数是指一个三位数，它的每个位上的数字的3次方之和就等于它本身，例如：1**3+5**3+3**3 = 153。这类三位数也被叫做自恋数、自幂数或者阿姆斯特朗数。...

(2)

实现上述功能的VB程序如下，请在划线处填入合适的代码。

Const n = 10

Dim d(n) As Integer, c As Integer

Private Sub Form_Load()

Dim i As Integer, j As Integer, f As Boolean, s As

String

Randomize

c = n

For i = 1 To n

f = False

d(i) = ________       ' 随机生成个位数为“9”的两位数

For j = 1 To i - 1

If ________Then f = True

Next j

If f Then

c = c - 1

Next i

'原始数据在文本框Text1中显示。代码略

End Sub

Private Sub Command1_Click()

Dim i As Integer, j As Integer, k As Integer,

m As Integer

Dim cnt As Integer，t As String,

s As String

d(0) = 100

cnt = Val(Text2.Text)

If cnt > c Then

Text3.Text = "输入筛选的个数太大，请重新输入！"

Exit Sub

'Exit Sub表示退出过程

End If

For i = 1 To cnt

k = i

For j = i + 1 To n

If d(j) < d(i - 1) And(

)Then k = j

Next j

If k <> i Then

t = d(i): d(i) = d(k): d(k) = t

End If

Next i

For i = 1 To cnt

s = s + Str(d(i)) + "，"

Next i

Text3.Text =________

End Sub