【VB中,我国古代数学家张丘建在其著名的《算经》中提出了百鸡问题我国古代数学家张丘建在其著名的《算经》中提出了百鸡问题：每只公鸡5元,每只母鸡3元,三只雏鸡1元；如何用100元买100只】

　　VB中,我国古代数学家张丘建在其著名的《算经》中提出了百鸡问题

　　我国古代数学家张丘建在其著名的《算经》中提出了百鸡问题：每只公鸡5元,每只母鸡3元,三只雏鸡1元；如何用100元买100只鸡,即公鸡、母鸡、雏鸡各多少只.请在空白处填入适当的内容,将程序补充完整.

　　PrivateSubCommand1_Click()

　　DimCockAsInteger

　　DimHenAsInteger

　　DimChickAsInteger

　　Form1.Print"公鸡数","母鸡数","雏鸡数"

　　ForCock=0To20

　　ForHen=0To33

　　ForChick=0To100

　　If【7】Then

　　Form1.PrintCock,Hen,Chick

　　EndIf

　　NextChick

　　NextHen

　　NextCock

　　EndSub