13、VB编程中的循环、调试与实践

VB编程中的循环、调试与实践

1. 循环控制中的逻辑运算符

在编程中，控制循环的条件有时会比较复杂，这时就需要用到 And 、 Or 和 Not 这些逻辑运算符。比如在日常生活中，我们可能会说“我会一直散步，直到开始下雨或者到了5点钟”。如果用 While 语句来描述这个情况，就会是“当没有下雨并且还没到5点钟时，我就去散步”。这里要注意，两个条件（下雨、5点钟）前面都有一个“not”，并且这两个条件用“and”连接。在使用 While 语句编写循环时，就需要非常小心地清晰编写条件。

以米粒程序为例，我们要累加米粒数量，当达到64个棋盘方格（棋盘上的方格总数）或者总数达到10000粒时停止。所以循环要在总数小于10000且方格数小于64时继续。以下是相应的程序代码：

Private Sub Button1_Click(ByVal sender As Object, _
ByVal e As System.EventArgs)
    Dim square, rice, total As Integer
    square = 1
    rice = 1
    total = 1
    DisplayCounts(square, rice)
    While total < 10000 And square < 64
        square = square + 1
        rice = rice * 2
        total = tota