假定网络中的器 A 的表有如下的项目( 这三列分别表示“目的网络”、“距离”和“下一跳器” ): N1 4 B N2 2 C N3 1 F N4 5 G 现将 A 收到从 C 发来的信息( 这两列分别表示“目的网络”“距离” ): N1 2 N2 1 N3 3 N4 7 试求出器 A 更新后的表(详细说明每一个步骤)。
【简答题】'输入一个数,判断是不是完全平方数 Private Sub Form_Click() Dim a As Integer a = ____________(InputBox("a=")) If ________(a) = _________(Sqr(a)) Then ____________ & "是完全平方数" Else MsgBox a & "不是完全 平方数" End If End Sub