用vb判断自守数自守数的定义,一个数的平方运算后尾数等于该数自身的自然数,如25×25＝625,76×76＝5776

Question

用vb判断自守数
自守数的定义,一个数的平方运算后尾数等于该数自身的自然数,如25×25＝625,76×76＝5776

Answer 1

不用楼上那麽麻烦!
假设要判断 text1 中的数字是不是自守数 可以在 按钮事件 中加入以下代码
dim a as integer
dim b as string
a= text1.text ^ 2
b= right(a,1)
if b=right(text1.text,1) then msgbox "该数是自守数!"!