UC知道请高手帮帮忙，帮我看一下那里有错误。
来源：百度知道 编辑：UC知道 时间：2024/06/21 22:42:50
<script language="vbscript">
dim i,j,x
x=8(i-1)+j
for i= 1 to 13
for j=1 to 8
j=j+1
msgbox x&" "
next j
i=i+1
next i
if (x>100)then
document.write "*"&" "
end if
</script>
&" "中间是空格，在next j里出现问题，错误是语句未结束，在线等，我是初学者帮个忙！！
dim i,j,x
x=8(i-1)+j
for i= 1 to 13
for j=1 to 8
j=j+1
msgbox x&" "
next j
i=i+1
next i
if (x>100)then
document.write "*"&" "
end if
</script>
&" "中间是空格，在next j里出现问题，错误是语句未结束，在线等，我是初学者帮个忙！！
msgbox x&" " 错了
msgbox 在vbscript里不支持
服务器端无法弹出对话框.
如要在客户端弹出对话框,要用
要用document.write 输出JAVA的弹出对话框代码
---
在VB环境下进行了调试,改了一个地方
Private Sub Command1_Click()
Dim i, j, x
x = 8 * (i - 1) + j '这里加了一个*号,做乘法,你试试看
For i = 1 To 13
For j = 1 To 8
j = j + 1
MsgBox x & " "
Next j
i = i + 1
Next i
If (x > 100) Then
document.write "*" & " "
End If
End Sub
o