有2种方法,一种是调用fso的流操作,另一种比较简单
dim filename as string
filename="d:\test.text"
open filename for output as #1
print #1,"这里写入文件内容"
close #1
dim filename as string
filename="d:\test.text"
open filename for output as #1
print #1,"这里写入文件内容"
close #1
温馨提示：答案为网友推荐，仅供参考
如果想在D盘里新建一个记事本,在VB的代码窗口里应如何写代码
close 1
VB制作记事本的完整代码代码
在VB中制作记事本的过程中，涉及到多个功能的实现，比如复制、粘贴、保存、新建文件等。这些功能通过一系列事件驱动的方式实现，确保用户操作的流畅性和便捷性。例如，当点击“剪切”按钮时，代码会清除剪贴板内容，然后将文本框中选中的文本复制到剪贴板，并清空文本框内容。相应的代码如下：Private Sub ji...
VB记事本代码
在Visual Basic中，若要在窗体中使用CommonDialog控件，首先需要确保CommonDialog控件已正确添加到项目中。具体操作步骤如下：首先按下Ctrl+T快捷键，这将打开“添加窗体控件”对话框。在对话框中，找到并选择“Microsoft Common Dialog控件”，然后点击“确定”。随后，转到工具箱窗口，找到已添加的CommonDialo...
如何用vb6.0编写记事本
RichTextBox1.Find sFind, , Len(RichTextBox1) End Sub '使用说明 Private Sub mnuReadme_Click() On Error GoTo handler RichTextBox1.LoadFile "Readme.txt", rtfText '请写好Readme.txt文件并存入程序所在文件夹中 Me.Caption = "超级记事本:" & "使用说明" Exit Sub handler: MsgBox "使用说明...
vb中如何用shell函数打开记事本,并在相对路径上新建一个记事本
open app.path & "\\new text file.txt" for output as #1'新建一个记事本文件 print "测试。。。",#1 close #1 call shell ("notepad.exe " & app.path & "\\new text file.txt" )'运行记事本并打开上面创建的那个记事本文件 就这样 ...
用vb做记事本,点击新建、打开和退出菜单时都要先判断文本是否改变,询问...
2. 保存前判断记事本里面的内容与initText是否相同，如果不同，则表示改变过，如果相同，表示没有改变过 3. 重新打开一个文件或每次保存之后，更新initText的值为新的内容 4. Text1_Change()可以删掉了 补充一下实现细节：1. 定义全局变量：private initText as string 在form_load()中赋值：init...
如何在VB中打开一个记事本窗口并获取窗口句柄,向其中发送富文本框中的...
1.新建三个命令按钮Command1命名“写字”，Command1命名“禁用”，Command1命名“关闭”；2.在窗体写下如下代码：Private Declare Function FindWindow Lib "user32" Alias "FindWindowA" (ByVal lpClassName As String, ByVal lpWindowName As String) As Long Private Declare Function FindWindowEx Lib...
VB怎么打开记事本输入文字
String Dim num As Integer Open "d:\\Myfile.txt" For Output As #1 str = “STUDY"num = 12345 Print #1, "Print输出:"Print #1, str, num Print #1, "***"Print #1, "Write输出:"Write #1, str, num Close #1 End Sub 记事本的效果如图：希望能帮到你！
我用VB写了个记事本的程序,这句代码 Open CommonDialog1.FileName...
Open CommonDialog1.FileName For Output As #1 以输出模式，打开通用对话框中选择的文件，文件号是1 Print #1,Text1 将文本框Text1中的文本，写入到文件号为1的文件中。
如何用VB代码运行CMD里面或者记事本的程序
Open App.Path & "\\1.bat"For Output as 1 Print 1,"你的DOS命令"Print 1,"你的DOS命令2"Print 1,"你的DOS命令3"Print 1,"你的DOS命令4"Print 1,"你的DOS命令5"Print 1,"你的DOS命令6"Print 1,"你的DOS命令7"Close 1 Shell App.Path & "\\1.bat"'即可运行了，如果需要VB接受...
close 1
VB制作记事本的完整代码代码
在VB中制作记事本的过程中，涉及到多个功能的实现，比如复制、粘贴、保存、新建文件等。这些功能通过一系列事件驱动的方式实现，确保用户操作的流畅性和便捷性。例如，当点击“剪切”按钮时，代码会清除剪贴板内容，然后将文本框中选中的文本复制到剪贴板，并清空文本框内容。相应的代码如下：Private Sub ji...
VB记事本代码
在Visual Basic中，若要在窗体中使用CommonDialog控件，首先需要确保CommonDialog控件已正确添加到项目中。具体操作步骤如下：首先按下Ctrl+T快捷键，这将打开“添加窗体控件”对话框。在对话框中，找到并选择“Microsoft Common Dialog控件”，然后点击“确定”。随后，转到工具箱窗口，找到已添加的CommonDialo...
如何用vb6.0编写记事本
RichTextBox1.Find sFind, , Len(RichTextBox1) End Sub '使用说明 Private Sub mnuReadme_Click() On Error GoTo handler RichTextBox1.LoadFile "Readme.txt", rtfText '请写好Readme.txt文件并存入程序所在文件夹中 Me.Caption = "超级记事本:" & "使用说明" Exit Sub handler: MsgBox "使用说明...
vb中如何用shell函数打开记事本,并在相对路径上新建一个记事本
open app.path & "\\new text file.txt" for output as #1'新建一个记事本文件 print "测试。。。",#1 close #1 call shell ("notepad.exe " & app.path & "\\new text file.txt" )'运行记事本并打开上面创建的那个记事本文件 就这样 ...
用vb做记事本,点击新建、打开和退出菜单时都要先判断文本是否改变,询问...
2. 保存前判断记事本里面的内容与initText是否相同，如果不同，则表示改变过，如果相同，表示没有改变过 3. 重新打开一个文件或每次保存之后，更新initText的值为新的内容 4. Text1_Change()可以删掉了 补充一下实现细节：1. 定义全局变量：private initText as string 在form_load()中赋值：init...
如何在VB中打开一个记事本窗口并获取窗口句柄,向其中发送富文本框中的...
1.新建三个命令按钮Command1命名“写字”，Command1命名“禁用”，Command1命名“关闭”；2.在窗体写下如下代码：Private Declare Function FindWindow Lib "user32" Alias "FindWindowA" (ByVal lpClassName As String, ByVal lpWindowName As String) As Long Private Declare Function FindWindowEx Lib...
VB怎么打开记事本输入文字
String Dim num As Integer Open "d:\\Myfile.txt" For Output As #1 str = “STUDY"num = 12345 Print #1, "Print输出:"Print #1, str, num Print #1, "***"Print #1, "Write输出:"Write #1, str, num Close #1 End Sub 记事本的效果如图：希望能帮到你！
我用VB写了个记事本的程序,这句代码 Open CommonDialog1.FileName...
Open CommonDialog1.FileName For Output As #1 以输出模式，打开通用对话框中选择的文件，文件号是1 Print #1,Text1 将文本框Text1中的文本，写入到文件号为1的文件中。
如何用VB代码运行CMD里面或者记事本的程序
Open App.Path & "\\1.bat"For Output as 1 Print 1,"你的DOS命令"Print 1,"你的DOS命令2"Print 1,"你的DOS命令3"Print 1,"你的DOS命令4"Print 1,"你的DOS命令5"Print 1,"你的DOS命令6"Print 1,"你的DOS命令7"Close 1 Shell App.Path & "\\1.bat"'即可运行了，如果需要VB接受...
相似回答
