VB或VC如何自定义有两种颜色的背景色，比如屏幕显示一半黑色一半白色？
1个回答
展开全部
Private Sub Form_Resize()
Form1.DrawWidth = 10
Form1.AutoRedraw = True
For i = 1 To 200
If i <= 100 Then
Line (0, Form1.Height / 200 * i)-(25000, Form1.Height / 200 * i), vbBlack
Else
Line (0, Form1.Height / 200 * i)-(25000, Form1.Height / 200 * i), vbWhite
End If
Next
End Sub
根据此原理，还可以实现窗体渐变背景的效果，自己摸索一下吧。
望采纳！
更多追问追答
追问
可否解释详细点？我很多不懂
我这里( 25000,me.Height / 200 * i), vbBlack
(25000, me.Height / 200 * i), vbWhite这两个提示错误为：应为语句结束
追答
你用的软件是VB6.0吗？还是VB.net
本回答由提问者推荐
已赞过
已踩过<
评论
收起
你对这个回答的评价是？
推荐律师服务：
若未解决您的问题，请您详细描述您的问题，通过百度律临进行免费专业咨询
