VBScript为颜色输入文本字段-Java 学习之路

我有以下代码 .

我有一个输入文本字段，其示例值为灰色 . 单击该字段时，文本将被删除，颜色将设置为黑色 . 然后，在完成一些VBScript之后，字段被清除，示例返回到输入字段中，但是此时我无法将其着色为灰色 .

一切正常，除了UserName.style =“color：#ccc;”在VBScript中 .

我在这里错过了什么吗？ VB错误说“未实现”

任何解决方案高度赞赏谢谢 .

VBScript中：

UserName.value = "Example: JSmith"
UserName.style = "color: #ccc;"
</SCRIPT>

HTML：

<input type="text" name="UserName" value="Example: JSmith" style="color: #ccc;"  onfocus="myFunction(UserName)"><p>

JavaScript的：

function myFunction(x)
{
x.style.color="black";
x.value="";
}

2 回答

VBScript / .HTA演示：

<html>
 <head>
  <Title>colortext</Title>
  <hta:application id="colortext" scroll = "no">
  <script type="text/vbscript">
   Function CBT()
     ' change backgound color of txtDemo
     Dim txtDemo : Set txtDemo = document.getElementById("txtDemo")
     Select Case txtDemo.style.backgroundColor
       Case "black"
         txtDemo.style.backgroundColor = "yellow"
       Case "yellow"
         txtDemo.style.backgroundColor = "red"
       Case Else
         txtDemo.style.backgroundColor = "black"
     End Select
   End Function
  </script>
 </head>
 <body>
  <input type="text" id="txtDemo" value="Initial Value" />
  <hr />
  <input type="button" value="CBT" onclick="CBT" />
 </body>
</html>

重要的是获取HTML元素 document.getElementById("txtDemo") 及其 .style.backgroundColor 属性 .

回复于 2024-05-02T06:28:56+08:00

VBScript中：

Call initialColor()
UserName.value = "Example: JSmith"

HTML：

<input type="text" name="UserName" value="Example: JSmith" style="color: #ccc;"  onfocus="myFunction(UserName)"><p>

JavaScript的：

function changeColor(x)
{
x.style.color="black";
x.value="";
}
function initialColor()
{
UserName.style.color="ccc";
Manager.style.color="ccc";
Ticket.style.color="ccc";
}

回复于 2024-05-02T06:28:56+08:00

VBScript为颜色输入文本字段

2 回答

相关问题