有没有VB学习例子的问题和答案的网站或论坛

来源：百度知道 编辑：UC知道 时间：2024/06/08 20:12:28
比如有如下的例子题:
假定小鸡每只5角;公鸡每只2元;母鸡每只3元。现在有100元，要求买100只鸡，编程列出所有可能的购鸡方案。
小猴子有若干桃子，第一天吃掉一半多一个;第二天吃掉剩下的一半多一个…..;如此，到第七天早上要吃时，只剩下一个桃子。问小猴子一开始共有多少桃子?
等等……
这些题谢谢！并有答案！

一、等等……我是讲不了的。

二、买鸡。
Private Sub Command1_Click()
For 母鸡 = 0 To 33
For 公鸡 = 0 To 50
If (100 - 公鸡 - 母鸡) * 0.5 + 公鸡 * 2 + 母鸡 * 3 = 100 Then Print "母鸡"; 母鸡, "公鸡"; 公鸡, "小鸡"; 100 - 公鸡 - 母鸡
Next 公鸡
Next 母鸡
End Sub
这没有什么好讲的。
母鸡最多33只，最少没有。所以：For 母鸡 = 0 To 33
公鸡最多50只，最少没有。所以：For 公鸡 = 0 To 50
小鸡数量为(100 - 公鸡 - 母鸡)，三者的总价和如果是100，那就是要找的，输出。
换一个公鸡、母鸡的数字继续验算。
至于答案，你自己运行以下。

三、吃桃。
此题不要写程序。程序比手工还慢。
第七天，1个桃
第六天，（1+1）*2=4个
第五天，（4+1）*2=10个
第四天，（10+1）*2=22个
第三天，（22+1）*2=46个
第二天，（46+1）*2=94个
第一天，（94+1）*2=190个…………这天后自非要拉肚子不成！
已开始他有190个
第一天吃了190/2+1=96个！剩下94个
第二天吃了94/2+1=48个，剩下46个
第三天吃了46/2+1=24个，剩下22个
第四天吃了22/2+1=12个，剩下10个
第五天吃了10/2+1=6个，剩下4个
第六天吃了4/2+1=3个，剩下1个…………不用等第七天才发现，他早就知道了！

网上搜索 VB教程啊 这些都是入门教材上面的东西.