启动时候的图片怎么加上去阿？

Question

加到哪里，窗体里吗？form1.picture=loadpicture("c:\a.bmp")

Answer 1

在你的工程里多做一个用于启动用的窗体,设成无边框的,再在窗体上装载一张你想要的启动图片,用loadpicture=路径+文件名,然后在启动工程中把这个窗体设成启动窗体应该就可以.

Answer 2

给我你的EMAIL，我将我做的一个发给你：
我的EMAIL：[email protected]

Answer 3

你是想做个封面窗体吧，form1为主窗体，form2为封面窗体，form2上提前加上图片并放置一个Timer控件，form1设为启动窗体。Private Sub Timer1_Timer()Unload Me
form1.Show
Timer1.Enabled = False
End Sub
Private Sub Form_Load()‘form1
form1.Visible = False
form2.Show
End Sub

Answer 4

具体代码：
你的工程要有一个作为启动的窗体(Form1)第一个窗体里的代码：(Form1)
Private Sub Form_Load()
Me.BorderStyle = 0
Me.Picture = LoadPicture(App.Path + "\a.bmp") '具体路径自己设一下，然后窗体大小与图片大小相同
End SubPrivate Sub Timer1_Timer()
DoEvents
Load Form2
Form2.Show
End Sub
第二个窗体里的代码：（Form2)
Private Sub Form_Load()
Unload Form1
End Sub