VB编程:编程输出1000~9999之间的全部回文数.所谓回文数是指:将一个数从左至右读和从右至左读值相等.如:121是回文数,而345则不是.o(∩_∩)o...

来源:学生作业帮助网 编辑:作业帮 时间:2024/11/29 17:56:32
VB编程:编程输出1000~9999之间的全部回文数.所谓回文数是指:将一个数从左至右读和从右至左读值相等.如:121是回文数,而345则不是.o(∩_∩)o...
xݒKO@ǿăY pCx5(%P \ DDTF >nɯjMv3wfHFΎQ[}T|.\KsCXs[7*|]ɉ((E!*,/:<5sw|άf"h#A$1q't>\Q.0@T(nJ %}/*웿K`$ kQH͌ALMGǧk#4 S0*.I[$%P hjh*XqPI+2`@ ӏ1H3MFٸL͊&Q%4fJ4 mgy7}"b3~q<,X-ۻq{(E=l_t=*2pE%KU&4,zT" +

VB编程:编程输出1000~9999之间的全部回文数.所谓回文数是指:将一个数从左至右读和从右至左读值相等.如:121是回文数,而345则不是.o(∩_∩)o...
VB编程:编程输出1000~9999之间的全部回文数.
所谓回文数是指:将一个数从左至右读和从右至左读值相等.如:121是回文数,而345则不是.
o(∩_∩)o...

VB编程:编程输出1000~9999之间的全部回文数.所谓回文数是指:将一个数从左至右读和从右至左读值相等.如:121是回文数,而345则不是.o(∩_∩)o...
private sub form_click()
dim n as long
dim x as string
dim y as string
for i=1000 to 9999
x=mid(i,1,2)
y=mid(i,4,1) & mid(i,3,1)
if x=y then
form1.print i
end if
next
end sub
输出也可以更改为text控件,多行文本就没有窗体输出的问题了.
form1.print i 更改为,text1.text=text1.text & i & " "