将跨度的主体设置为等于变量

Question

我正在使用 HTA 进行一些测试，但遇到了一个问题。这是我使用的代码：

<script language="VBScript">
Public Game

Sub window_onload()
    Game="Help"
    sGame.body.InnerHTML=Game
    sName.body.InnerHTML=Game
End Sub

Sub strTest
    Game="Test"
End Sub
</script>

<body bgcolor="#42732D">

<div style="position:relative;
    text-align:center;
    top:45px;">

<span id = "sName" style="text-align:center;
    font-family:Small Fonts;
    font size:65px;
    z-index:1;
    color:#1C2433"
>

Yes

</span>

<span id = "sGame"
style="text-align:center;
position:absolute;
left:-4px;
font-family:Small Fonts;
font size:65px;
z-index:15;
color:#1094AF"
>
</span>
</div>

<input type="button" style="font-family:Small Fonts; font size:30px; color: white; background-color:grey" value="Testing" name="bTest" onclick="strTest">
</body>

我想要做的是将两个跨度设置为等于同一个变量（一种使用不同颜色为文本提供 3D 外观的技巧）但是，当我运行 strTest，这应该将跨度从 "Yes" 更改为变量 Game 等于什么，没有任何反应。如何使用变量动态更改跨度的文本？

Answer 1

<span> 没有 body 属性。只需使用 innerHTML.

变化：

Sub window_onload()
    Game="Help"
    sGame.body.InnerHTML=Game
    sName.body.InnerHTML=Game
End Sub

收件人：

Sub window_onload()
    Game="Help"
    sGame.innerHTML = Game
    sName.innerHTML = Game
End Sub

这是 HTMLSpanElement on Mozilla's site. As you can see, it doesn't define any properties. If you work your way up the hierarchy to Element, you'll see the innerHTML 属性的文档。

将跨度的主体设置为等于变量

Set body of a span equal to a variable

css

vbscript

hta