PrivateSubCommand1_Click()
Label1=""
IfOption1Value=TrueThenLabel1=Label1&""&Option1Caption
IfOption2Value=TrueThenLabel1=Label1&""&Option2Caption
IfOption3Value=TrueThenLabel1=Label1&""&Option3Caption
IfOption4Value=TrueThenLabel1=Label1&""&Option4Caption
IfOption5Value=TrueThenLabel1=Label1&""&Option5Caption
IfOption6Value=TrueThenLabel1=Label1&""&Option6Caption
IfOption7Value=TrueThenLabel1=Label1&""&Option7Caption
IfOption8Value=TrueThenLabel1=Label1&""&Option8Caption
IfCheck1Value=1ThenLabel1=Label1&""&Check1Caption
IfCheck2Value=1ThenLabel1=Label1&""&Check2Caption
IfCheck3Value=1ThenLabel1=Label1&""&Check3Caption
EndSub
PrivateSubCommand2_Click()
Label1=""
EndSub
PrivateSubCommand3_Click()
End
EndSub
以上是根据你的要求最简单的程序,请自己根据需要完善代码
以上就是关于用VB6.0设计一个购买苹果产品的小程序,要求见图全部的内容,包括:用VB6.0设计一个购买苹果产品的小程序,要求见图、、等相关内容解答,如果想了解更多相关内容,可以关注我们,你们的支持是我们更新的动力!
欢迎分享,转载请注明来源:内存溢出
评论列表(0条)