vb.net初始化屏幕的简单介绍

vb.net用form模拟初始屏幕，想在窗体显示后让窗体里的label依次显示“正在初始化A”，“

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

运行效果见附件屏幕录像

VB.net 对象初始化 如何 简化？

可以改写成以下形式：

Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click

Dim strCon As String = "Provider=Microsoft.ACE.OLEDB.12.0;Data Source=D:\FUO_Inventory.accdb"

Dim myConn As New OleDbConnection(strCon)

myConn.Open()

End Sub

vb.net怎么做启动窗体之前显示的画面

把启动窗体先显示出来，然后，过一段时间再把这个窗体隐藏起来就行了。在其他窗体中加一句form1.visible=false

然后启动窗体把标题栏什么的设置一下，做个图片背景什么的，就行了。

如何在代码中设置vb.net运行初始界面与屏幕右上角对齐？

获取屏幕大小宽和高 和初始化窗口的尺寸 屏幕减尺寸等于你想要的left值 和top值 即屏幕比你窗体高多少 宽多少就是你右对齐的初始值 右上角对齐top依旧为0

文章标题：vb.net初始化屏幕的简单介绍
文章起源：http://jkwzsj.com/article/dosjcpp.html