当前位置:编程学习 > VB >>

VB窗体的背景图充满整个窗体,怎样设置?

其他:'1、设置BorderStyle属性设置为“0-None”
'2、使用 网海1书生
 上面说的代码
如果做封面的话,还需要在窗体上放一个Timer
'1、设置BorderStyle属性设置为“0-None”
'2、窗体上放一个Timer,默认名称为Timer1'
Private Sub Form_Click()
    Form2.Show
End Sub
Private Sub Form_Load()
    Me.AutoRedraw = True
    Timer1.Interval = 3000
    Timer1.Enabled = True
End Sub
 
Private Sub Form_Paint()
    Timer1.Enabled = False
End Sub
Private Sub Form_Resize()
    Me.PaintPicture Me.Picture, 0, 0, Me.ScaleWidth, Me.ScaleHeight
End Sub
Private Sub Timer1_Timer()
    Timer1.Enabled = False
    Unload Me
    Form2.Show
End Sub 窗体上一个Image1 把stretch 属性改为true
加载你想要加 的图片。
在窗体的Resize事件里写以下代码
Private Sub Form_Resize()
Image1.Move 0, 0, Me.ScaleWidth, Me.ScaleHeight
End Sub 

上一个:VB 按钮 Command 如何改变上边文字的颜色?
下一个:控件被过程调戏用时,焦点在那。

CopyRight © 2012 站长网 编程知识问答 www.zzzyk.com All Rights Reserved
部份技术文章来自网络,