[新手上路]批处理新手入门导读[视频教程]批处理基础视频教程[视频教程]VBS基础视频教程[批处理精品]批处理版照片整理器
[批处理精品]纯批处理备份&还原驱动[批处理精品]CMD命令50条不能说的秘密[在线下载]第三方命令行工具[在线帮助]VBScript / JScript 在线参考
返回列表 发帖
朱科技

Rank: 2

帖子
117 
积分
145 
技术
0  
捐助
0  
注册时间
2021-2-5 
1楼 跳转到 » 倒序看帖
打印
tT
发表于 2022-11-11 17:14 | 只看该作者

[文本处理] 【已解决】这个提示错误，怎么修改

本帖最后由 朱科技 于 2022-12-28 10:38 编辑

For i = 1 To 10
a = Plugin.Office.ReadXls(1, 1+i, 1)
b = Plugin.Office.ReadXls(1, 2+i, 1)
c = Plugin.Office.ReadXls(1, 3+i, 1)
d = Plugin.Office.ReadXls(1, 4+i, 1)
e = Plugin.Office.ReadXls(1, 5+i, 1)
SayString a&b&c&d&e
NEXT
收藏 分享
毕竟没有老师教,自学很痛苦的

BAT221110

Rank: 1

帖子
55 
积分
69 
技术
1  
捐助
0  
注册时间
2022-11-10 
2楼
发表于 2022-11-11 17:21 | 只看该作者
走错了，这个不是批处理。可能是VB？

TOP

ivor

Rank: 6Rank: 6

帖子
979 
积分
3381 
技术
172  
捐助
40  
注册时间
2012-1-7 
3楼
发表于 2022-11-11 19:44 | 只看该作者 
  1. For i = 0 To 10

  2. 	a =  a + Plugin.office.ReadXls(1, 1 + i, 1)

  3. Next

  4. SayString a
复制代码
1

评分人数

#&cls&@powershell "Invoke-Expression ([Io.File]::ReadAllText('%~0',[Text.Encoding]::UTF8))" &pause&exit

TOP

朱科技

Rank: 2

帖子
117 
积分
145 
技术
0  
捐助
0  
注册时间
2021-2-5 
4楼
发表于 2022-11-12 05:23 | 只看该作者
回复 2# BAT221110


    好吧
毕竟没有老师教,自学很痛苦的

TOP

朱科技

Rank: 2

帖子
117 
积分
145 
技术
0  
捐助
0  
注册时间
2021-2-5 
5楼
发表于 2022-11-12 05:23 | 只看该作者
回复 3# ivor


    谢谢
毕竟没有老师教,自学很痛苦的

TOP

返回列表