单项选择题
在Visual Basic中有这样一段代码,运行后,Z的值为()。
A.8 B.3 C.5 D.11
A.1 B.2 C.3 D.4
A.n1=n1+1 B.n2=n2+n3 C.I=I+2 D.n3=2*n3
下面的程序功能是找出满足下列条件的四位整数;(1)是一个完全平方数;(2)第一,二位数相等,第三、四位数相等,同时统计满足条件的数的个数,完善程序。 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 & "个符合条件的四位数" End Sub
微信扫一扫,加关注免费搜题