15614.html
来自「以电子书的形式收集了VB一些常见问题解决方法,可以很方便的查找自己需要解决的问题」· HTML 代码 · 共 22 行
HTML
22 行
<html>
<head>
<title>请问VB中的递回...Thx</title>
</head>
<body bgcolor="#FFFFFF" vlink="#808080">
<center>
<h1>请问VB中的递回...Thx</h1>
</center>
<hr size=7 width=75%>
<hr size=7 width=75%><p>
Posted by Canoe on July 14, 1999 at 03:24:04:<p>
Private Sub cmdstart_Click()<br>Dim Hei As Integer<br>Cls<br>Hei = InputBox("有多少盘?")<br>MoveHanoi Hei, 1, 3, 2<br>End Sub<br>----------------------------------------------------------------------<br>Private Sub MoveHanoi(High As Integer, from As Integer, target As Integer, aux As Integer)<br>If High > 0 Then<br>MoveHanoi High - 1, from, aux, target<br>Print from; "--->"; target<br>MoveHanoi High - 1, aux, target, from<br>End If<br>End Sub<br>输入:3<br>得:1->3<br> 1->2<br> 3->2<br> 1->3<br> 2->1<br> 2->3<br> 1->3<br>请问各大高手,电脑如何计算出来答案呢?(计算程序?)<br> <br> <br> 搞得一头雾水的VB新鲜人留<br>
<br>
<br><hr size=7 width=75%><p>
<a name="followups">Follow Ups:</a><br>
<ul><!--insert: 15614-->
</ul><!--end: 15614-->
<br><hr size=7 width=75%><p>
</body></html>
⌨️ 快捷键说明
复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?