Question

大神们！VB中怎么设计点击按钮实现返回（即撤销）的操作、同时前进（即不撤销）的操作。谢谢

还有一个问题：
在vb中编写了记忆功能如下：
Private Sub Form_Load()
For e = 0 To 40
Text1(e).Text = GetSetting(App.Title, "Text1", "Text" & e, "")
doevents
Next
End Sub
Private Sub Command1_Click()'保存
For e = 0 To 40
SaveSetting App.Title, "Text1", "Text" & e, Text1(e).Text
DoEvents
Next
End Sub存在的问题：我有11个这样类似的窗口，text都从1开始编的，所以当在第一个窗口保存的数据，在打开第二个窗口时，会读取第一个窗口保存的值，想着改路径，但不知道怎么改，菜鸟求大神指点，没财富值了，希望不介意...

Answer 1

控件都有.tag属性
你可以通过在.tag属性里保存值来确定当前按钮进行到哪一步
窗口内容的变化无非是对象的visible属性true 和false 的变化。
11个类似的窗口可以用11个放到窗口上frame来实现，frame里放上你的textbox等对象，一个前进（下一个）按钮的代码类似于：

with command1
select case .tag
case "1" '第一个窗口
frame1.visible=false
frame2.visible=true
.tag=2
case "2" '第2个窗口
frame2.visible=false
frame3.visible=true
.tag=3
....
case "n" '第n个窗口
end select

如果是用控件数组则代码可以写的非常精简

追问

感觉不是我要问的啊，返回具体怎么写啊，然后记忆功能用visible不是把数组里的控件都隐藏了吗，这不是我想要的啊，我是想让每个窗口的text数据都能有对应自己的保存路径，这样读取不会相互影响

追答

你把被修改前的内容保存到 属性.tag 上
撤销时，用.tag 上的恢复，同时把修改后的值保存到.tag上，这样 取消撤销时，可以用.tag恢复

你把被修改前的内容保存到 属性.tag 上
撤销时，用.tag 上的恢复，同时把修改后的值保存到.tag上，这样 取消撤销时，可以用.tag恢复

追问

能写一个完整的程序吗？就写一个窗口就行，不一定是返回对text的操作，要像word一样，返回前一步操作。菜鸟不会写啊，谢了

追答

追问

是这个程序吗？恕我愚钝，真心没看懂起什么作用...

追答

没看懂，你跑一跑，点按钮看看效果，然后再看代码

追问

不行，是错的，你跑了吗，输入后，点取消撤销也会变的，点撤销不是回到上一步操作，而且会有尾数会多出乱码

追答

我当然是试过了才给你的，你先别输入中文，就输入英文测试，中文输入我测试有问题

追问

我输入的是数字，因为我设计的是公式，所以就要输入数字

追答

我试了n遍，绝对能用，你那里出现问题是别的问题，不是我的代码问题。

追问

好吧，虽然不知道弄，还是谢谢你这么耐心。。