标题：WM手机简易性能测试 by fly@fly-..

总置顶·置顶·精华·锁定·删除·移动·提升广告位招租，广告代号：BbsGGAD

09-21 11:27: Mozilla/4.0 (compatible; MSIE 8.0; Windows NT 6.1; WOW64; Trident/4.0; SLCC2; .NET CLR 2.0.50727; .NET CLR 3.5.30729; .NET CLR 3.0.30729; Media Center PC 6.0; InfoPath.2; CIBA; MAXTHON 2.0)

xcq 机长
头衔 --
注册 07-04-02
来自 sz: WM手机简易性能测试 by fly@fly-fly-fly.com 20090921
Public Class Form1
Dim rand As New Random()
Dim x As Integer : Dim y As Integer
Dim YS As Long
Dim JS As Integer
Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick
x = rand.Next(425) : y = rand.Next(745) '-55 图片大小
PictureBox1.Location = New Point(x, y) '设置图片新位置
'数学运算
For i As Integer = 1 To 510 '控制在某些机型上的速度
ys += 1
ys -= 1
ys /= 1
YS *= 1
Next
JS += 1 '计数器
End Sub
Private Sub Timer2_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer2.Tick
Label1.Text = JS.ToString '显示速度
JS = 0
End Sub
End Class
广告位招租，广告代号：BbsGGADtop
本帖最后由 xcq 于 2009-9-21 11:35:18 编辑

09-21 11:46: Mozilla/4.0 (compatible; MSIE 8.0; Windows NT 6.1; WOW64; Trident/4.0; SLCC2; .NET CLR 2.0.50727; .NET CLR 3.5.30729; .NET CLR 3.0.30729; Media Center PC 6.0; InfoPath.2; CIBA; MAXTHON 2.0)

标题
使用表情识别使用UBB代码使用个人签名	广告位招租，广告代号：PubGGAD