ExcelHome技术论坛

 找回密码
 免费注册

QQ登录

只需一步,快速开始

   
EH云课堂-专业的职场技能充电站 限时送,魔方网表将Excel变在线系统 Excel服务器-会Excel,做管理系统 Excel Home精品图文教程库
Excel不给力? 何不试试FoxTable! Excel 2016函数公式学习大典 高效办公必会的Office实战技巧 免费下载Excel行业应用视频
300集Office 2010微视频教程 Tableau-数据可视化工具 精品推荐-800套精选PPT模板,点击获取 ExcelHome出品 - VBA代码宝免费下载
你的Excel 2010实战技巧学习锦囊 欲罢不能, 过目难忘的 Office 新界面 Excel VBA经典代码实践指南
查看: 1111|回复: 96

[求助] 世界最难的数组怎么赋值

[复制链接]

TA的精华主题

TA的得分主题

发表于 2019-2-12 20:02 | 显示全部楼层 |阅读模式
本帖最后由 dongdonggege 于 2019-2-13 12:59 编辑

火柴棒可以组成0-9的数字或字符,见图。
我把0-9的数字或加减乘除的符号,变成图表,我想把数字字符表变成一个数组,但是不知道如何定义数组或赋值。
图片内容不全后面缺少+-*/的内容,影响不大。
请教各位大师帮忙,谢谢。
无标题.jpg

数字字符增减移动.zip

1.81 KB, 下载次数: 0

TA的精华主题

TA的得分主题

 楼主| 发表于 2019-2-12 20:08 | 显示全部楼层
请各位帮忙能给个数组(假定叫mem)赋值,谢谢。
123456789.jpg

TA的精华主题

TA的得分主题

发表于 2019-2-12 20:24 | 显示全部楼层
如果是人工判断结果已经有了,直接赋值就可以,你的意思是用代码生成三种情况下的结果吗?

TA的精华主题

TA的得分主题

发表于 2019-2-12 20:31 | 显示全部楼层
dongdonggege 发表于 2019-2-12 20:08
请各位帮忙能给个数组(假定叫mem)赋值,谢谢。

可否换个角度建立一个数组:
1根火柴能代表的数字:1
2根火柴能代表的数字:7
3根火柴能代表的数字:(空)
4根火柴能代表的数字:4,0
5根火柴能代表的数字:2,3,5
6根火柴能代表的数字:6,9
7根火柴能代表的数字:8
再作所需的所有运算组合处理

TA的精华主题

TA的得分主题

发表于 2019-2-12 20:51 | 显示全部楼层
'空为不存在,左到右判断,,,

Option Explicit

Private Type match
  left As String
  mid As String
  right As String
End Type

Sub test()
  Dim arr(1 To 7) As match
  arr(1).left = 1
  arr(2).left = 7
  arr(4).left = 4
  arr(4).mid = 0
  arr(5).left = 2
  arr(5).mid = 3
  arr(5).right = 5
  arr(6).left = 6
  arr(6).mid = 9
  arr(7).left = 8
  Debug.Print arr(1).left, "|"
  Debug.Print arr(1).mid, "|"
  Debug.Print arr(3).left, "|"
  Debug.Print arr(5).right, "|"
End Sub

TA的精华主题

TA的得分主题

 楼主| 发表于 2019-2-12 21:20 | 显示全部楼层
一把小刀闯天下 发表于 2019-2-12 20:51
'空为不存在,左到右判断,,,

Option Explicit

我可能要调用这个函数,到时不好调用吧

TA的精华主题

TA的得分主题

 楼主| 发表于 2019-2-12 21:22 | 显示全部楼层
一把小刀闯天下 发表于 2019-2-12 20:51
'空为不存在,左到右判断,,,

Option Explicit

比如,我有个这样的错误算式:9+5=9,移动1根火柴棒,正确的算式是3+5=8。

TA的精华主题

TA的得分主题

 楼主| 发表于 2019-2-12 21:24 | 显示全部楼层
一把小刀闯天下 发表于 2019-2-12 20:51
'空为不存在,左到右判断,,,

Option Explicit

而且,移动、增加、减少1根,有时有2个值呢。

TA的精华主题

TA的得分主题

发表于 2019-2-12 21:25 来自手机 | 显示全部楼层
创建多行4列
比如各列依次是:源,操作,火柴数,结果。
比如图中的数字字符6来说,记成4行:
6,加,1,8
6,减,1,5
6,移,1,9
6,移,1,0
其它数字和符号同理。如果要增加火柴数,就继续列举,只是挺辛苦的。

TA的精华主题

TA的得分主题

 楼主| 发表于 2019-2-12 21:27 | 显示全部楼层
micch 发表于 2019-2-12 20:24
如果是人工判断结果已经有了,直接赋值就可以,你的意思是用代码生成三种情况下的结果吗?

就是的,大师。能写出数组吗?
您需要登录后才可以回帖 登录 | 免费注册

本版积分规则

关闭

最新热点上一条 /1 下一条

关注官方微信,每天学会一个新技能

手机版|关于我们|联系我们|ExcelHome

GMT+8, 2019-4-20 14:18 , Processed in 0.114405 second(s), 14 queries , Gzip On, MemCache On.

Powered by Discuz! X3.4

© 2001-2017 Wooffice Inc.

   

沪公网安备 31011702000001号 沪ICP备11019229号

本论坛言论纯属发表者个人意见,任何违反国家相关法律的言论,本站将协助国家相关部门追究发言者责任!     本站特聘法律顾问:徐怀玉律师 李志群律师

快速回复 返回顶部 返回列表