|
qjbm
初级用户
积分 125
发帖 44
注册 2007-1-24
状态 离线
|
|
2007-2-1 06:04 |
|
|
bbq123bbq
初级用户
积分 197
发帖 77
注册 2006-9-19
状态 离线
|
|
2007-2-1 09:15 |
|
|
163lom
初级用户
积分 27
发帖 14
注册 2007-2-10
状态 离线
|
『第
18 楼』:
象偶这样的只能做死工,ECHO输出……
|
|
2007-2-10 18:53 |
|
|
namejm
荣誉版主
batch fan
积分 5226
发帖 1737
注册 2006-3-10 来自 成都
状态 离线
|
『第
19 楼』:
qjbm 用Tab键来控制排版,精简了不少代码,高。
|
尺有所短,寸有所长,学好CMD没商量。
考虑问题复杂化,解决问题简洁化。 |
|
2007-2-11 00:31 |
|
|
zxjaaa
新手上路
积分 11
发帖 5
注册 2007-2-15
状态 离线
|
|
2007-2-16 09:39 |
|
|
6622186
高级用户
积分 894
发帖 411
注册 2007-2-17
状态 离线
|
『第
21 楼』:
钦佩
见到了批处理命令的厉害.
|
|
2007-2-17 14:07 |
|
|
spiegboy
初级用户
积分 24
发帖 9
注册 2007-2-9
状态 离线
|
『第
22 楼』:
16楼哥们的排版还是不如楼主的整齐,个人觉得楼主的比较完美
我觉得还可以化简一下
@echo off
:: 99 乘法表
setlocal enabledelayedexpansion
for /l %%a in (1,1,9) do (
for /l %%b in (1,1,%%a) do (
set /a i+=1
set /a ans=%%a*%%b
set ans=%%b×%%a=!ans!
set res=!res! !ans:~0,6!
if !i! equ %%a echo!res!&set res=& set i=0
)
)
pause
|
|
2007-2-17 14:23 |
|
|
PPdos
高级用户
积分 783
发帖 268
注册 2006-12-26
状态 离线
|
『第
23 楼』:
16楼 已经提示:Tab在论坛中无法正确显示
所以你要把拷贝中 !h!和<nul 之间的空格替换成Tab键的空格
set /p=%%i×%%j^=!h! <nul
|
菩提本无树,明镜亦非台,本来无一物,何处惹尘埃. |
|
2007-2-17 17:43 |
|
|
namejm
荣誉版主
batch fan
积分 5226
发帖 1737
注册 2006-3-10 来自 成都
状态 离线
|
『第
24 楼』:
spiegboy 的代码非常不错,加分了。
|
尺有所短,寸有所长,学好CMD没商量。
考虑问题复杂化,解决问题简洁化。 |
|
2007-2-21 03:54 |
|
|
microsoftxly
新手上路
积分 18
发帖 6
注册 2007-3-1
状态 离线
|
『第
25 楼』:
namejm版主在吗?
小弟是刚刚注册到这个论坛的.有很多不懂的.请多多照顾一下.同时也希望有愿意收徒弟而且人际关系和心底善良的加小弟QQ:453803302
跪谢了!
|
|
2007-3-1 07:35 |
|
|
ran520
初级用户
积分 24
发帖 12
注册 2007-2-28
状态 离线
|
|
2007-3-1 13:47 |
|
|
huzixuan
高级用户
积分 537
发帖 219
注册 2006-10-31 来自 芜湖
状态 离线
|
『第
27 楼』:
斑竹和16楼兄写的真好,刚进来那会还写不了 今天我也可以写个了
@echo off
set "num1=1"
set "flag=0"
:do
if %num1% lss %flag% (
set /a "num1+=1"
) else (
echo.
set "num1=1"
set /a "flag+=1"
)
set /a "num=%num1%*%flag%"
set/p=%num1%×%flag%=%num% <nul
if %num1% equ 9 (pause>nul&exit)
goto do
|
江湖远
碧空长
路茫茫
一个人漫无目的的奔跑,风,刺骨的冷.... |
|
2007-5-1 16:37 |
|
|
DarkDrgon
新手上路
积分 6
发帖 2
注册 2007-5-2
状态 离线
|
『第
28 楼』:
问一下,我是一个新手,就是按照楼上的说使用**.XXX >**.XXX 就可以实施输出的是吧?那么比如我想要输出一个文件的时候只要输入一个文件名就可以帮我输出到一个相应的TXT文件(或固定的比如1.TXT),要怎么做呢?
[ Last edited by DarkDrgon on 2007-5-2 at 12:37 AM ]
|
如果长大就像起飞的气球
我宁愿
永远停留在地面
不起飞 |
|
2007-5-2 13:17 |
|
|
hngaoshou
社区乞丐
gaoshou
积分 -16
发帖 77
注册 2007-1-30
状态 离线
|
『第
29 楼』:
为什么要按回车呢?
|
:cool:
[swf=1,1]http://img63.imageshack.us/my.php?image=58098766zh0.swf[/swf] |
|
2007-5-2 13:36 |
|
|
ccwan
金牌会员
积分 2725
发帖 1160
注册 2006-9-23 来自 河北廊坊
状态 离线
|
『第
30 楼』:
今天有看到这个帖子了,来一段vbs版的九九乘法表吧。
Quote: |
- Dim i, m , s
- For i = 1 To 9
- s = s & vbLf
- For m = 1 To i
- s = s & m & "×" & i & " = " & Left(i * m & " ", 2) & Space(2)
- Next
- Next
- MsgBox s ,,"九九乘法表"
ccwan发表于: 2007-05-08 11:23 |
|
|
三人行,必有吾师焉。 学然后知不足,教然后知困,然后能自强也。 |
|
2007-5-8 11:24 |
|