就是一个程序,开始就是问题,比如说你“你喜欢什么颜色?”选项A红B黄C蓝D绿都是前面有小圆点的可以选择的,然后点下一题就出现下一个问题,到最后提交能显示总得分和结果,A1分B2分C3分D4分。就是最后那个计分不会弄,所以求高手给我一个完成的代码,不用做太多,两个问题结束就出计分板就行,我学习一下可以自己完善。谢谢!!!!!!!!分数不多,因为最近被扣分了……求求各位了……………………

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

    2044人对此回答表示赞同

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

    2人对此回答表示赞同

    定义一个dim score as integer
    第一题点击“下一题”按钮时,判断选择了哪个,然后score=score+多少分
    第二题点击“提交”时,再判断下score=score+多少分
    这个score就是2题的总分

    大概思路是这样的,我这没VB,代码也不好写。
    展开
    2
    0回复
    发布于 5年前

    评论(0)

    收起评论

  • Kennedy

    2人对此回答表示赞同

    你分析一下我下面的代码,相信你会很快解决问题的! Dim Zf As Integer Dim An As Integer Private Sub Command1_Click() Dim Dcf As Integer An = An + 1 Dcf = InputBox("请输入本次得分数:") Zf = Zf + Dcf Print "第" & An & "次按按钮后总分为:" & Zf End Sub
    展开
    2
    0回复
    发布于 6年前

    评论(0)

    收起评论

  • Melanie

    2人对此回答表示赞同

    你分析一下我下面的代码,相信你会很快解决问题的!
    Dim Zf As Integer
    Dim An As Integer
    Private Sub Command1_Click()
    Dim Dcf As Integer
    An = An + 1
    Dcf = InputBox("请输入本次得分数:")
    Zf = Zf + Dcf
    Print "第" & An & "次按按钮后总分为:" &
    展开
    2
    0回复
    发布于 6年前

    评论(0)

    收起评论

  • Tavis

    2人对此回答表示赞同

    你分析一下我下面的代码,相信你会很快解决问题的!
    Dim Zf As Integer
    Dim An As Integer
    Private Sub Command1_Click()
    Dim Dcf As Integer
    An = An + 1
    Dcf = InputBox("请输入本次得分数:")
    Zf = Zf + Dcf
    Print "第" & An & "次按按钮后总分为:" & Zf
    End Sub
    展开
    2
    0回复
    发布于 7年前

    评论(0)

    收起评论

  • zqsg走一波

    2人对此回答表示赞同


    你分析一下我下面的代码,相信你会很快解决问题的!
    Dim Zf As Integer
    Dim An As Integer
    Private Sub Command1_Click()
    Dim Dcf As Integer
    An = An + 1
    Dcf = InputBox("请输入本次得分数:")
    Zf = Zf + Dcf
    Print "第" & An & "次按按钮后总分为:" & Zf
    End Sub
    展开
    2
    0回复
    发布于 7年前

    评论(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
扫码咨询

扫码咨询套餐

回到顶部