你設(shè)一下你控件的anchor和dock兩個(gè)屬性,可以達(dá)到你滿意的組合效果。包括位置和大小比例變化。

專業(yè)從事成都做網(wǎng)站、網(wǎng)站建設(shè)、外貿(mào)營(yíng)銷網(wǎng)站建設(shè),高端網(wǎng)站制作設(shè)計(jì),小程序定制開發(fā),網(wǎng)站推廣的成都做網(wǎng)站的公司。優(yōu)秀技術(shù)團(tuán)隊(duì)竭力真誠(chéng)服務(wù),采用H5頁(yè)面制作+CSS3前端渲染技術(shù),自適應(yīng)網(wǎng)站建設(shè),讓網(wǎng)站在手機(jī)、平板、PC、微信下都能呈現(xiàn)。建站過(guò)程建立專項(xiàng)小組,與您實(shí)時(shí)在線互動(dòng),隨時(shí)提供解決方案,暢聊想法和感受。
控件是可以顯示在里面的,你只要加個(gè)label,把label的屬性設(shè)為visualble=fause就行。設(shè)置鼠標(biāo)經(jīng)過(guò)頭像的mouseHover和mouseLeave事件,當(dāng)mouseHover時(shí)label的屬性visualble=true,當(dāng)mouseLeave時(shí)label的屬性visualble=fause即可。窗體的鼠標(biāo)事件可以設(shè)置控件的cursor屬性,里面可以選擇許多種鼠標(biāo)圖形。 只要是正常的Form都可以改變窗體大小,但是無(wú)邊框的窗體只能用函數(shù)改變或者設(shè)置屬性,在debug后是不能改變的。拖動(dòng)窗體需要在窗體的load時(shí)間里面寫入當(dāng)鼠標(biāo)單擊不放時(shí)的事件即可,不難。
陳恩點(diǎn)在此為你解答如有錯(cuò)誤請(qǐng)見諒:
思路是這樣的:
先判斷鼠標(biāo)位置(MouseMove事件)
如果在邊緣,同時(shí)鼠標(biāo)左鍵是按下的
窗體增加 增加數(shù)為鼠標(biāo)移動(dòng)數(shù)
你實(shí)例化一個(gè)文件對(duì)象,就可以獲取這個(gè)文件的相關(guān)屬性了,VB.NET實(shí)例,以你的文件為例:
Dim sourcefileinfo As New FileInfo(“ c:\1.txt”) '定義并實(shí)例化FileInfo對(duì)象。length就是它的大小!
label1.Text = "文件大小為: " sourcefileinfo.Length "字節(jié)"
窗體的 SizeFromClientSize 屬性是工作區(qū)域大小。
Me.SizeFromClientSize(New Size(200, 300))
Public Class Form1
Dim 初始化控件自動(dòng)大小調(diào)整與窗口的寬度比例 As Integer
Dim 初始化控件自動(dòng)大小調(diào)整與窗口的高度比例 As Integer
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
初始化控件自動(dòng)大小調(diào)整與窗口的寬度比例 = Me.Width / 控件自動(dòng)大小調(diào)整.Width
初始化控件自動(dòng)大小調(diào)整與窗口的高度比例 = Me.Height / 控件自動(dòng)大小調(diào)整.Height
顯示控件的位置坐標(biāo)()
End Sub
Private Sub Form1_ResizeEnd(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.ResizeEnd
' Form1_ResizeEnd? 這個(gè)事件是 窗口大小變化完成后 再進(jìn)行操作的
控件自動(dòng)大小調(diào)整.Location = New Point(控件自動(dòng)大小調(diào)整.Left, 控件自動(dòng)大小調(diào)整.Top)
'設(shè)置控件的初始左位置坐標(biāo)? 與? 上位置坐標(biāo)
控件自動(dòng)大小調(diào)整.Size = New Point(Int(Me.Width / 初始化控件自動(dòng)大小調(diào)整與窗口的寬度比例), Int(Me.Height / 初始化控件自動(dòng)大小調(diào)整與窗口的高度比例))
'更改控件的大小? 按第一次窗口的比例 進(jìn)行調(diào)整
顯示控件的位置坐標(biāo)()
End Sub
Private Sub 顯示控件的位置坐標(biāo)()
Label1.Text = "控件的上邊距坐標(biāo): " 控件自動(dòng)大小調(diào)整.Top
Label2.Text = "控件的左邊距坐標(biāo): " 控件自動(dòng)大小調(diào)整.Left
Label3.Text = "控件的寬度大小: " 控件自動(dòng)大小調(diào)整.Width
Label4.Text = "控件的高度大小: " 控件自動(dòng)大小調(diào)整.Height
End Sub
End Class
還有好多方法? 慢慢研究吧兄弟 希望能幫到你
本文名稱:vb.net獲取控件大小 vbs窗口大小
網(wǎng)站鏈接:http://chinadenli.net/article22/doogjjc.html
成都網(wǎng)站建設(shè)公司_創(chuàng)新互聯(lián),為您提供網(wǎng)站內(nèi)鏈、ChatGPT、定制網(wǎng)站、網(wǎng)站策劃、關(guān)鍵詞優(yōu)化、網(wǎng)站設(shè)計(jì)公司
聲明:本網(wǎng)站發(fā)布的內(nèi)容(圖片、視頻和文字)以用戶投稿、用戶轉(zhuǎn)載內(nèi)容為主,如果涉及侵權(quán)請(qǐng)盡快告知,我們將會(huì)在第一時(shí)間刪除。文章觀點(diǎn)不代表本網(wǎng)站立場(chǎng),如需處理請(qǐng)聯(lián)系客服。電話:028-86922220;郵箱:631063699@qq.com。內(nèi)容未經(jīng)允許不得轉(zhuǎn)載,或轉(zhuǎn)載時(shí)需注明來(lái)源: 創(chuàng)新互聯(lián)