vb程序设计 事件 双击窗体 响应 公鸡三元一只，母鸡五元一只，小鸡一元三只，怎么用100元买

vb程序设计 事件 双击窗体 响应 公鸡三元一只，母鸡五元一只，小鸡一元三只，怎么用100元买

Private Sub Form_DblClick()
  Print "公鸡", "母鸡", "小鸡"
  For a = 0 To 33
    For b = 0 To 19
      c = 100 - a - b
      If c Mod 3 = 0 And 3 * a + b * 5 + c / 3 = 100 Then
        Print a, b, c
        N = N + 1
      End If
    Next b
  Next a
  Print "共"; N; "种方案"
End Sub

追问你好，中间必须加空格吗？为什么我输入你的程序后提示 缺少 end sub

追答留了空，不是看得清楚吗?

红色的都是出错的行

Then不应该换行的。
Print语句中，少了标点。

如以上回答内容为低俗、色情、不良、暴力、侵权、涉及违法等信息，可以点下面链接进行举报！

点此我要举报以上问答信息