
正文
vb.net公共对话框 vbnet webclient
提示:扫一扫查出行【扫一扫了解最新限行尾号】
复制提示
vb.net对话框事件
MessageBox.Show("text")
MessageBox.Show ( "text", MessageBoxButtons.YesNoCancel)
MessageBox.Show ( "text", MessageBoxIcon.Question)
MessageBox.Show ( "text",MessageBoxDefaultButton.Button2 )
注意:使用 Show 方法的重载,可以利用该重载来指定所有者窗口。否则,消息框由当前处于活动状态的窗口所有。
MessageBox显示一个模态对话框,其中包含一个系统图标、 一组按钮和一个简短的特定于应用程序消息,如状态或错误的信息。消息框中返回一个整数值,该值指示用户单击了哪个按钮。
以上均为一些基本方法,其他可参照MSDN
相关问答
Q1: VB.net怎么弹出如下类似的对话框(看图)?
可以利用msgbox 实现vb.net公共对话框,也可以通过另外的窗体上画出表格实现
方法一vb.net公共对话框,利用msgboxvb.net公共对话框:
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
方法二,利用窗体实现vb.net公共对话框:
’新建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
Q2: vb.net中用什么方法显示对话框?
用msgbox()显示对话框
msgbox的用法很多,基础的就是msgbox(“你要显示的内容”)
或者msgbox(“你要显示的内容”,16,"对话框名称")'16是对话框的类型,还有几个键的组合代码,这个你可以
查查
,很多,或者你也可以用提示给出的类型,比如MsgBoxStyle.Exclamation就是显示错误对话框,
Q3: vb.net如何让父窗体工具栏的保存对话框在所有子窗体通用
'代码中Button控件自行在窗体中添加并改名
***********************************父窗体代码vb.net公共对话框:
Public Class Form1
Public Sub From1_保存Button_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles From1_保存Button.Click
Select Case sender.name
Case "From1_保存Button"
MsgBox("提交的窗体是From1")
Case "Form2_提交Button"
MsgBox("提交的窗体是From2")
End Select
Form2.Close()
End Sub
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button_显示子窗体.Click
Form2.ShowDialog()
End Sub
End Class
***********************************子窗体代码:
Public Class Form2
Private Sub Form2_提交Button_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Form2_提交Button.Click
Form1.From1_保存Button_Click(Form2_提交Button, New System.EventArgs)
End Sub
End Class
***********************************
方法满多的vb.net公共对话框,起码三四种,比如用一个全局变量保存当前提交窗体名,执行操作的代码读取这个全局变量就行。最方便的应该是做过程
Public Sub DateBaseAdd(ByVal From As Form)
,然后父窗体跟子窗体都能调用这个全局过程,同时传入窗体名称
Q4: VB控件commondialog 的具体作用与用法
CommonDialog 控件提供诸如打开和保存文件、设置打印选项、选择颜色和字体等操作的一组标准对话框。运行 Windows 帮助引擎时vb.net公共对话框,控件还能够显示帮助。
CommonDialog 控件在 Visual Basic 和 Microsoft Windows 动态连接库Commdlg.dll 例程之间提供了接口。为了用该控件创建对话框vb.net公共对话框,必须要求Commdlg.dll 在 Microsoft Windows \System 目录下。
为了在应用程序中使用 CommonDialog 控件vb.net公共对话框,应将其添加到窗体上并设置属性。控件显示的对话由控件的方法决定。运行时,调用相应方法后将显示对话框或执行帮助引擎;设计时在窗体上将 CommonDialog 控件显示成一个图标。此图标的大小不能改变。
扩展资料
“字体”对话框根据大小、颜色、样式选择字体。用户一旦在“字体”对话框中选定字体后,下列属性就会包含有关用户选项的信息。 要显示“字体”对话框 。
将 Flags 属性设置为下述 Visual Basic 常数之一vb.net公共对话框:
cdlCFScreenFonts(屏幕字体)
cdlCFPrinterFonts(打印机字体)
cdlCFBoth(既可以是屏幕字体又可以是打印机字体)
警告 在显示“字体”对话框之前必须将 Flags 属性设置为这些数值之一,否则将发生字体不存在错误。
关于vb.net公共对话框和vbnet webclient的介绍到此就结束了,不知道你从中找到你需要的信息了吗 ?如果你还想了解更多这方面的信息,记得收藏关注本站。







