加拿大哪里西洋参出名:一道关于VB的习题

来源:百度文库 编辑:查人人中国名人网 时间:2024/04/28 04:01:20
在窗体上画一个TEXTBOX,输入内容,点击保存按钮可以弹出保存对话框,并把文本框中的内容保存到一个文本文件中

一个textbox、一个commonbutton和一个commondialog

Private Sub Command1_Click()
CommonDialog1.Filter = "文本文档(.txt)|.txt"
CommonDialog1.ShowSave
Open CommonDialog1.FileName For Output As #1
Print #1, Text1.Text
Close #1
End Sub

用CommonDialog来做保存对话框
先添加部件:部件-》Microsoft Common Dialog Control 版本号

Private Sub Command1_Click()
CommonDialog1.DialogTitle = "保存数据"
CommonDialog1.Filter = "*.txt"
CommonDialog1.ShowSave

FileNumber = FreeFile
Open CommonDialog1.FileName & ".txt" For Append As #FileNumber
Print #FileNumber, Text1.Text
Close #FileNumber
End Sub

VB中调试可行~

这个不简单得要死了
看书好好看书

VB,VB.NET交流
欢迎假如24885035群,请说明意图
代码成就天地人生,程序造就你我辉煌
让我们在程序的路上一起走得更远!

连悬赏分都没有。。。

怎么感觉像是二级的题目??