谁能帮我VB做个小程序,连续输入N个2位数,比如98,96,85…然后每两位数相加,比如我在键盘输入989685则98+96+85…然后我按下回车,就自动98+96+85然后除以3,再乘0.6,并将结果显示。如果输入66778899则66+77+88+99回车后总和除以4再乘0.6,谢谢了!!最好乘0.6那里弄成TEXT,能自己修改的,谢谢了,做好追20分!
2L的可以了,但是我不想有显示N+N=N =N =N,想直接输入数字完毕按回车就显示答案!~

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

    2044人对此回答表示赞同

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

    20人对此回答表示赞同

    你直接用excel不就行了?
    没有必要用vb写啊
    展开
    20
    0回复
    发布于 6年前

    评论(0)

    收起评论

  • 大勇

    15人对此回答表示赞同

    Private Sub Command1_Click()
    a = InputBox("请输入连续的数:")
    s = 0
    For i = 1 To Len(a) / 2
    s = s + Val(Mid(a, i * 2 - 1, 2))
    MsgBox s
    Next i
    MsgBox "=" & s / (i-1) * Val(Text1.Text)
    End Sub
    展开
    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
扫码咨询

扫码咨询套餐

回到顶部