vb第16单选按钮、复选框控件(5)

简要介绍资料的主要内容,以获得更多的关注

End Sub

Private Sub Check2_Click() If Check2.Value = 1 Then txt2 = Check2.Caption End If End Sub

Private Sub Check3_Click() If Check3.Value = 1 Then txt3 = Check3.Caption End If End Sub

Private Sub Check4_Click() If Check4.Value = 1 Then txt4 = Check4.Caption End If End Sub

Private Sub Command1_Click()

MsgBox "您的爱好是：" & vbCrLf & txt1 & vbCrLf & txt2 & vbCrLf & txt3 & vbCrLf & txt4 End Sub 作业：P99 5 小结

1、掌握单选按钮控件的设置与使用 2、掌握复选框控件的设置与使用 学生练习

百度搜索“77cn”或“免费范文网”即可找到本站免费阅读全部范文。收藏本站方便下次阅读，免费范文网，提供经典小说教育文库vb第16单选按钮、复选框控件(5)在线全文阅读。