怎么在vs08中用vb编写一个记事本呢？ - VB / 基础类
用vb写一个和windows的记事本差不多功能的就ok了
Private Sub 保存ToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles 保存ToolStripMenuItem.Click
'OpenFileDialog1.Filter = "文本文档(*.txt)|*.txt|RTF文档(*.rtf)|*.rtf|所有文件(*.*)|*.*"
' OpenFileDialog1.
AxCommonDialog1.Filter = "文本文档(*.txt)|*.txt|RTF文档(*.rtf)|*.rtf|所有文件(*.*)|*.*"
AxCommonDialog1.ShowSave()
FileType = AxCommonDialog1.FileTitle '格式
' FiType = LCase(Right(FileType, 3)) '这里怎么写?
filename = AxCommonDialog1.FileName
Select Case FiType
Case "txt"
RichTextBox1.SaveFile(filename, RichTextBoxStreamType.TextTextOleObjs)
'用空格代替 OLE 对象的丰富文本格式（RTF 格式）流。该值只在用于 RichTextBox 控件的 SaveFile 方法时有效。
Case "rft"
RichTextBox1.SaveFile(filename, RichTextBoxStreamType.RichNoOleObjs)
'具有 OLE 对象的文本表示形式的纯文本流。该值只在用于 RichTextBox 控件的 SaveFile 方法时有效。
Case "*.*"
RichTextBox1.SaveFile(filename)
End Select
Me.Text = "记事本" + filename
相关问答：
为什么我用form.show和form.hide多次连接了两个窗口只能互换链接两次啊？
代码看看
照道理form.show 没次数限定的吧
我也快疯了。
楼主知道怎么发贴么？
引用
我也快疯了。
楼主知道怎么发贴么？
楼主也 ......
现在我想根据treeview上每个节点的权限，没有权限的节点不能被选中，而且成灰色，怎么实现，在线等。。。
这个？。。。
貌似没法。
试试能不能改某些node的颜色，记录下上次的nodeclick里的node。
下次点击的如� ......
现在有个xml文件是<?xml version="1.0"?>
<?mso-application progid="Excel.Sheet"?>
<Workbook xmlns="urn:schemas-microsoft-com:office:spreadsheet"
xm ......
dim a as string,b as string，c as string
a="工程编号,单位工程名称,分部工程编号"
b="单位工程名称"
c="单位"
怎么才能判断出a字符串中存在b字符串，而不存在c字符串
看看i ......
