中科新闻网刑警803梅梅的扮演者:找个ASP源代码
来源：百度文库 编辑：中科新闻网 时间：2024/05/06 00:48:03
要个聊天室的源代码,,,,要有后台,,,,可以在线T人的,,,,,,可以查IP,,,
满足可以在线T人就OK了!其他第2位!
靠!要下载地址
满足可以在线T人就OK了!其他第2位!
靠!要下载地址
Dim Sum As Integer
Dim I As Integer
I=1
So While I<=10
Sum=Sum+I
I=I+1
Loop
Text1.Text=Sum
End Sub
此句So While I<=10中 I是小于10或等于10吗?怎么判断等于10是否成立?
2)Private Sub Command1_Click()
Dim Sum As Integer
Dim I As Integer
I=1
Do
Sum=Sum+I
I=I+1
Loop While I<=10
Text1.Text=Sum
End Sub
3)Private Sub Command1_Click()
Dim Sum As Integer
Dim I As Integer
I=1
Do
Sum=Sum+I
I=I+1
Loop Until I>10
Text1.Text=Sum
End Sub
下载地址：http://www.moon-soft.com/download/download.asp?id=2445&no=0直接给网际快车的新任务里放入这个网址就好了！
这个是你想要的！
asp300.com