一到vb期末上机题，求大神解答

答案:2 悬赏:10

解决时间 2021-01-16 00:58

提问者网友：骑士
2021-01-15 14:16

一到vb期末上机题，求大神解答

最佳答案

二级知识专家网友：孤老序
2021-01-15 15:18

Private Sub Command1_Click()
If Check1 And Check2 Then
Text1 = "报名参加羽毛球和乒乓球比赛"
ElseIf Check1 And (Not Check2) Then
Text1 = "报名参加羽毛球比赛"
ElseIf (Not Check1) And Check2 Then
Text1 = "报名参加乒乓球比赛"
Else
Text1 = ""
End If
End Sub追问可以给个联系方式吗追答扣我281652515
or weixin>jsyuzhe追问同意

全部回答

1楼网友：底特律间谍
2021-01-15 16:30

Private Sub Command1_Click()
If Check1.Value And Check2.Value Then
  Text1.Text = "报名参加羽毛球和乒乓球比赛"
Else
  If Check1.Value Then
    Text1.Text = "报名参加羽毛球比赛"
  ElseIf Check2.Value Then
    Text1.Text = "报名参加乒乓球比赛"
  Else
    Text1.Text = ""
  End If
End If
End Sub追问可不可以给个联系方式可以吗

我要举报

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

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