成都创新互联网站制作重庆分公司

vb.net另存对话框 vbnet format

vb里面的对话框控件,打开“另存为”对话框后,单击取消选择不保存后还是会在目录保存文件

这个COM的对话框控件取消就是这样的机制,要判断用户点的是“取消”,就要设置控件的CancelError属性为True才可以接收到用户是否点了取消(这样真是增加了程序员的代码工作量),对了你的程序修改成这样就可以了:

创新互联致力于互联网网站建设与网站营销,提供做网站、成都网站制作、网站开发、seo优化、网站排名、互联网营销、微信小程序开发、公众号商城、等建站开发,创新互联网站建设策划专家,为不同类型的客户提供良好的互联网应用定制解决方案,帮助客户在新的全球化互联网环境中保持优势。

On Error Resume Next

Dialog.Flags = H4

Dialog.DefaultExt = ".txt"

Dialog.FilterIndex = 1

Dialog.CancelError = False

Dialog.ShowSave

If Err.Number = 0 Then

Open Dialog.FileName For Output As #1

Print #1, Text_List.Text

Close #1

End If 答案补充 有上的有误,下面的正确:

On Error Resume Next

Dialog.Flags = H4

Dialog.DefaultExt = ".txt"

Dialog.FilterIndex = 1

Dialog.CancelError = True

Dialog.ShowSave

If Err.Number = 0 Then

Open Dialog.FileName For Output As #1

Print #1, Text_List.Text

Close #1

End If

vb.net保存两个文本框

1、首先,点击保存按钮后应检查文本框内容。

2其次,如果在文本框4中输入的值以400开头则保存反之更改为400。

3、最后,再次检查文本框5如果文本框5中的值为29或31则保存反之则更改即可。

vb.net 保存excel弹出一个重命名对话框,另存为到其他盘

添加一个SaveFileDialog,在保存excle选择时候添加

SaveFileDialog1.show()

用法跟OpenFileDialog相同

vb.net如何让父窗体工具栏的保存对话框在所有子窗体通用

'代码中Button控件自行在窗体中添加并改名

***********************************父窗体代码:

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

***********************************

方法满多的,起码三四种,比如用一个全局变量保存当前提交窗体名,执行操作的代码读取这个全局变量就行。最方便的应该是做过程

Public Sub DateBaseAdd(ByVal From As Form)

,然后父窗体跟子窗体都能调用这个全局过程,同时传入窗体名称


文章标题:vb.net另存对话框 vbnet format
当前地址:http://cxhlcq.com/article/dosgpcs.html

其他资讯

在线咨询

微信咨询

电话咨询

028-86922220(工作日)

18980820575(7×24)

提交需求

返回顶部