河南主持人陈琨那年:VB6。0编程:在使用PRINT语句时,有时会出现“没有结束语句”的错误,如何解决?

来源:百度文库 编辑:高考问答 时间:2024/03/29 20:48:48
如编写下列程序:Private Sub Picture1_Click()
Dim i%
For i = 1 To 5
picture 1.print tab(1+1.5*(i-1));"★";string(2+3*(5-i),"☆");"★"
Next i
picture 1.print tab(8.5);"☆"
For i = 6 To 10
picture 1.print tab(1+1.5*(10-i));"☆";string(2+3*(i-6),"★");"☆"
Next i
End Sub

在使用PRINT语句时,有时会出现“没有结束语句”的错误,如何解决?

改为这样就可以了!

Private Sub Picture1_Click()
Dim i%
For i = 1 To 5
picture1.print tab(1+1.5*(i-1));"★";string(2+3*(5-i),"☆");"★"
Next i
picture1.print tab(8.5);"☆"
For i = 6 To 10
picture1.print tab(1+1.5*(10-i));"☆";string(2+3*(i-6),"★");"☆"
Next i
End Sub

删掉三个picture与1之间的空格