tcl二次开发
浏览：809 回答：2
xlis2csv-FreeCommander XE 冈 D:\00tmp\pythonstudy'\xls2csvy... 文件(P)编辑(日搜索(S)视图(V)格式(M)语言(L)设置(T) 口 区 图 console 口 区 宏(O)运行(R)插件(P)窗口(W)? File
注册
/
登录
邀请回答 我来回答
全部回答
(2)默认 最新
CAE追梦者 1 set fp [open grade.txt m]
2 while {[gets $fp line]!=-1}{
3 puts $line
第二种方法：
1 set fp (open grade.txt r]
2 while {"[eof sfp)} i
3 gets $fp Lime
4 puts $line
口
时钟树上的小猴子
关注
tcl.rar_tcl_tcl tk_tcl文件
输入文件名——————————打开文件，——————显
TCL之文件处理
5月26日
评论 点赞
CAE追梦者 xlis2csv-FreeCommander XE
冈
D:\00tmp\pythonstudy'\xls2csvy...
文件(P)编辑(日搜索(S)视图(V)格式(M)语言(L)设置(T)
口
区
图 console
口
区
宏(O)运行(R)插件(P)窗口(W)?
File Edit Help
圖 test.tel网
lx1s2csv.py凶
Your_workbook_Sheeti
1,2,3,5
2,3,4,5
33,4,5,5
4 4,5,6,5
5 5,6,7,5
6 6,7,8,5
7 7,8,9,5
8 8,9,10,5
9 9,10,11,5
10 10,11,12,5
C:/Windows/System32/it-IT/mlang.dll.mui
(System32) 4% tk_getSaveFile
[D:/00tmp/test.txt
(System32) 5% tk_chooseDirectory
C:/Windows/assembly
(System32) 6 % tk_messageBox
ge4ok
(System32) 7 % tk_messageBox -message "hello HyperWorks"
ok
(System32) 8% tk_getOpenFile
D:/00tmp/pythonstudy/xls2csv/your_workbook.csv
(System32) 9% set ch[open D:/00tmp/pythonstudy/xls2csv/your_workbook.csv]
file34dfb80
Attributes
11 11,12,13,5
(System32) 10% set ch
12 12,13,14,5
13 13,14,15,5
14 14,15,16,5
15 15,16,17,5
16 16,17,18,5
17 17,18,19,5
18 18,19,20,5
19 19,20,21,5
20 20,21,22,5
file34dfb80
(System32) 11% gets $ch
1,2,3,5
(System32) 12 % gets $ch
2,3,4,5
(System32) 13% gets $ch
3,4,5,5
(System32) 14% eof $ch
(System32) 15 %
21
Ln:20 Col:10 Sel:0| Dos\Windows UTF-8
國 F3 View
iS]
② F4 Edit
⑨
[1/11 Object(s) selected 216 Byte(s) 21.01.2016 15:41:55 A（Free 106.52 GB）
D:\00tmplpythonstudyxls2csm
屆 F5 Copy with dialog
圈 F6 Move with dialog
㎡F7 New
X Del Delete
的Alt+F4 Exit
5月26日
评论 点赞
