在form_load里面的第一行代码写个me.show先把form强制显示出来,如果遇到大循环用doevents转交控制权,否则你的窗口会出现假死状态
把连接信息放进一个字符串,在formload里面写上
Private Sub Form_Load()
Me.Hide
'这里设置字符串,连接信息等
Me.Show
'这里连接数据库,显示
End Sub
添加一个别的窗体做，
添加timer控件……
设置timer控件
timer1.enabled=false
连接代码
做一个延迟应该行
内容全部来源于网络收集，如有侵权，请联系网站删除：QQ：24596024