重庆分公司,新征程启航
为企业提供网站建设、域名注册、服务器等服务
Public Class Form1
成都网站设计、网站制作的开发,更需要了解用户,从用户角度来建设网站,获得较好的用户体验。创新互联建站多年互联网经验,见的多,沟通容易、能帮助客户提出的运营建议。作为成都一家网络公司,打造的就是网站建设产品直销的概念。选择创新互联建站,不只是建站,我们把建站作为产品,不断的更新、完善,让每位来访用户感受到浩方产品的价值服务。
Public str() As String
Public flag As Integer = 0 //标志位,记录上一次显示的字符串在数组中的位置
Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
Timer1.Interval = 2000
Timer1.Start()
str = {"正在初始化A...", "正在初始化B...", "正在初始化C...", "初始化完成!"}
End Sub
Private Sub Timer1_Tick(sender As Object, e As EventArgs) Handles Timer1.Tick
Label1.Text = str(flag)
flag = flag + 1 //保证下次执行label1.text=str(flag)显示不同内容
If flag = 4 Then //加载完了,定时器关掉
Timer1.Stop()
End If
End Sub
End Class
运行效果见附件屏幕录像
新建一个Sub : Main
Private Sub Main()
xxx.show 'xxx指启动窗体
'载入图片、数据库之类的
Unload xxx
{from}.show '{from}指主界面
End Sub
然后在工程-属性将"Main"作为启动对象
你是不是用的Visual Studio来开发的?如果是,这样操作:打开 项目 菜单 中的 XXX属性,在弹出的属性页选择最上面那个 应用程序 标签,里面有个启动窗体,你选择一下就可以了。
如果你不是用的visual Studio来开发的,那么可以考虑把另外一个窗口的visible属性先设置为false或者把你要显示的窗口改为对话框的形式,大小比另外一个窗口大一点或者一样(即 模态窗口,必须关闭才能继续操作),这样都可以实现你要的效果。
把启动窗体先显示出来,然后,过一段时间再把这个窗体隐藏起来就行了。在其他窗体中加一句form1.visible=false
然后启动窗体把标题栏什么的设置一下,做个图片背景什么的,就行了。
方法如下:
1、打开例1.1创建的工程。
2、选择窗体Form1并双击该窗体,出现窗体的调事件的过程代码体。
3、在窗体调用的过程代码体中编制如下过程代码:
Private Sub Form_Load()
Form1.Width = 4860
Form1.Height = 2520
End Sub
4、设置窗体Form1的SartUpPosition属性为2-屏幕中心,这样运行窗体可以发现,屏幕的大小与例1.6中通过属性设置的大小是一致的。