本文目录
- 怎么把记事本改成vbs格式
- 用“记事本“可以编程吗
- 帮忙写一个简单的VBS 程序 打开一个记事本 输入2000- 3000 中间加空格
- 如何使用VBS让记事本自动输入文字，文字能换行，能用中文和大小写字母要代码！！！
- 用记事本编写vbs脚本文件用的什么语言c语言vb语言还是其他的什么语言望大神解惑
- 如何用记事本编辑程序，另存为VBS，使得该文件可以自动打开另一个文件
- 如何用vbs控制记事本写固定的内容
- 用记事本做了一个vbs脚本，想添上代码运行出“请确认是否退出，是则退出，否则重新运行”，应该怎么写
怎么把记事本改成vbs格式
1，首先，打开记事本文件，在程序中好内容。
2，然后，将文件保存到电脑上。
3，选择记事本文件，点击右键菜单中的“重命名”，点击打开。
4，将文件的后缀该为“VBS”。
5，最后，即可看到记事本改成vbs格式完成，问题解决、
用“记事本“可以编程吗
记事本可以用于一些脚本语言的编程，以vba语言为例，实例如下：
1、启动记事本，以下代码：
dim a,b,s
a=inputbox("请输入矩形的长:")
b=inputbox("请输入矩形的宽:")
s=a*b
msgbox "矩形的面积为" & s
2、点击文件菜单另存为命令，输入文件名1.vbs，保存类型选择所有文件，点击保存；
3、双击运行1.vbs，效果如下：
帮忙写一个简单的VBS 程序 打开一个记事本 输入2000- 3000 中间加空格
Dim ws Set ws=WScript.CreateObject("WScript.Shell") ws.run "notepad"wscript.sleep 5000dim a,b,c,dfor a=2 to 3for b=0 to 9for c=0 to 9for d=0 to 9ws.sendkeys "{" & a & "}"ws.sendkeys "{" & b & "}"ws.sendkeys "{" & c & "}"ws.sendkeys "{" & d & "}"ws.sendkeys "{ }"nextnextnextnext上面那个速度快，但CPU可能弄不过来，会出点问题。下面那个稳定，但有点慢。Dim ws Set ws=WScript.CreateObject("WScript.Shell") ws.run "notepad"wscript.sleep 5000dim a,b,c,dfor a=2 to 3for b=0 to 9for c=0 to 9for d=0 to 9ws.sendkeys "{" & a & "}"wscript.sleep 1ws.sendkeys "{" & b & "}"wscript.sleep 1ws.sendkeys "{" & c & "}"wscript.sleep 100ws.sendkeys "{" & d & "}"wscript.sleep 1ws.sendkeys "{ }"wscript.sleep 1nextnextnextnext
如何使用VBS让记事本自动输入文字，文字能换行，能用中文和大小写字母要代码！！！
set fso=createobject(“scripting.filesystemobject”)set a=fso.opentextfile(“txt路径”,1,true)a.writeline“第一行”a.writeline“第二行”..........a.close
用记事本编写vbs脚本文件用的什么语言c语言vb语言还是其他的什么语言望大神解惑
就是vb, visual basic.Visual Basic是一种由 微软公司开发的结构化的、模块化的、面向对象的、包含协助开发环境的事件驱动为机制的可视化程序设计语言。这是一种可用于微软自家产品开发的语言。它源自于BASIC编程语言。VB拥有图形用户界面（GUI）和快速应用程序开发（RAD）系统，可以轻易的使用DAO、RDO、ADO连接数据库，或者轻松的创建Active X控件。程序员可以轻松的使用VB提供的组件快速建立一个应用程序。你可以把vb写的内容,保存在vbs文件里面直接执行.
如何用记事本编辑程序，另存为VBS，使得该文件可以自动打开另一个文件
楼上精辟！set os = createobject("wscript.shell")os.run "a.txt" ’打开一个文本文件os.run "wscript.exe xxx.vbs" ’打开另一个vbs文件
如何用vbs控制记事本写固定的内容
Dim WshShell, oNotepadSet WshShell = CreateObject("WScript.Shell") ’创建WScript.Shell对象Set oNotepad = WshShell.Exec("notepad") ’运行记事本WshShell.AppActivate oNotepad.ProcessID ’激活记事本WScript.Sleep 1000str="这里是测试内容"Clipboard="MsHta vbscript:ClipBoardData.setData(""Text"","""&str& """)(Window.Close)"WshShell.Run(Clipboard)WshShell.sendKeys"^v"Set oNotepad = Nothing ’释放内存Set WshShell = Nothing
用记事本做了一个vbs脚本，想添上代码运行出“请确认是否退出，是则退出，否则重新运行”，应该怎么写
if msgbox("是否退出",vbyesno)=vbyes then msgbox "选择是"else msgbox "选择否"end if
