黑白子交换的vb程序怎么写 20
1个回答
展开全部
不知道你用什么来表示“黑白子”
我可以给你个思路
添加一个Picture控件
-------------------------------------------
Private Sub Picture1_Click()
If Picture1.BackColor = &H0& Then’当颜色为黑色时改为白色
Picture1.BackColor = &HFFFFFF
Else'当颜色为其他色彩时改为白色
Picture1.BackColor = &H0&
End If
End Sub
我可以给你个思路
添加一个Picture控件
-------------------------------------------
Private Sub Picture1_Click()
If Picture1.BackColor = &H0& Then’当颜色为黑色时改为白色
Picture1.BackColor = &HFFFFFF
Else'当颜色为其他色彩时改为白色
Picture1.BackColor = &H0&
End If
End Sub
已赞过
已踩过<
评论
收起
你对这个回答的评价是？
推荐律师服务：
若未解决您的问题，请您详细描述您的问题，通过百度律临进行免费专业咨询
