这是一个简单的VBScript代码，可以用来表白：

```vbscript

@echo off

echo 正在表白... 请稍等片刻。

echo 亲爱的（你的爱人名字）, 我喜欢你。你是我见过的最特别的人。我希望能与你共度一生。你是我的唯一。我爱你！

echo 你的爱人名字爱你。这个表白是你特别制作的。请选择接受我的爱！ (y/n)

pause > nul

choice /C yn /NM /T 4

if errorlevel == 2 then

echo 你选择了不接受，但我依然会喜欢你。再见。

else

echo 你选择了接受，我也很高兴！让我们从此开始一段美好的旅程吧！我爱你，直到永远！我发誓只爱你一个人！直到世界的尽头！ 谢谢你接受我的爱！再见。 （这只是一个简单脚本的提醒：你可能想要对这段话进行一些定制或更改。） 请按任意键退出程序...

pause > nul

end if

```

注意：你需要替换代码中的"（你的爱人名字）"为你想要表白的人的名字。此外，这只是一个简单的脚本，可能需要根据你的具体需求进行修改或定制。最重要的是，你需要确保你的表白对象能够接受你的感情表达，并且你能够恰当地处理对方的反应。在使用任何形式的表白之前，都要确保这是一个安全和适当的环境。

vbs表白代码

以下是一个简单的VBScript表白代码示例：

```vbscript

@echo off

echo 正在表白... 请稍等片刻。

echo 我爱你，因为你让我心跳加速，让我无法控制自己的情感。你是我的梦想，我的愿望，我的一切。我愿意和你一起度过每一个美好的时刻，分享生活的喜怒哀乐。你是我的唯一，我会永远爱你！

echo.

echo 表白成功！祝贺你们！

pause >nul

```

这个脚本会在运行后立即显示一段表白的话语，然后暂停等待用户按下任意键退出。你可以将这段代码保存为 `.vbs` 文件并运行它来向你喜欢的人表白。当然，你也可以根据自己的需求修改这段表白的话语。