在VB中,创建程序,将输入的字符串颠倒输出,要求用DO While和Do until 实现

VB中do while 与do until有什么区别?~

其实这类循环本质上的区别是没有的, 主要是根据你的习惯和实际情况, 哪个方便用哪个.

注意, do while是在开始时判断, 所以循环可能一次也不执行, 而do ... until因为是执行后再判断, 则肯定要执行一次.

当然, 前者是条件真时循环, 假时终止, 而后者反之

1、含义不同：
Do While Len(a)表示只要a的长度为真（非0），就一直循环。
Do Until Len(a)表示一直循环，直到a的长度为真（非0），停止循环。
2、语法不同：
Do Until语句是只要当某个条件为假的时候重复一块代码。这是它的语法：
Do Until 条件
语句1
语句2
语句N
Loop
Do…While循环语法：
Do
语句1
语句2
语句N
Loop While 条件

扩展资料：
VB循环次数：
要程序至少执行一次，那么就将条件放置于Loop语句一行。，无论条件的值是什么。
如：【Do...Loop Until 条件】模式，表示无论条件如何，先执行循环一次，如果不符合循环条件，则立即停止，如果还符合循环条件，则继续执行。这样，程序循环过程至少执行了一次。
Do循环语句的几种形式:
1.、Do While i>1 '条件为True时执行
... ... '要执行的语句
Loop
2、Do Until i>1 '条件为False时执行
... ... '要执行的语句
Loop
3、Do
... ... '要执行的语句
Loop While i>1 '条件为True时执行
4、Do
... ... '要执行的语句
Loop Until i>1 '条件为False时执行
5、While...Wend 语句
While i>1 '条件为True时执行
... ... '要执行的语句
Wend
参考资料来源：百度百科-Visual Basic
参考资料来源：百度百科-VBScript语法

用 Do While 实现：

Private Sub Form_Click() '点击窗体运行
s = InputBox("请输入一个字符串")
n = 1
t = ""
Do While n <= Len(s)
    t = Mid(s, n, 1) & t
    n = n + 1
Loop
MsgBox "颠倒输出 " & t
End Sub

用 Do Until 实现：

Private Sub Form_Click() '点击窗体运行
s = InputBox("请输入一个字符串")
n = 1
t = ""
Do Until n > Len(s)
    t = Mid(s, n, 1) & t
    n = n + 1
Loop
MsgBox "颠倒输出 " & t
End Sub

友情附赠最简单的实现方法：

Private Sub Form_Click() '点击窗体运行
MsgBox "颠倒输出 " & StrReverse(InputBox("请输入一个字符串"))
End Sub

---

在VB中,创建程序,将输入的字符串颠倒输出,要求用DO While和Do until 实现视频