VB.NET求幫忙！...

新建窗體，把maximizebox屬性和MinimizeBox 屬性設為false，再添加一個Label1放置文字一個Picturebox1放圖片。

10多年的佳木斯網站建設經驗，針對設計、前端、開發、售后、文案、推廣等六對一服務，響應快，48小時及時工作處理。營銷型網站的優勢是能夠根據用戶設備顯示端的尺寸不同，自動調整佳木斯建站的顯示方式，使網站能夠適用不同顯示終端，在瀏覽器中調整網站的寬度，無論在任何一種瀏覽器上瀏覽網站，都能展現優雅布局與設計，從而大程度地提升瀏覽體驗。創新互聯建站從事“佳木斯網站設計”,“佳木斯網站推廣”以來，每個客戶項目都認真落實執行。

在窗體的load事件中：

Private Sub Form1_Load() Handles Me.Load

Text="我的VB.NET程序"

PuctureBox1.Image=Image.FromFile(圖片路徑如e:\pic.jpg)

End Sub

窗體Click事件：

Private Sub Form1_Click() Handles Me.Click

Text="單擊窗體"

Label1.Text="歡迎使用VB.NET"

End Sub

窗體DoubleClick事件

Private Sub Form1_DoubleClick() Handles Me.DoubleClick

Text="雙擊窗體"

Label1.Text = "謝謝使用！"

End Sub

VB.NET 如何把鼠標移動事件寫在模塊中,并跟寫在窗體中一樣有效。

這個還是要放在窗體中，因為是窗體發生的事件，我猜你覺得亂的原因是你每個控件都寫好幾個鼠標進入、離開之類的事件？其實很多類似的控件，可以合并成一個事件，只要handle后面帶上多個控件名稱即可。

vb.net label跟著鼠標移動

簡單啊

第一個問題

在鼠標的 move事件里面 得到鼠標的坐標點，然后更改label的，left 和top屬性。具體的值你自己去算。

第二個問題

其實跟地一次差不多，只不過過加個標記，判斷鼠標是否在按鈕上進行了點擊操作，鼠標按下時變成TRUE 然后也是在鼠標MOVE的時候，更改按鈕的坐標點。當鼠標彈起的時候將這個標記置換成FALSE

回答完畢

VB.NET2005制作鼠標停留彈出窗口

onMouseOver="javascript:showLayer(idname1)" onMouseOut="idname1.style.visibility='hidden'"

DIV id="idname2" style="background-color:yellow;TOP:0px; VISIBILITY: hidden; OVERFLOW: visible; POSITION: absolute;PADDING-TOP: 3px;margin-bottom:9px"

table width="300" class="t1"

tr td width="20"/td

td width="160" align="center"b即時提示：所有知識/b/td

td width="20"/td /tr tr td/td

td

此處顯示系統中所有的知識列表。任何人提交的知識都可以在這里顯示。系統默認的顯示方式是按照時間倒排顯示。您可以選擇按提交人，知識類型進行排序。

br/

還可以通過輸入檢索詞來查詢知識。方法是在輸入框中輸入內容，然后按檢索。

br/br/bfont color="blue"特別提示：因為知識管理系統是不屬于特定項目的，因此無論登陸任何項目，按所有知識所得到的結果都是一樣的。/font/b

/td

td/td /tr tr td/td td/td td/td /tr /table /DIV

VB.NET模擬鼠標問題

Declare Sub mouse_event Lib "user32" Alias "mouse_event" (ByVal dwFlags As Integer, ByVal dx As Integer, ByVal dy As Integer, ByVal cButtons As Integer, ByVal dwExtraInfo As Integer)

Dim postion1 As New Point

mouse_event(H1 Or H8000, postion1.X * 65535 / 1366, postion1.Y * 65535 / 768, 0, 0)

'按絕對位置移動鼠標

'在鼠標坐標系統中，屏幕在水平和垂直方向上均勻分割成65535×65535個單元，

'當前所用顯示屏分辨率為1366*768

'所以要進行如上轉換

mouse_event(H2, 0, 0, 0, 0) '鼠標左鍵按下

mouse_event(H4, 0, 0, 0, 0) '鼠標左鍵彈起

msdn上有 mouse_event 的詳解，大致使用如上