您是做游戏画面?
创新互联坚持“要么做到,要么别承诺”的工作理念,服务领域包括:成都网站制作、网站建设、企业官网、英文网站、手机端网站、网站推广等服务,满足客户于互联网时代的张家港网站设计、移动媒体设计的需求,帮助企业找到有效的互联网解决方案。努力成为您成熟可靠的网络建设合作伙伴!
如果游戏简单的,看能否用Line控件代替画线,这样只要visible=false就擦除了,但如果有重叠问题,就要考虑把其他的线或坦克什么的都用控件代替。注意picturebox是否有autoredraw属性,有的话设置为true。有问题的话,把窗体的autoredraw也true,防止控件会擦除画上去的东西。
但是楼主要明白一个问题,那些绚丽多彩的游戏画面,不管2D还3D,都是一帧画面一帧画面的从头画一次的,每秒至少要画十几帧以上,3D游戏很关注一个fps参数,就是每秒画多少帧的意思,看您的电脑性能每秒能画多少帧画,如果画不出十几帧以上,感觉就卡了。
实际上游戏开发是先做游戏引擎,就是把这些复杂的纯绘图代码封装起来,做成一个工具软件,然后再把游戏里的物品图片放上去,设置动作、剧情就可以了。有兴趣可以百度一下“游戏开发引擎”,有一些通用的游戏引擎可以借用。
如果是从底层开始写代码,也不是用VB这些绘图语句能做的,太慢了,擦掉这条线都够你抓狂的。一般的,简单的画图可以用API的绘图函数,高档的就要用DirectX了。或者装个Visual Studio .net 2008,有个XNA,专门针对游戏编程的,但是我不知这个XNA是否只能支持C#语言。
补充声明一下,本人只是爱好者,不是专业人士,以上的回答是本人在自学过程中积累的一些肤浅了解,除了XNA很久前做过一点代码外,其他的都是理论没有实践。
你把 选项卡 拖到屏幕外面不就行了 只显示选项卡内东西 周围边缘都不要了 每个选项卡内配合labl 或按钮 标识不就行了。
将Label1 改成相应的 label 控件名称。
'鼠标经过时,显示下划线
Private Sub Label1_MouseEnter(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Label1.MouseEnter
Dim LabelFont As Font = New Font(Label1.Font.Name, Label1.Font.Size, FontStyle.Underline)
Label1.Font.Dispose()
Label1.Font = LabelFont
End Sub
'鼠标离开时,去除下划线
Private Sub Label1_MouseLeave(ByVal sender As Object, ByVal e As System.EventArgs) Handles Label1.MouseLeave
Dim LabelFont As Font = New Font(Label1.Font.Name, Label1.Font.Size, FontStyle.Regular)
Label1.Font.Dispose()
Label1.Font = LabelFont
End Sub