這是C#的方法,你自己轉(zhuǎn)換為vb.net的,轉(zhuǎn)不了再追問吧。
成都創(chuàng)新互聯(lián)堅持“要么做到,要么別承諾”的工作理念,服務領域包括:做網(wǎng)站、成都網(wǎng)站制作、企業(yè)官網(wǎng)、英文網(wǎng)站、手機端網(wǎng)站、網(wǎng)站推廣等服務,滿足客戶于互聯(lián)網(wǎng)時代的景德鎮(zhèn)網(wǎng)站設計、移動媒體設計的需求,幫助企業(yè)找到有效的互聯(lián)網(wǎng)解決方案。努力成為您成熟可靠的網(wǎng)絡建設合作伙伴!
private?void?button1_Click(object?sender,?EventArgs?e)
{
Form2?frm?=?new?Form2();
frm.Show();
frm.Owner?=?this;
MethodInfo?mi?=?typeof(Application).GetMethod("RunDialog",?BindingFlags.Static?|?BindingFlags.NonPublic);
mi.Invoke(null,?new?object[]?{?frm});
}
用msgbox()顯示對話框
msgbox的用法很多,基礎的就是msgbox(“你要顯示的內(nèi)容”)
或者msgbox(“你要顯示的內(nèi)容”,16,"對話框名稱")'16是對話框的類型,還有幾個鍵的組合代碼,這個你可以查查,很多,或者你也可以用提示給出的類型,比如MsgBoxStyle.Exclamation就是顯示錯誤對話框,
可以利用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
MessageBox.Show("text")
MessageBox.Show ( "text", MessageBoxButtons.YesNoCancel)
MessageBox.Show ( "text", MessageBoxIcon.Question)
MessageBox.Show ( "text",MessageBoxDefaultButton.Button2 )
注意:使用?Show?方法的重載,可以利用該重載來指定所有者窗口。否則,消息框由當前處于活動狀態(tài)的窗口所有。
MessageBox顯示一個模態(tài)對話框,其中包含一個系統(tǒng)圖標、 一組按鈕和一個簡短的特定于應用程序消息,如狀態(tài)或錯誤的信息。消息框中返回一個整數(shù)值,該值指示用戶單擊了哪個按鈕。
以上均為一些基本方法,其他可參照MSDN?
網(wǎng)站標題:vb.net自做對話框 vbs對話框
文章網(wǎng)址:http://jinyejixie.com/article46/dohhhhg.html
成都網(wǎng)站建設公司_創(chuàng)新互聯(lián),為您提供網(wǎng)站內(nèi)鏈、做網(wǎng)站、企業(yè)網(wǎng)站制作、小程序開發(fā)、Google、建站公司
聲明:本網(wǎng)站發(fā)布的內(nèi)容(圖片、視頻和文字)以用戶投稿、用戶轉(zhuǎn)載內(nèi)容為主,如果涉及侵權(quán)請盡快告知,我們將會在第一時間刪除。文章觀點不代表本網(wǎng)站立場,如需處理請聯(lián)系客服。電話:028-86922220;郵箱:631063699@qq.com。內(nèi)容未經(jīng)允許不得轉(zhuǎn)載,或轉(zhuǎn)載時需注明來源: 創(chuàng)新互聯(lián)