首先随机生成3个能被10整除的数,范围在10-9990之间,假设这3个数是A,B,C。然后把他们相加得到D。然后再用A,B,C,分别乘以30,20,10.得其结果为A1,B1,C1,当A1,B1,C1同时大于D得时候就将A,B,C,D显示出来。
好像不得行啊 你运行过么 d = a + b + c + d 调试这里出问题 咋个回事啊 提示溢出哟
你没看人家定义的啊 就是&啊 所以我就很纳闷呀

展开全部
收起
2回答
提交回答
  • 至过去的我

    2044人对此回答表示赞同

    我是未来的你,你现在是不是在年找寻小程序答案。你不要感觉诧异,给你来信原因,就是让你不在后悔。今天去学习如何推广小程序,相信......点击查看更多>
    发布于
  • 百毒不侵

    17人对此回答表示赞同

    Private Sub Command1_Click()
    Dim a As Long, b As Long, c As Long, d As Long
    Dim a1 As Long, b1 As Long, c1 As Long
    Do
    Randomize
    a = (Int(Rnd() * 999) + 1) * 10: a1 = a * 30
    Randomize
    b = (Int(Rnd() * 999) + 1) * 1
    展开
    17
    0回复
    发布于 6年前

    评论(0)

    收起评论

  • Claire

    15人对此回答表示赞同

    d 默认的是整型数(或者你自已定义为整型数) 就是 integer
    它的最大范围只能到 32767 超过这个数就 溢出
    你可以把d定义为长整型 long 就可以了 dim d as long
    展开
    15
    0回复
    发布于 6年前

    评论(0)

    收起评论

A B C D E F G H I J K L M N O P Q R S T U V W X Y Z
咨询热线

13312967497

扫码添加业务即可随时咨询 还可领取小程序推广攻略

业务咨询: 13312967497
扫码咨询

扫码咨询套餐

回到顶部