在線等!很急!謝謝!
uj5u.com熱心網友回復:
for i=2000 to 3000n1=val(left(cstr(i),1))
n2=val(mid(cstr(i),2,1))
n3=val(mid(cstr(i),3,1))
n4=val(right(cstr(i),1)
if n1+n2=n3+n4 then debug.print i
next
msgbox "QQ=5507350"
uj5u.com熱心網友回復:
最后的msgbox是為了做什么呢?
轉載請註明出處,本文鏈接:https://www.uj5u.com/gongcheng/15161.html
標籤:網絡編程
上一篇:VB6
下一篇:求幫忙修改!
