vbs创造窗体

『壹』 怎么创造一个普通的vbs弹窗

普通弹窗：
创建文本文档
写入下面代码↓
msgbox"你想说的内容"
退出
重命名“新建文本文档.txt”为“新建文本文档.vbs”

『贰』 vbs中怎么建立一个窗口，能在窗口中设置各种控件，比如文本框、下拉框什么的，以便控制后面有运行参数谢

调用IE，写HTML，就行了。前提是你得会网页编程。
http://tieba..com/f?ct=335675392&tn=PostBrowser&sc=11006421990&z=979110951&pn=0&rn=30&lm=0&rs16=0&word=vbs#11006421990

『叁』 VBS调用窗口

你好，很高兴为你解答。
用cmd打开记事本程序

Set ws = CreateObject("WScr虎紶港咳蕃纠歌穴攻膜ipt.Shell")
ws.Run "cmd.exe /c notepad.exe"
如有其他问题，可以继续追问

『肆』 在vbs中 如何弹出新窗口

是这样吗？

Dim objws
Set objws=WScript.CreateObject("wscript.shell")
do
result=MsgBox("[是]弹出窗口A" & vbCr & "[否]弹出窗口B",3,"弹出窗口")
If result=6 Then
objws.Run "c:\"
ElseIf result=7 Then
objws.Run "d:\"
Else
Exit Do
End If
loop

你能说的详细一点吗？

要弹出什么对话框？

『伍』 怎么做vbs询问窗口

ifmsgbox("确定要关机吗？",vbyesno,"提示")=vbyesthen
'你要执行的命令
else
'选择否执行的代码
endif

vbs询问窗口

代码如上 其他部分自行添加

『陆』 vbs操作windows窗口的问题

set ws=createobject("wscript.shell")
wscript.sleep 1000
'appactivate 激活--即使某窗口获得焦点
'" "引号内为窗口的标题
'1。使文本获得焦点
'ws.AppActivate "新建 文本文档.txt - 记事本"
'Alt+tab 可以切换窗口
'ws.sendkeys ("%{tab}")
'2。使任务管理器获得焦点
'ws.AppActivate "Windows 任务管理器"
'ws.sendkeys ("%{tab}")
'3。使文件夹aa获得焦点
ws.AppActivate "文件夹aa"
'ws.sendkeys ("%{tab}")
使用时需要将对应的前面'注释符去掉

『柒』 VBS如何将窗口输入的文字并创建新的txt写进去

还是用batch吧，代码输进去，把后缀搞成bat
就行。用vbs很复杂。需要调动很多文件。
@echo off
color 2f
mode con cols=25 lines=13
title 请输入文字
:122
set/p u=请输入你要发送的文字
echo %u% >>文档.txt
goto 122

『捌』 如何用VBS将窗口一直设为活动窗口

Run
WshShell 对象
在新过程中运行程序。

object.Run(strCommand, [intWindowStyle], [bWaitOnReturn])
参数
object
WshShell 对象。
strCommand
表示要运行的命令行的字符串值。必须包括要传递到可执行文件的所有参数。
intWindowStyle
可选。表示程序窗口外观的整数值。请注意，并非所有程序都使用此信息。
bWaitOnReturn
可选。布尔值，表示在继续执行脚本中的下一条语句之前，脚本是否等待执行完程序。如果设为 true，则在执行完程序后才执行脚本，Run 方法返回由程序返回的任何错误代码。如果设为 false（默认值），则 Run 方法将自动在启动程序后立即返回 0（不是错误代码）。
说明
Run 方法返回一个整数。Run 方法启动在新 Windows 进程中运行的程序。可以让脚本等到程序执行完后再继续执行。这允许您同步运行脚本和程序。strCommand 参数内的环境变量自动扩展。如果某个文件类型已正确注册到某个程序中，则对该类型的文件调用 Run 方法时将执行该程序。例如，如果您的计算机系统中装有 Word，则对 *.doc 文件调用 Run 方法时将启动 Word 并加载该文档。下表列出了 intWindowStyle 的可用设置。

intWindowStyle 说明
0 隐藏一个窗口并激活另一个窗口。
1 激活并显示窗口。如果窗口处于最小化或最大化状态，则系统将其还原到原始大小和位置。第一次显示该窗口时，应用程序应指定此标志。
2 激活窗口并将其显示为最小化窗口。
3 激活窗口并将其显示为最大化窗口。
4 按最近的窗口大小和位置显示窗口。活动窗口保持活动状态。
5 激活窗口并按当前的大小和位置显示它。
6 最小化指定的窗口，并按照 Z 顺序激活下一个顶部窗口。
7 将窗口显示为最小化窗口。活动窗口保持活动状态。
8 将窗口显示为当前状态。活动窗口保持活动状态。
9 激活并显示窗口。如果窗口处于最小化或最大化状态，则系统将其还原到原始大小和位置。还原最小化窗口时，应用程序应指定此标志。
10 根据启动应用程序的程序状态来设置显示状态。

示例 1
下面的 VBScript 代码用记事本打开当前运行脚本的副本。

Set WshShell = WScript.CreateObject("WScript.Shell")
WshShell.Run "%windir%\notepad " & WScript.ScriptFullName
下面的 VBScript 代码与上述代码完成的操作相同，不同之处在于，它指定窗口类型，等待用户关闭记事本，关闭记事本时保存从记事本返回的错误代码。

Set WshShell = WScript.CreateObject("WScript.Shell")
Return = WshShell.Run("notepad " & WScript.ScriptFullName, 1, true)
示例 2
下面的 VBScript 代码打开一个命令窗口，将路径改为 C:\，并执行 DIR 命令。

Dim oShell
Set oShell = WScript.CreateObject ("WSCript.shell")
oShell.run "cmd /K CD C:\ & Dir"
Set oShell = Nothing

『玖』 VBS如何定义窗口标题，并在窗口中显示 “百度知道”，谢谢 !

我的方法是当窗口在任务栏激活时，发送 enter 按键
就是在你的代码后边加上 ws.sendkeys "{enter}"

『拾』 能用VBS 建立一个窗口，实现拖入程序自动建立快捷方式，拖出快捷方式自动删除快捷方式。代码怎么写呢

不能建立窗口
不过可以用 WScript.Arguments 直接拖到vbs文件图标上实现，很简单
建立快捷方式以下是实例

set WshShell = WScript.CreateObject("WScript.Shell") '设置CreateObject 方法
s = WshShell.SpecialFolders("Desktop") '取得“桌面”的路径
set oShellLink = WshShell.CreateShortcut(s & "\腾讯QQ.lnk") '设置快捷方式将要保存到的路径和快捷方式名,你也可以指定一个真实存在的路径，这个范例是创建到桌面
oShellLink.TargetPath = "d:\qq\QQ.vbs" '快捷方式里的“目标”
oShellLink.WorkingDirectory = "d:\qq" '快捷方式里的“起始位置”
oShellLink.Save '建立快捷方式

删除文件 要用到filesystemobject 对象
具体可以看一下《microsoft 脚本技术》讲的很详细

代码就自己码去吧，呵呵