爱问知识人 爱问教育 医院库

VB小编码

首页

VB小编码

求2-1000中的守行数.所谓的守行数,即该数与其平方数的低位相同.如25^2=625,625的低位25与原数相同,则25是一个守行数!

提交回答
好评回答
  • 2018-04-04 06:36:43
    在Form上建个ListBox
    添加代码
    Private Sub Form_Load()
    Dim i As Integer
    Dim s1 As String, s2 As String
    For i = 2 To 1000
    s1 = Trim(Str(i))
    s2 = Trim(Str(i ^ 2))
    If s1 = Right(s2, Len(s1)) Then List1.AddItem s1
    Next
    End Sub

    m***

    2018-04-04 06:36:43

类似问题

换一换
  • VB 相关知识

  • 电脑网络技术
  • 电脑网络

相关推荐

正在加载...

热点检索

  • 1-20
  • 21-40
  • 41-60
  • 61-80
  • 81-100
  • 101-120
  • 121-140
  • 141-160
  • 161-180
  • 171-190
返回
顶部
帮助 意见
反馈

确定举报此问题

举报原因(必选):