當(dāng)用戶按下左鍵時(shí),為按下對(duì)象的MouseMove事件綁定處理方法,并記錄鼠標(biāo)坐標(biāo)(窗體左上角為原點(diǎn),在事件的MouseEventArgs類型的e參數(shù)中提供)。此時(shí)用戶移動(dòng)鼠標(biāo),保持窗體原點(diǎn)與鼠標(biāo)新坐標(biāo)的相對(duì)位置不變。當(dāng)用戶釋放左鍵時(shí),撤銷按下對(duì)象的MouseMove事件處理方法
成都創(chuàng)新互聯(lián)是一家集網(wǎng)站建設(shè),雨花臺(tái)企業(yè)網(wǎng)站建設(shè),雨花臺(tái)品牌網(wǎng)站建設(shè),網(wǎng)站定制,雨花臺(tái)網(wǎng)站建設(shè)報(bào)價(jià),網(wǎng)絡(luò)營銷,網(wǎng)絡(luò)優(yōu)化,雨花臺(tái)網(wǎng)站推廣為一體的創(chuàng)新建站企業(yè),幫助傳統(tǒng)企業(yè)提升企業(yè)形象加強(qiáng)企業(yè)競爭力??沙浞譂M足這一群體相比中小企業(yè)更為豐富、高端、多元的互聯(lián)網(wǎng)需求。同時(shí)我們時(shí)刻保持專業(yè)、時(shí)尚、前沿,時(shí)刻以成就客戶成長自我,堅(jiān)持不斷學(xué)習(xí)、思考、沉淀、凈化自己,讓我們?yōu)楦嗟钠髽I(yè)打造出實(shí)用型網(wǎng)站。
1、無邊框窗體也就是無標(biāo)題欄窗體,對(duì)于這樣的窗體移動(dòng)需要編程實(shí)現(xiàn)。
2、vb有兩種辦法實(shí)現(xiàn),一直接編程實(shí)現(xiàn),二調(diào)用windows API編程實(shí)現(xiàn)。
3、這里示例直接編程實(shí)現(xiàn):
Option?Explicit
Dim?BolIsMove?As?Boolean,?MousX?As?Long,?MousY?As?Long
Private?Sub?Form_MouseDown(Button?As?Integer,?Shift?As?Integer,?X?As?Single,?Y?As?Single)
If?Button?=?1?Then?BolIsMove?=?True
MousX?=?X
MousY?=?Y
End?Sub
Private?Sub?Form_MouseMove(Button?As?Integer,?Shift?As?Integer,?X?As?Single,?Y?As?Single)
Dim?CurrX?As?Long,?CurrY?As?Long
If?BolIsMove?Then
CurrX?=?Me.Left?-?MousX?+?X
CurrY?=?Me.Top?-?MousY?+?Y
Me.Move?CurrX,?CurrY
End?If
End?Sub
Private?Sub?Form_MouseUp(Button?As?Integer,?Shift?As?Integer,?X?As?Single,?Y?As?Single)
BolIsMove?=?False
End?Sub
Private Sub Command1_Click()
Me.Top = 0
Me.Left = 0
'Me 表示本窗體,如果是其他窗體可以替換,如Form2.top=0
End Sub
1991年,微軟公司推出了 Visual Basic 1.0。當(dāng)時(shí)引起了很大的轟動(dòng)。這個(gè)連接編程語言和用戶界面的進(jìn)步被稱為Tripod(有些時(shí)候叫做Ruby),最初的設(shè)計(jì)是由阿蘭·庫珀(Alan Cooper)完成的。
許多專家把 VB 的出現(xiàn)當(dāng)做是軟件開發(fā)史上的一個(gè)具有劃時(shí)代意義的事件。在當(dāng)時(shí),它是第一個(gè)“可視”的編程軟件。這使得程序員欣喜之極,都嘗試在VB的平臺(tái)上進(jìn)行軟件創(chuàng)作。
微軟也不失時(shí)機(jī)地在四年內(nèi)接連推出 2.0、3.0、4.0 三個(gè)版本。并且從 VB 3.0 開始,微軟將Access的數(shù)據(jù)庫驅(qū)動(dòng)集成到了 VB 中,這使得 VB 的數(shù)據(jù)庫編程能力大大提高。從 VB 4.0 開始,VB 也引入了面向?qū)ο蟮某绦蛟O(shè)計(jì)思想。VB 功能強(qiáng)大,學(xué)習(xí)簡單。而且,VB 還引入了“控件”的概念,使得大量已經(jīng)編好的 VB 程序可以被我們直接拿來使用。
2002年開始,微軟將.NET Framework與 Visual Basic 結(jié)合而成為 Visual Basic .NET (vb .net),重新打造 VB,新增許多特性及語法,又將 VB 推向一個(gè)新的高度。最新版本 Visual Basic 2012 也將帶來許多令人期待的新功能。
通過幾年的發(fā)展,它已成為一種專業(yè)化的開發(fā)語言和環(huán)境。用戶可用Visual Basic 快速創(chuàng)建Windows程序,并可編寫企業(yè)水平的客戶端/服務(wù)器程序及強(qiáng)大的數(shù)據(jù)庫應(yīng)用程序。