锐客网

  1. 首页 > 睿知 > it技术 > >

vb.net千分比 vba百分比( 二 )

IT技术语言


vb.net 怎样将窗体和所有控件根据电脑分辨率固定？Public Class Form1
Dim 初始化控件自动大小调整与窗口vb.net千分比的宽度比例 As Integer
Dim 初始化控件自动大小调整与窗口vb.net千分比的高度比例 As Integer
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
初始化控件自动大小调整与窗口的宽度比例 = Me.Width / 控件自动大小调整.Width
初始化控件自动大小调整与窗口的高度比例 = Me.Height / 控件自动大小调整.Height
显示控件的位置坐标()
End Sub
Private Sub Form1_ResizeEnd(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.ResizeEnd
' Form1_ResizeEnd这个事件是 窗口大小变化完成后 再进行操作的
控件自动大小调整.Location = New Point(控件自动大小调整.Left, 控件自动大小调整.Top)
'设置控件的初始左位置坐标与上位置坐标
控件自动大小调整.Size = New Point(Int(Me.Width / 初始化控件自动大小调整与窗口的宽度比例), Int(Me.Height / 初始化控件自动大小调整与窗口的高度比例))
'更改控件的大小按第一次窗口的比例 进行调整
显示控件的位置坐标()
End Sub
Private Sub 显示控件的位置坐标()
Label1.Text = "控件的上边距坐标： "控件自动大小调整.Top
Label2.Text = "控件的左边距坐标： "控件自动大小调整.Left
Label3.Text = "控件的宽度大?。?"控件自动大小调整.Width
Label4.Text = "控件的高度大?。?"控件自动大小调整.Height
End Sub
End Class
VB.NET 怎么样保留后面的小数位保留两位小数的一般方法是四舍五入法 。
保留两位小数，看千分位 。是4或比4小舍去；是5或比5大舍去以后向前一位进1 。
如：3.425保留两位小数就是3.43
3.421保留两位小数就是3.42
又如： 3.4263保留两位小数就是3.43
3.4233保留两位小数就是3.42
再如：3.4保留两位小数就是3.40
关于vb.net千分比和vba百分比的介绍到此就结束了 ， 不知道你从中找到你需要的信息了吗 ？如果你还想了解更多这方面的信息，记得收藏关注本站 。

推荐阅读


上一篇：u盘恢复的表格乱码怎么恢复，u盘表格文件损坏怎么修复

下一篇：小程序提示漏洞怎么处理，小程序客户端漏洞测试