問答題

下面的程序功能是找出滿足下列條件的四位整數(shù)；（1）是一個完全平方數(shù)；（2）第一，二位數(shù)相等，第三、四位數(shù)相等，同時統(tǒng)計滿足條件的數(shù)的個數(shù)，完善程序。
Private Sub Form_Click()
Dim i As Integer,m As Integer,n As Integer
n = 0
For i = 32 To 99
m = i * i
If （）Then
Print m;
（）
End If
Next i
Print
MsgBox "共找出" & s & "個符合條件的四位數(shù)"
End Sub


您可能感興趣的試卷