在VB中，while循环用于重复执行一段代码块，直到指定的条件不再满足为止。其基本语法如下：

While condition'执行的代码块Wend

其中，condition是一个逻辑表达式，如果该条件为真，则会执行循环体中的代码块。执行完代码块后，会再次检查condition，如果仍然为真，则继续执行循环体中的代码块，直到condition为假为止。

例如，以下示例代码使用while循环计算1到10的和：

Dim sum As IntegerDim i As Integersum = 0i = 1While i <= 10sum = sum + ii = i + 1WendMsgBox "1到10的和为：" & sum

这段代码中，While i <= 10表示当i的值小于等于10时执行循环体中的代码块，每次循环i的值增加1，直到i的值大于10为止。