vb點虐 中怎樣實現(xiàn)程序最小化到右下角

設置主窗體Opacity屬性為0，F(xiàn)ormBorderStyle屬性為None，ShowInTaskbar屬性為 False，這樣窗體將在啟動后隱藏。在窗體上放置一個NotifyIcon組件NotifyIcon1，一個ContextMenu（彈出菜單）組件 ContextMenu1，并根據(jù)需要為ContextMenu1添加菜單項。

專注于為中小企業(yè)提供成都網站設計、成都網站制作服務,電腦端+手機端+微信端的三站合一,更高效的管理,為中小企業(yè)黎川免費做網站提供優(yōu)質的服務。我們立足成都，凝聚了一批互聯(lián)網行業(yè)人才，有力地推動了千余家企業(yè)的穩(wěn)健成長，幫助中小企業(yè)通過網站建設實現(xiàn)規(guī)模擴充和轉變。

設置NotifyIcon1的ICON屬性，這個圖標就是應用程序出現(xiàn)在系統(tǒng)托盤中的快捷圖標；設置NotifyIcon1的Text屬性為“VB.NET托盤程序”，這就是鼠標移動到托盤圖標時彈出的文字說明；設置NotifyIcon1的ContextMenu屬性為ContextMenu1，也就是右鍵單擊快捷圖標時的彈出菜單為 ContextMenu1。OK，按F5運行

VB點虐 怎么定期彈出主窗口？

首先要添加兩個窗體，假設第一個窗體名為Form1，第二個窗體名為Form2。在Form1窗體中添加個按鈕Command1。按鈕單擊事件的代碼為：

Private Sub Command1_Click()

Form2.Show '用show方法加載并且顯示名為Form2的窗體

End Sub

show 方法后面省略了兩個參數(shù)即Form2.Show 0或Form2.Show 1此參數(shù)可缺省。可自行運行驗證

vb點虐 系統(tǒng)彈窗怎么弄出感嘆號？

Msgbox的第二個參數(shù)是控制彈窗的樣式，感嘆號是MsgBoxStyle.Exclamation和MsgboxStyle.Information，問號是MsgboxStyle.Question

VB點虐 怎么彈出如下類似的對話框（看圖）？

可以利用msgbox 實現(xiàn)，也可以通過另外的窗體上畫出表格實現(xiàn)

方法一，利用msgbox：

Private Sub Command1_Click()Dim a As Long, b As Long, c As LongMsgBox "┌────┬────┬────┐" vbCrLf _ "│ 庫存1 │ 庫存2 │ 庫存3 │" vbCrLf _ "├────┼────┼────┤" vbCrLf _ "│" formatstr(a) "│" formatstr(b) "│" formatstr(c) "│" vbCrLf _ "└────┴────┴────┘" End SubPrivate Function formatstr(ByVal inputStr As String) As StringDim j As Integerj = (8 - Len(inputStr)) \ 2formatstr = Space(j) inputStr Space(j) Space((8 - Len(inputStr)) Mod 2)End Function

方法二，利用窗體實現(xiàn)：

’新建form2窗體‘將以下代碼復制到form2窗體中Private Sub Form_Load()ShowPrint "┌────┬────┬────┐" vbCrLf _ "│ 庫存1 │ 庫存2 │ 庫存3 │" vbCrLf _ "├────┼────┼────┤" vbCrLf _ "│" formatstr(a) "│" formatstr(b) "│" formatstr(c) "│" vbCrLf _ "└────┴────┴────┘" End SubPrivate Function formatstr(ByVal inputStr As String) As StringDim j As Integerj = (8 - Len(inputStr)) \ 2formatstr = Space(j) inputStr Space(j) Space((8 - Len(inputStr)) Mod 2)End Function‘將以下代碼復制在form1窗體中Private Sub Command1_Click()Form2.ShowEnd Sub

網頁題目：vb點虐 右下角彈窗 vbs彈窗圖標
文章網址：http://www.rwnh.cn/article6/ddcpiig.html

成都網站建設公司_創(chuàng)新互聯(lián)，為您提供外貿建站、搜索引擎優(yōu)化、品牌網站設計、建站公司、品牌網站建設、品牌網站制作

廣告

聲明：本網站發(fā)布的內容（圖片、視頻和文字）以用戶投稿、用戶轉載內容為主，如果涉及侵權請盡快告知，我們將會在第一時間刪除。文章觀點不代表本網站立場，如需處理請聯(lián)系客服。電話：028-86922220；郵箱：631063699@qq.com。內容未經允許不得轉載，或轉載時需注明來源： 創(chuàng)新互聯(lián)