在VB中，while循环用于重复执行一段代码块，直到指定的条件不再满足为止。其基本语法如下：
While condition
'执行的代码块
Wend
其中，condition是一个逻辑表达式，如果该条件为真，则会执行循环体中的代码块。执行完代码块后，会再次检查condition，如果仍然为真，则继续执行循环体中的代码块，直到condition为假为止。
例如，以下示例代码使用while循环计算1到10的和：
Dim sum As Integer
Dim i As Integer
sum = 0
i = 1
While i <= 10
sum = sum + i
i = i + 1
Wend
MsgBox "1到10的和为：" & sum
这段代码中，While i <= 10表示当i的值小于等于10时执行循环体中的代码块，每次循环i的值增加1，直到i的值大于10为止。
