用vb求出以内的所有回文数的个数。

[复制链接]

11 |

1 | 2011-6-24 01:03:37 | 显示全部楼层 |阅读模式

请高手们帮帮忙！本人将不胜感激！

使用道具举报

千问 | 2011-6-24 01:03:37 | 显示全部楼层

PrivateSubCommand1_Click()
Fori=2000To9999
IfTrim(Str(i))=Trim(StrReverse(Str(i)))Then
PrintStr(i)
EndIf
Next
EndSub

使用道具举报

返回列表发新帖

千问

主题	0 回帖	4882万积分

论坛元老

Rank: 8 Rank: 8

积分: 48824836

加好友
发消息

回复楼主返回列表

问答

热门排行

1 哈尔滨哪看肿瘤科好
2 埃博拉病毒相关新闻
3 北京胆管癌要花多少钱
4 尿素氮7.37肌酐82.6体检报告说提
5 小孩反复感冒咳嗽，打几天针好了又
6 腰椎增生严重贴什么膏药来缓解
7 北京哪里治疗肛裂好
8 我10月23号，检查出有盆腔言和尿路感
9 深圳做包茎手术多少钱
10 患者18岁,对颜色和数字没有一点认知。
11 长春治肝癌多少钱
12 长春肿瘤科专家
13 吃饱了会想吐，闻到烟味也会想吐。早上起
14 害怕见人。不敢和和人说话。老感觉别人瞧
15 沈阳治骨髓瘤
16 上个星期住院照胃镜证实是糜烂性胃炎和胃
17 女性避孕套使用方法
18 阴道口长了一小块肉，摸着也不痛，好长时
19 请问我也是背部疼痛，拔罐后更疼了，今年
20 反复的发热忽冷忽热抽血化验刚达到伤寒病
21 红霉素可以涂在阴道口吗？
22 胸闷憋气后背肩部两侧酸痛胸闷憋气后背肩
23 睡醒左眼疼难睁开看今天左眼一看阳光就刺
24 眼部白癜风注意哪些问题
25 长春哪里治疗肾癌最好
26 我失眠好长时间了，原因是我老公出轨，我
27 吹风或者吃点东西就会想吐，但没有东西吐
28 眼睛怕光，迎光线看东西模糊。
29 北京中医治疗肛裂
30 中国预言埃博拉病毒
31 郑州肉芽肿治疗哪家好
32 吃维D2磷酸氢钙片有用吗？
33 指甲盖被砸了下根部中间裂开了每次洗手都
34 宁波首现埃博拉病毒
35 深圳包茎要多少钱
36 蛀牙疼得要命有没有快速止疼方法
37 这几天心脏不舒服，有心慌心绞痛乏力的感
38 医生您好！我想请问我的病好不彻底，我可
39 子宫肌瘤我想问这个情况下我是要先手术还
40 太原哪里肿瘤科最好
41 婚检提示:女方巨细胞病毒(IgG)阳性
42 我女朋友20岁了，生理期从来没有过？求
43 深圳阴囊湿疹治疗多少钱
44 深圳包茎治疗多少钱
45 一周六个月孩子得了牙龈炎吃什么药
46 关注埃博拉病毒疫情
47 月经延迟10天了，测了几次都是没有，请
48 体检结果显示肝功轻度异常，门冬氨酸氨基
49 埃博拉病毒的症状
50 郑州治疗阴道毛滴虫病去哪好
51 病情描述及疑问：发病时间及原因：HBV
52 沈阳治膀胱癌
53 太原膀胱癌治疗哪家好
54 深圳前列腺常规多少钱
55 长沙在哪里治疗植物神经功能紊乱
56 胃病小时候经常不吃饭导致的，想知道这个
57 医生你好；我因为前几天体检查出有大三阳
58 是肾阴虚嘛？
59 中午吃了花红片加甲磺酸培氟沙星胶囊塞了
60 醫生我有肺結核空洞型吃了8個藥。我有胸
61 有丹参、当归之类的算是滋补药吧
62 哈尔滨治疗膀胱癌哪好
63 请问心理疾病是精神病吗
64 我四肢酸软无力是怎么回事
65 内分泌失调怎么调节，，，
66 深圳治疗前列腺大概要多少钱