Vbscript 如何使VBS消息框显示在随机位置？

在VBS脚本中，我创建了一个简单的消息框应用程序。在用户做出响应并使用非常简单的编码之前，它目前一直在所有窗口前面

    X=MsgBox("Test Text" ,1+4069, "Test Title")

---

但它总是出现在同一个地方。有没有办法让它出现在屏幕上的任意位置？请帮忙

有一种框允许您在屏幕上定位它：

Title = "Hello"
DefaultValueText = "Hello Stackoverflow !"
message = "Type something here"
XPos = 0
YPos = 0
Text = InputBox(message,Title,DefaultValueText,XPos,YPos)
XPos = 3000
YPos = 800
Text = InputBox(message,Title,DefaultValueText,XPos,YPos)

---

有一种类型的框允许您在屏幕上定位它：

Title = "Hello"
DefaultValueText = "Hello Stackoverflow !"
message = "Type something here"
XPos = 0
YPos = 0
Text = InputBox(message,Title,DefaultValueText,XPos,YPos)
XPos = 3000
YPos = 800
Text = InputBox(message,Title,DefaultValueText,XPos,YPos)

@哈库就快到了， 我用了他的，这是我用它做的

dim r
randomize
r = int(rnd*500) + 1
r2 = int(rnd*1500) + 1
Title = "Hello"
DefaultValueText = "Hello!"
message = "Type something here!"
XPos = r
YPos = r2
Text = InputBox(message,Title,DefaultValueText,XPos,YPos)

@哈库就快到了， 我用了他的，这是我用它做的

dim r
randomize
r = int(rnd*500) + 1
r2 = int(rnd*1500) + 1
Title = "Hello"
DefaultValueText = "Hello!"
message = "Type something here!"
XPos = r
YPos = r2
Text = InputBox(message,Title,DefaultValueText,XPos,YPos)

---

4096是国旗而不是4069。可能是重复的感谢。也许可以解释为什么它们中的一些不起作用，但这并不完全是重复的。那是一个固定的位置。我希望它是一个随机位置。另外，这是使用输入框。我正在尝试使用MessageBox4096的标志不是4069。可能是重复的感谢。也许可以解释为什么它们中的一些不起作用，但这并不完全是重复的。那是一个固定的位置。我希望它是一个随机位置。另外，这是使用输入框。我正在尝试使用MessageBoxSo，我应该把*放在随机位置吗？那么，我应该把*放在随机位置吗？哦，你不会看到太多的区别，如果你发垃圾邮件，你会看到一些短的东西。哦，你也不会看到太多的区别，如果你发垃圾邮件，你会看到一些短的东西。