我用vb.net 做了一个记事本，菜单里的“打开”可以正常工作。就是可以调用OpenFileDialog选择一个txt文件后加载到richtextbox1里。但是当我把我做好的程序设置为默认打开txt文件的程序时，打开TXT后不能加载文档数据到richtextbox1里。听说是O
我用vb.net 做了一个记事本，菜单里的“打开”可以正常工作。就是可以调用OpenFileDialog选择一个txt文件后加载到richtextbox1里。但是当我把我做好的程序设置为默认打开txt文件的程序时，打开TXT后不能加载文档数据到richtextbox1里。听说是O 20
补充：&Private Sub FileOpen()&&&&&&& Call NotSaveProcess() '调用过程 NotSaveProcess 实现没有保存的处理&&&&&&& '设置过滤器属性&&&&&&& OpenFileDialog1.Filter = "文本文件(*.txt)|*.txt|RTF 格式文件(*.RTF)|*.RTF"&&&&&&& OpenFileDialog1.FilterIndex = 1 '设置当前文件过过滤器&&&&&&& OpenFileDialog1.Title = "打开文件" '设置对话框的标题&&&&&&& OpenFileDialog1.InitialDirectory = Application.StartupPath '初始目录设为启动路径&&&&&&& OpenFileDialog1.RestoreDirectory = True '自动恢复初始目录&&&&&&& OpenFileDialog1.ShowDialog() '弹出打开文件对话框&&&&&&& Fname = OpenFileDialog1.FileName '获取打开的文件名&&&&&&& If (Fname && "") Then '如果选择了文件&&&&&&&&&&& If (OpenFileDialog1.FilterIndex = 1) Then '如果是文本文件&&&&&&&&&&&&&&& RichTextBox1.LoadFile(Fname, RichTextBoxStreamType.PlainText) '文本文件&&&&&&&&&&&&&&& FExtName = "txt"&&&&&&&&&&& Else&&&&&&&&&&&&&&& RichTextBox1.LoadFile(Fname, RichTextBoxStreamType.RichText) 'RTF 文件&&&&&&&&&&&&&&& FExtName = "rtf"&&&&&&&&&&& End If&&&&&&& End If&&&&&&& Me.Text = Fname + "-简单文件编辑器" '设置标题&&&&&&& RichTextBox1.Modified = False '文件刚打开时,把 RichtextBox1.Modified 属性值设为 False&&&&&&& 'lblSave.Text = "已保存 "&&& End Sub
不区分大小写匿名
相关知识等待您来回答
电脑常识领域专家记事本的设计_百度文库
两大类热门资源免费畅读
续费一年阅读会员，立省24元！
文档贡献者
评价文档：
记事本的设计
把文档贴到Blog、BBS或个人站等：
普通尺寸(450*500pix)
较大尺寸(630*500pix)
大小：2.72MB
登录百度文库，专享文档复制特权，财富值每天免费拿！
你可能喜欢}