真是莫名其秒,快来帮忙,我在线等待 (100分)

  • 主题发起人 主题发起人 我要上
  • 开始时间 开始时间

我要上

Unregistered / Unconfirmed
GUEST, unregistred user!
<Script language="VBScript">
<!--
Sub lstChange()
msgbox "1111",0,"精确查询"
end Sub
//-->
运行时,总提示:第二行是无效的字符。
请问:为什么 ??
我在线等待
 
to 不爽
在哪儿加" ,能具体点吗???
 
MsgBox ("Hello World!", 65, "MsgBox Example")
msgbox("1111",0,"精确查询")
http://msdn.microsoft.com/library/default.asp?url=/library/en-us/script56/html/vsfctmsgbox.asp
 
to windwy
按您的意思做了,还是不行,怎么办???
 
<html>
<head>
<Script language="VBScript">
Sub lstChr()
MsgBox "1111",0,"精确查询"
End Sub
Sub lstChange()
MyVar = MsgBox ("Hello World!", 65, "MsgBox 例子")
End Sub
Sub ConvertTemp()
temp = InputBox("请输入华氏温度。", 1)
MsgBox "温度为 " &amp;
Celsius(temp) &amp;
" 摄氏度。"
End Sub
Function Celsius(fDegrees)
Celsius = (fDegrees - 32) * 5 / 9
End Function
</Script>
<title>New Page 1</title>
</head>

<body>
<input type="button" value="按钮" name="B2" OnClick="lstChr">
<input type="button" value="按钮" name="B3" OnClick="lstChange()">
<input type="button" value="按钮" name="B4" OnClick="ConvertTemp()">
</body>
</html>
注意“lstChr”和“lstChange”的不同:是否要将返回值赋给某一个变量
 
可能是全角或半的问题, 建议重输,试一下
 
多人接受答案了。
 
后退
顶部