vb.net如何弹出窗口 vbnet doevent

VB.net怎么弹出如下类似的对话框（看图）？

可以利用msgbox 实现，也可以通过另外的窗体上画出表格实现

方法一，利用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

方法二，利用窗体实现：

’新建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

相关问答

Q1: VB怎么弹出对话框窗口

有一个命令：msgbox

语法：MsgBox(prompt[, buttons] [, title] [, helpfile, context])

使用说明：

Prompt 必需的。字符串表达式，作为显示在对话框中的消息。prompt 的最大长度大约为 1024 个字符，由所用字符的宽度决定。如果 prompt 的内容超过一行，则可以在每一行之间用回车符 (Chr(13))、换行符 (Chr(10)) 或是回车与换行符的组合 (Chr(13) Chr(10)) 将各行分隔开来。

Buttons 可选的。数值表达式是值的总和，指定显示按钮的数目及形式，使用的图标样式，缺省按钮是什么以及消息框的强制回应等。如果省略，则 buttons 的缺省值为 0。

Title 可选的。在对话框标题栏中显示的字符串表达式。如果省略 title，则将应用程序名放在标题栏中。

Helpfile 可选的。字符串表达式，识别用来向对话框提供上下文相关帮助的帮助文件。如果提供了 helpfile，则也必须提供 context。

Context 可选的。数值表达式，由帮助文件的作者指定给适当的帮助主题的帮助上下文编号。如果提供了 context，则也必须提供 helpfile。

常见使用方法：

1.msgbox "大家好"

2.Dim a

a = "大家好"

msgbox a

3.MsgBox("删除信息无法恢复，是否删除?", vbExclamation + vbYesNo, "警告")

Q2: VB怎样设置点击一个按钮后弹出另一个窗口

首先要添加两个窗体vb.net如何弹出窗口，假设第一个窗体名为Form1vb.net如何弹出窗口，第二个窗体名为Form2。

在Form1窗体中添加个按钮Command1。按钮单击事件的代码为：

Private Sub Command1_Click()

Form2.Show//用show方法加载并且显示名为Form2的窗体

End Sub

show 方法后面省略vb.net如何弹出窗口了两个参数即Form2.Show 0或Form2.Show 1此参数可缺省。

扩展资料

VB窗体的三个基本概念：

编VB程序首先要创建一个良好的可视化界面。每个程序界面是由窗体(Form) 和一些必要的控件元素(Control) 构成的。由于VB属于面向对象编程vb.net如何弹出窗口，所以一般将窗体与控件都称为对象。

需要先vb.net如何弹出窗口了解一下三个基本概念：对象的属性、方法和事件。

属性：指对象(窗体,控件)的大小、颜色、方位等一系列外观或内部构造的特征。

方法：指对象(窗体,控件)所进行的操作。

事件：指对象(窗体,控件)对外部条件的响应。

现今的Windows视窗操作系统，与以前Dos最显著的区别就是其拥有一个为用户所能接受的图形界面。在这个可视化的图形界面中，户能方便地使用多个程序，而这一切就象在针对一个个窗口进行操作。

Q3: VB.NET 窗口弹出问题

你在第一个窗口里写 Form2.ShowDialog()

这样就可以了，关掉form2的时候form1的代码就会继续执行

Q4: VB.net怎么弹出文件夹路径选择框

选择文件夹  在工具箱 - 对话框 里选择 FolderBrowserDialog 添加 到设计器中

然后 代码写在  按钮事件里

FolderBrowserDialog1.ShowDialog()

textbox1.text =FolderBrowserDialog1.SelectedPath

选择文件 在工具箱 - 对话框 里选择 OpenFileDialog

把 OpenFileDialog1.ShowDialog()

TextBox1.Text = OpenFileDialog1.FileName

写到按钮事件下

如图

点击按钮会弹出 通用对话框  选择好路径后 确定 ，编辑框里就会显示选择的路径

Q5: VB.NET中右键单击弹出新窗口的功能

在你的主窗体里找到MouseDown事件

如果是任意点击的用下面的代码就足够了

如果一定要是边框的话你要给出边框的高度（以像素为单位）

我的QQ:575297577

Private Sub 主窗体_MouseDown(ByVal sender As System.Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles MyBase.MouseDown

If e.Button = Windows.Forms.MouseButtons.Right Then

你的窗体.Show()

End If

End Sub

vb.net如何弹出窗口的介绍就聊到这里吧，感谢你花时间阅读本站内容，更多关于vbnet doevent、vb.net如何弹出窗口的信息别忘了在本站进行查找喔。