• 新浪微博:
  • 微信 :
按键精灵电脑版
立即下载

软件版本:2014.06
软件大小:22.9M
更新时间:03-18

按键精灵安卓版
立即下载

软件版本:3.3.8
软件大小:62.5M
更新时间:12-18

按键精灵iOS版
立即下载

软件版本:1.7.1
软件大小:29.2M
更新时间:06-22

最新企业版UiBot
立即下载

软件版本:3.3
软件大小:282M
更新时间:08-06

快捷导航

登录 后使用快捷导航
没有帐号? 注册

登录 注册
发新话题 回复该主题

[已解决] 又双叒叕要求教工程师了,数组的问题 [复制链接]

1#
看懂的请会心一笑

dim 数组(30)
For i = 0 To UBound(数组)

If i mod 3 = 0 Then

数组(i) = "字符串1"

ElseIf (i - 1) mod 3 = 0 Then

数组(i) = "字符串2"

ElseIf (i - 2) mod 3 = 0 Then

数组(i) = "字符串3"

End If
Next

请问要怎么改我才能将数组中的全部字符串拼接起来呢?结果=字符串1+字符串2+字符串3+字符串1+字符串2+字符串3...这样?

本主题由 超级版主 瑞祥幽冥狼 于 2021/6/18 14:04:41 执行 主题分类 操作
2#

回复 1楼yjqbyj的帖子
  1. dim 数组(30)
  2. For i = 0 To UBound(数组)
  3. If i mod 3 = 0 Then
  4. 数组(i) = "字符串1"
  5. ElseIf (i - 1) mod 3 = 0 Then
  6. 数组(i) = "字符串2"
  7. ElseIf (i - 2) mod 3 = 0 Then
  8. 数组(i) = "字符串3"
  9. End If
  10. Next
  11. TracePrint join(数组,"+")
复制代码

收 徒 索 引 ← ← ← ← ← ← ← ← ← ← 点 击

个 人 Q Q 1 : 1 2 2 3 1 1 6 6 1 8[将满]
个 人 Q Q 2 : 6 1 7 0 9 5 5 4 3[可加]
3#

感谢感谢!

发新话题 回复该主题