在编程中，水仙花数是一个有趣的数学概念。所谓水仙花数，是指一个三位数，其各位数字的立方和等于该数本身。例如，153就是一个水仙花数，因为\(1^3 + 5^3 + 3^3 = 153\)。

下面，我们将使用Visual Basic（简称VB）来编写一段程序，找出100到999之间所有的水仙花数。

首先，我们需要了解如何分解一个三位数。我们可以将这个三位数分别取百位、十位和个位上的数字。接下来，通过计算每个数字的立方和，与原数进行比较，如果两者相等，则说明该数是水仙花数。

以下是完整的VB代码示例：

```vb

Module Module1

Sub Main()

Console.WriteLine("100到999之间的水仙花数有：")

For num As Integer = 100 To 999

Dim hundreds As Integer = num \ 100 ' 取百位

Dim tens As Integer = (num Mod 100) \ 10' 取十位

Dim units As Integer = num Mod 10 ' 取个位

If hundreds ^ 3 + tens ^ 3 + units ^ 3 = num Then

Console.WriteLine(num)

End If

Next

Console.ReadLine()

End Sub

End Module

```

这段代码从100开始遍历到999，对于每一个数字，它都会提取出百位、十位和个位的数字，并计算它们的立方和。如果立方和等于原数，则输出该数为水仙花数。

运行此程序后，你将会看到100到999之间所有的水仙花数被列出来。这种方法简单直观，非常适合初学者理解和实践。希望这段代码对你有所帮助！