本文使用「署名 4.0 国际 (CC BY 4.0)」许可协议，欢迎转载、或重新修改使用，但需要注明来源。 [署名 4.0 国际 (CC BY 4.0)](https://creativecommons.org/licenses/by/4.0/deed.zh)

本文作者: 苏洋

创建时间: 2009年05月14日
统计字数: 278字
阅读时间: 1分钟阅读
本文链接: https://soulteary.com/2009/05/14/heshang-vs-mantou.html

-----


# [VB]和尚吃馒头问题

和尚吃馒头的问题,俺恶搞一下。 大和尚一个人一个馒头，小和尚三个人吃一个馒头。话说寺庙的馒头也不算大呀。那么小和尚得多小。。。

```vb
Private Sub Form_Load()
'100个和尚吃100个馒头。大和尚一人吃3个，小和尚3人吃一个
Dim 大和尚人数 As Byte
Dim 小和尚人数 As Byte
For 大和尚人数 = 1 To 100 Step 1
For 小和尚人数 = 3 To 99 Step 3
If 大和尚人数 + 小和尚人数 = 100 Then Debug.Print "大和尚人数" & 大和尚人数 & " And 小和人数尚" & 小和尚人数
Next
Next
End Sub
```