一个小程序,请帮助 做一个菜单设计,用编辑器,请问: 保存,另存为,以及: 查找,的代码怎么写! 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 用一个CommonDialog控件,用CommonDialog1.ShowOpen;CommonDialog1.ShowSave来实现保存,打开。查找的话....我没那么多时间给你具体写,网上找下代码 这要看你用什么控件了。用TextBox相对麻烦。用RichTextBox就简单多了。以下就用RichTextBox的保存代码,另存为也一样 With CommonDialog1 .DialogTitle = "保存" '.DialogTitle = "另存为" .Filter = "文本文件(*.txt)|*.TXT|Rich Text 格式文件(*.rtf)|*.RTF|SQL文件(*.sql)|*.SQL|所有文件(*.*)|*.*" .Flags = cdlOFNOverwritePrompt .DefaultExt = ".txt" .ShowSave RichTextBox1.SaveFile .FileName End With 找到了窗口句柄H,为什么用CloseWindow H或DestroyWindow H都不能杀掉这个进程。如何强制杀掉这个进程和窗口? 急~~~~~~如何从varchar类型转换成money 我的EXCEL越来越大,怎办? VB 和excel的问题 新手用什么教学光盘最好? 定义常变量的有效使用范围问题 请教各位大仙一个关于MDIForm子窗体显示的问题,急!急!急! SOS关于报表的运行时更改 好心人帮我看看这段代码啊,万分感谢! 如何提取VB5运行库? 怎么隐藏窗体的标题栏?在线等待! 关于窗体的提问
用TextBox相对麻烦。
用RichTextBox就简单多了。
以下就用RichTextBox的保存代码,另存为也一样
With CommonDialog1
.DialogTitle = "保存" '.DialogTitle = "另存为"
.Filter = "文本文件(*.txt)|*.TXT|Rich Text 格式文件(*.rtf)|*.RTF|SQL文件(*.sql)|*.SQL|所有文件(*.*)|*.*"
.Flags = cdlOFNOverwritePrompt
.DefaultExt = ".txt"
.ShowSave
RichTextBox1.SaveFile .FileName
End With