m0_58861992
2021-06-28 14:47
采纳率: 80%
浏览 14

求vb代码!!!!!!!

 

  • 写回答
  • 关注问题
  • 收藏
  • 邀请回答

1条回答 默认 最新

  • qq_34736490 2021-06-28 15:27
    已采纳

    Dim i As Integer
    Private Sub Command1_Click()
    i = Val(Label2)
    i = InputBox("请输入一个整数:", "VB")
    If i Mod 10 = 7 Then
    MsgBox ("是")
    Else
    MsgBox ("否")
    End If

    打赏 评论

相关推荐 更多相似问题