在VB（Visual Basic）中，有多种方法可以表示从1到100的数。以下是一些示例代码：
求和
使用 `For` 循环从1加到100，并输出结果：
```vb
Private Sub Command1_Click（）
Dim sum As Integer
sum = 0
For i = 1 To 100
sum = sum + i
Next i
Print sum
End Sub
```
生成随机数
使用 `Rnd` 函数生成1到100之间的随机整数：
```vb
Private Sub Command_Click（）
Dim MyValue As Integer
MyValue = Int（（100 * Rnd） + 1）
Print MyValue
End Sub
```
使用 `Random` 类
使用 `Random` 类生成1到100之间的随机整数：
```vb
Dim random As New Random（）
Dim randomNumber As Integer = random.Next（1, 101）
Console.WriteLine（randomNumber）
```
模拟计算器
使用 `Shell` 函数调用外部计算器程序，模拟按下1连加到100，并输出结果：
```vb
Private Sub Command1_Click（）
ReturnValue = Shell（"Calc.EXE", 1）
AppActivate ReturnValue
For i = 1 To 100
If i = 100 Then
SendKeys i & "=", True
Else
SendKeys i
End If
Next i
End Sub
```
水仙花数
输出100到999之间的所有水仙花数：
```vb
Private Sub Command1_Click（）
Dim i As Integer, s As Integer
Dim a As Integer, b As Integer, c As Integer
Print "100到999所有水仙花数（也叫梅花数）:"
For i = 100 To 999
a = i \ 100 '取百位数
b = i \ 10 Mod 10 '或b=iMod 100 \10 取十位数
c = i Mod 10 '取个位数
s = a ^ 3 + b ^ 3 + c ^ 3 '水仙花数的判断依据
If s = i Then
Print i
End If
Next i
End Sub
```
这些示例展示了在VB中如何表示和处理从1到100的数，包括求和、生成随机数、模拟计算器操作以及查找水仙花数。根据具体需求，可以选择合适的方法来实现目标。