VB.net制作启动界面

新建一个Sub ： Main

和顺网站制作公司哪家好，找创新互联！从网页设计、网站建设、微信开发、APP开发、响应式网站设计等网站项目制作，到程序开发，运营维护。创新互联于2013年成立到现在10年的时间，我们拥有了丰富的建站经验和运维经验，来保证我们的工作的顺利进行。专注于网站建设就选创新互联。

Private Sub Main()

xxx.show 'xxx指启动窗体

'载入图片、数据库之类的

Unload xxx

{from}.show '{from}指主界面

End Sub

然后在工程-属性将"Main"作为启动对象

.NET项目UI设计技巧——界面设置

1、登录界面要求

（1）相关参数更改

尺寸： Size：（390,280）

无边框设计： FormBorderStyle：None

窗体启动位置： StartPosition：CenterScreen

窗体名： Text：管理员登录

（2）添加picturebox：

铺满顶部：Dock参数为Top

背景图片：修改BackgroundImage，图片设置为拉伸BackgroundImageLayout：stretch

添加标题

Label

——Text：企业级MIS综合平台

——backcolor：用取色器取背景色，同化

——ForeColor：字体颜色

添加其他元素并修改颜色

加入close方法

2、总结

登录窗体设计

（1）添加新登录窗体，让窗体无边框

（2）图片控件，设置图片拉伸方式

（3）按钮的扁平化设计

（4）文本框边框设计

VB.net一个很简单的UI问题

花了二十分钟给你写了代码，已测试。建议学习并使用System.Drawing绘制。

主要是掌握Graphics.FillRectangle和DrawString的使用。

Imports System.Drawing

Public Class 进度条UI

Public 上面笔刷 As SolidBrush = New SolidBrush(Color.FromArgb(192, 175, 238, 238))

Public 下面笔刷 As SolidBrush = New SolidBrush(Color.FromArgb(192, 30, 144, 255))

Public 文字笔 As SolidBrush = New SolidBrush(Color.FromArgb(255, 255, 255, 255))

Public 字体 As Font = New Font("微软雅黑", 14.0)

Public 文字格式 As StringFormat = New StringFormat() With

{.Alignment = StringAlignment.Center, .LineAlignment = StringAlignment.Center}

''' summary

''' 绘制指定进度的图像。

''' 当进度变化时调用一次本方法，建议将创建的Graphics对象保存到变量而不要重复创建。。

''' /summary

''' param name="控件"绘制到此控件的工作区/param

''' param name="g"绘制到控件的Graphics对象，例如 Button1.CreateGraphics()/param

''' param name="进度"进度百分比实数，57% = 0.57/param

Public Sub 绘制(ByRef 控件 As Control, ByRef g As Graphics, ByVal 进度 As Double)

Dim 矩形 = 控件.ClientRectangle '获取控件的工作区矩形

Dim 下面高度 = CInt(矩形.Height * 进度) '获取下面颜色块的高度

Dim 中间位置 = 矩形.Top + 矩形.Height - 下面高度 '获取中间分界线的Y坐标

Dim 上矩形 = New Rectangle(矩形.X, 矩形.Y, 矩形.Width, 矩形.Height - 下面高度)

Dim 下矩形 = New Rectangle(矩形.X, 中间位置, 矩形.Width, 下面高度)

g.FillRectangle(上面笔刷, 上矩形)

g.FillRectangle(下面笔刷, 下矩形)

'绘制文字

Dim 文字 As String = String.Format("{0:0.00}%", 进度 * 100)

g.DrawString(文字, 字体, 文字笔, 矩形, 文字格式)

End Sub

End Class

下面是Form1窗体的代码：添加一个Button1和Timer1控件，将Button1尺寸拖大点

Public Class Form1

Public g As Graphics

Public 进度条UI As New 进度条UI

Public 进度 As Double

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

g = Button1.CreateGraphics()

Timer1.Enabled = Not Timer1.Enabled

End Sub

Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick

进度 += 0.01

进度条UI.绘制(Button1, g, 进度)

End Sub

End Class

VB UI界面设计

将图片放在一个PictureBox（picBuff）里，在窗体的Resize事件里将picBuff的图片画到窗体上：

If Me.ScaleHeight 100 And Me.ScaleWidth 100 Then '防止出现负数

Me.PaintPicture picBuff.Picture, 0, 0, Me.Width, Me.Height, 0, 0, picBuff.Width, picBuff.Height, vbSrcCopy

End If

怎么修改vb.net窗体界面？

重新编译

还不行.就去 你项目目录中的bin\Debug目录里面把里面的exe程序删除了.再重新生成一下.

用VB.NET开发的应用程序，大家用什么软件或第三方控件做UI界面的编码啊？

Visual Studio 2013

Microsoft Visual Studio（简称VS）是美国微软公司的开发工具包系列产品。VS是一个基本完整的开发工具集，它包括了整个软件生命周期中所需要的大部分工具，如UML工具、代码管控工具、集成开发环境(IDE)等等。所写的目标代码适用于微软支持的所有平台，包括Microsoft Windows、Windows Mobile、Windows CE、.NET Framework、.NET Compact Framework和Microsoft Silverlight 及Windows Phone。 Visual Studio是目前最流行的Windows平台应用程序的集成开发环境。最新版本为 Visual Studio 2013 版本，基于.NET Framework 4.5.1 。

本文名称：vb.netui界面,vbnetUI界面库
本文链接：http://kswjz.com/article/hceepe.html