亚洲欧美第一页_禁久久精品乱码_粉嫩av一区二区三区免费野_久草精品视频

? 歡迎來到蟲蟲下載站! | ?? 資源下載 ?? 資源專輯 ?? 關于我們
? 蟲蟲下載站

?? hello.vb

?? Bug Game in Visual C++
?? VB
?? 第 1 頁 / 共 2 頁
字號:
        Me.r6.Name = "r6"
        Me.r6.Size = New System.Drawing.Size(24, 24)
        Me.r6.TabIndex = 36
        '
        'r7
        '
        Me.r7.BackColor = System.Drawing.Color.Red
        Me.r7.Font = New System.Drawing.Font("Modern No. 20", 15.75!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
        Me.r7.Location = New System.Drawing.Point(264, 352)
        Me.r7.Name = "r7"
        Me.r7.Size = New System.Drawing.Size(24, 24)
        Me.r7.TabIndex = 45
        '
        'bl8
        '
        Me.bl8.BackColor = System.Drawing.Color.FromArgb(CType(0, Byte), CType(0, Byte), CType(192, Byte))
        Me.bl8.Location = New System.Drawing.Point(168, 352)
        Me.bl8.Name = "bl8"
        Me.bl8.Size = New System.Drawing.Size(24, 24)
        Me.bl8.TabIndex = 46
        '
        'MainMenu1
        '
        Me.MainMenu1.MenuItems.AddRange(New System.Windows.Forms.MenuItem() {Me.MenuItem1, Me.MenuItem3})
        '
        'MenuItem1
        '
        Me.MenuItem1.Index = 0
        Me.MenuItem1.MenuItems.AddRange(New System.Windows.Forms.MenuItem() {Me.MenuItem2})
        Me.MenuItem1.Text = "&File"
        '
        'MenuItem2
        '
        Me.MenuItem2.Index = 0
        Me.MenuItem2.Text = "E&xit"
        '
        'Label2
        '
        Me.Label2.Font = New System.Drawing.Font("Modern No. 20", 12.75!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
        Me.Label2.Location = New System.Drawing.Point(64, 136)
        Me.Label2.Name = "Label2"
        Me.Label2.Size = New System.Drawing.Size(120, 24)
        Me.Label2.TabIndex = 47
        Me.Label2.Text = "How To Play:    "
        '
        'Label3
        '
        Me.Label3.Font = New System.Drawing.Font("Modern No. 20", 12.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
        Me.Label3.Location = New System.Drawing.Point(64, 160)
        Me.Label3.Name = "Label3"
        Me.Label3.Size = New System.Drawing.Size(384, 32)
        Me.Label3.TabIndex = 48
        Me.Label3.Text = "There is a math problem located at the top right of the screen"
        '
        'Label4
        '
        Me.Label4.Font = New System.Drawing.Font("Modern No. 20", 12.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
        Me.Label4.Location = New System.Drawing.Point(64, 192)
        Me.Label4.Name = "Label4"
        Me.Label4.Size = New System.Drawing.Size(384, 40)
        Me.Label4.TabIndex = 49
        Me.Label4.Text = "Use the left and right arrow keys to move the space ship and the space bar to fir" & _
        "e at the correct answer."
        '
        'Label5
        '
        Me.Label5.Font = New System.Drawing.Font("Modern No. 20", 12.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
        Me.Label5.Location = New System.Drawing.Point(64, 224)
        Me.Label5.Name = "Label5"
        Me.Label5.Size = New System.Drawing.Size(384, 88)
        Me.Label5.TabIndex = 50
        Me.Label5.Text = "Once you have the correct answer, hit enter. If its right, the score will increas" & _
        "e, if its wrong you will lose a life. If you want to increase the speed, you can" & _
        " hit the tab key.  If you hit the wrong number, you can hit the escape key to de" & _
        "lete the number you hit."
        '
        'Label6
        '
        Me.Label6.Font = New System.Drawing.Font("Modern No. 20", 12.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
        Me.Label6.Location = New System.Drawing.Point(64, 312)
        Me.Label6.Name = "Label6"
        Me.Label6.Size = New System.Drawing.Size(368, 24)
        Me.Label6.TabIndex = 51
        Me.Label6.Text = "You start with 3 lives and there is a timer."
        '
        'b11
        '
        Me.b11.BackColor = System.Drawing.Color.Black
        Me.b11.Location = New System.Drawing.Point(24, 152)
        Me.b11.Name = "b11"
        Me.b11.Size = New System.Drawing.Size(24, 24)
        Me.b11.TabIndex = 52
        '
        'b10
        '
        Me.b10.BackColor = System.Drawing.Color.Black
        Me.b10.Location = New System.Drawing.Point(24, 272)
        Me.b10.Name = "b10"
        Me.b10.Size = New System.Drawing.Size(24, 24)
        Me.b10.TabIndex = 53
        '
        'b9
        '
        Me.b9.BackColor = System.Drawing.Color.Black
        Me.b9.Location = New System.Drawing.Point(72, 352)
        Me.b9.Name = "b9"
        Me.b9.Size = New System.Drawing.Size(24, 24)
        Me.b9.TabIndex = 54
        '
        'b8
        '
        Me.b8.BackColor = System.Drawing.Color.Black
        Me.b8.Location = New System.Drawing.Point(216, 352)
        Me.b8.Name = "b8"
        Me.b8.Size = New System.Drawing.Size(24, 24)
        Me.b8.TabIndex = 55
        '
        'bl11
        '
        Me.bl11.BackColor = System.Drawing.Color.FromArgb(CType(0, Byte), CType(0, Byte), CType(192, Byte))
        Me.bl11.Location = New System.Drawing.Point(24, 104)
        Me.bl11.Name = "bl11"
        Me.bl11.Size = New System.Drawing.Size(24, 24)
        Me.bl11.TabIndex = 56
        '
        'bl10
        '
        Me.bl10.BackColor = System.Drawing.Color.FromArgb(CType(0, Byte), CType(0, Byte), CType(192, Byte))
        Me.bl10.Location = New System.Drawing.Point(24, 232)
        Me.bl10.Name = "bl10"
        Me.bl10.Size = New System.Drawing.Size(24, 24)
        Me.bl10.TabIndex = 57
        '
        'bl9
        '
        Me.bl9.BackColor = System.Drawing.Color.FromArgb(CType(0, Byte), CType(0, Byte), CType(192, Byte))
        Me.bl9.Location = New System.Drawing.Point(24, 352)
        Me.bl9.Name = "bl9"
        Me.bl9.Size = New System.Drawing.Size(24, 24)
        Me.bl9.TabIndex = 58
        '
        'r11
        '
        Me.r11.BackColor = System.Drawing.Color.Red
        Me.r11.Font = New System.Drawing.Font("Modern No. 20", 15.75!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
        Me.r11.Location = New System.Drawing.Point(24, 64)
        Me.r11.Name = "r11"
        Me.r11.Size = New System.Drawing.Size(24, 24)
        Me.r11.TabIndex = 60
        '
        'r10
        '
        Me.r10.BackColor = System.Drawing.Color.Red
        Me.r10.Font = New System.Drawing.Font("Modern No. 20", 15.75!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
        Me.r10.Location = New System.Drawing.Point(24, 192)
        Me.r10.Name = "r10"
        Me.r10.Size = New System.Drawing.Size(24, 24)
        Me.r10.TabIndex = 61
        '
        'r9
        '
        Me.r9.BackColor = System.Drawing.Color.Red
        Me.r9.Font = New System.Drawing.Font("Modern No. 20", 15.75!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
        Me.r9.Location = New System.Drawing.Point(24, 312)
        Me.r9.Name = "r9"
        Me.r9.Size = New System.Drawing.Size(24, 24)
        Me.r9.TabIndex = 62
        '
        'r8
        '
        Me.r8.BackColor = System.Drawing.Color.Red
        Me.r8.Font = New System.Drawing.Font("Modern No. 20", 15.75!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
        Me.r8.Location = New System.Drawing.Point(120, 352)
        Me.r8.Name = "r8"
        Me.r8.Size = New System.Drawing.Size(24, 24)
        Me.r8.TabIndex = 63
        '
        'Button1
        '
        Me.Button1.Location = New System.Drawing.Point(208, 328)
        Me.Button1.Name = "Button1"
        Me.Button1.Size = New System.Drawing.Size(48, 24)
        Me.Button1.TabIndex = 64
        Me.Button1.Text = "OK"
        '
        'MenuItem3
        '
        Me.MenuItem3.Index = 1
        Me.MenuItem3.MenuItems.AddRange(New System.Windows.Forms.MenuItem() {Me.MenuItem4})
        Me.MenuItem3.Text = "Help"
        '
        'MenuItem4
        '
        Me.MenuItem4.Index = 0
        Me.MenuItem4.Text = "How To Play"
        '
        'Hello
        '
        Me.AutoScaleBaseSize = New System.Drawing.Size(10, 23)
        Me.ClientSize = New System.Drawing.Size(496, 385)
        Me.Controls.Add(Me.Button1)
        Me.Controls.Add(Me.r8)
        Me.Controls.Add(Me.r9)
        Me.Controls.Add(Me.r10)
        Me.Controls.Add(Me.r11)
        Me.Controls.Add(Me.bl9)
        Me.Controls.Add(Me.bl10)
        Me.Controls.Add(Me.bl11)
        Me.Controls.Add(Me.b8)
        Me.Controls.Add(Me.b9)
        Me.Controls.Add(Me.b10)
        Me.Controls.Add(Me.b11)
        Me.Controls.Add(Me.Label6)
        Me.Controls.Add(Me.Label5)
        Me.Controls.Add(Me.Label4)
        Me.Controls.Add(Me.Label3)
        Me.Controls.Add(Me.Label2)
        Me.Controls.Add(Me.bl8)
        Me.Controls.Add(Me.r7)
        Me.Controls.Add(Me.PictureBox1)
        Me.Controls.Add(Me.lblcptname)
        Me.Controls.Add(Me.b7)
        Me.Controls.Add(Me.r5)
        Me.Controls.Add(Me.r2)
        Me.Controls.Add(Me.r3)
        Me.Controls.Add(Me.r4)
        Me.Controls.Add(Me.r6)
        Me.Controls.Add(Me.bl6)
        Me.Controls.Add(Me.bl5)
        Me.Controls.Add(Me.bl2)
        Me.Controls.Add(Me.bl3)
        Me.Controls.Add(Me.bl4)
        Me.Controls.Add(Me.bl7)
        Me.Controls.Add(Me.b5)
        Me.Controls.Add(Me.b3)
        Me.Controls.Add(Me.b4)
        Me.Controls.Add(Me.b2)
        Me.Controls.Add(Me.b6)
        Me.Controls.Add(Me.Label1)
        Me.Controls.Add(Me.r1)
        Me.Controls.Add(Me.bl1)
        Me.Controls.Add(Me.b1)
        Me.Font = New System.Drawing.Font("Modern No. 20", 15.75!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
        Me.Menu = Me.MainMenu1
        Me.Name = "Hello"
        Me.Text = "Hello"
        Me.ResumeLayout(False)

    End Sub

#End Region

    
    Private Sub Hello_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        Me.lblcptname.Text = f0.txtname.Text
        f1 = Me


        Me.Timer2.Enabled = True
        Me.Timer3.Enabled = True
        Me.Timer4.Enabled = True

    End Sub

   

    Private Sub Timer2_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer2.Tick

        If Me.b1.Visible = True Then Me.b1.Visible = False Else Me.b1.Visible = True
        If Me.b2.Visible = True Then Me.b2.Visible = False Else Me.b2.Visible = True
        If Me.b3.Visible = True Then Me.b3.Visible = False Else Me.b3.Visible = True
        If Me.b4.Visible = True Then Me.b4.Visible = False Else Me.b4.Visible = True
        If Me.b5.Visible = True Then Me.b5.Visible = False Else Me.b5.Visible = True
        If Me.b6.Visible = True Then Me.b6.Visible = False Else Me.b6.Visible = True
        If Me.b7.Visible = True Then Me.b7.Visible = False Else Me.b7.Visible = True
        If Me.b8.Visible = True Then Me.b8.Visible = False Else Me.b8.Visible = True
        If Me.b9.Visible = True Then Me.b9.Visible = False Else Me.b9.Visible = True
        If Me.b10.Visible = True Then Me.b10.Visible = False Else Me.b10.Visible = True
        If Me.b11.Visible = True Then Me.b11.Visible = False Else Me.b11.Visible = True

    End Sub

    Private Sub Timer3_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer3.Tick

        If Me.bl1.Visible = True Then Me.bl1.Visible = False Else Me.bl1.Visible = True
        If Me.bl2.Visible = True Then Me.bl2.Visible = False Else Me.bl2.Visible = True
        If Me.bl3.Visible = True Then Me.bl3.Visible = False Else Me.bl3.Visible = True
        If Me.bl4.Visible = True Then Me.bl4.Visible = False Else Me.bl4.Visible = True
        If Me.bl5.Visible = True Then Me.bl5.Visible = False Else Me.bl5.Visible = True
        If Me.bl6.Visible = True Then Me.bl6.Visible = False Else Me.bl6.Visible = True
        If Me.bl7.Visible = True Then Me.bl7.Visible = False Else Me.bl7.Visible = True
        If Me.bl8.Visible = True Then Me.bl8.Visible = False Else Me.bl8.Visible = True
        If Me.bl9.Visible = True Then Me.bl9.Visible = False Else Me.bl9.Visible = True
        If Me.bl10.Visible = True Then Me.bl10.Visible = False Else Me.bl10.Visible = True
        If Me.bl11.Visible = True Then Me.bl11.Visible = False Else Me.bl11.Visible = True

    End Sub

    Private Sub Timer4_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer4.Tick

        If Me.r1.Visible = True Then Me.r1.Visible = False Else Me.r1.Visible = True
        If Me.r2.Visible = True Then Me.r2.Visible = False Else Me.r2.Visible = True
        If Me.r3.Visible = True Then Me.r3.Visible = False Else Me.r3.Visible = True
        If Me.r4.Visible = True Then Me.r4.Visible = False Else Me.r4.Visible = True
        If Me.r5.Visible = True Then Me.r5.Visible = False Else Me.r5.Visible = True
        If Me.r6.Visible = True Then Me.r6.Visible = False Else Me.r6.Visible = True
        If Me.r7.Visible = True Then Me.r7.Visible = False Else Me.r7.Visible = True
        If Me.r8.Visible = True Then Me.r8.Visible = False Else Me.r8.Visible = True
        If Me.r9.Visible = True Then Me.r9.Visible = False Else Me.r9.Visible = True
        If Me.r10.Visible = True Then Me.r10.Visible = False Else Me.r10.Visible = True
        If Me.r11.Visible = True Then Me.r11.Visible = False Else Me.r11.Visible = True

    End Sub

    Private Sub MenuItem2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MenuItem2.Click
        If MsgBox("Do you really want to exit?", MsgBoxStyle.YesNo, "Confirm with User") = MsgBoxResult.Yes Then End

    End Sub

 
    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        f1.Hide()
        f2.Show()

    End Sub

    Private Sub MenuItem4_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MenuItem4.Click
        f4.Show()
    End Sub
End Class

?? 快捷鍵說明

復制代碼 Ctrl + C
搜索代碼 Ctrl + F
全屏模式 F11
切換主題 Ctrl + Shift + D
顯示快捷鍵 ?
增大字號 Ctrl + =
減小字號 Ctrl + -
亚洲欧美第一页_禁久久精品乱码_粉嫩av一区二区三区免费野_久草精品视频
亚洲一区在线播放| 一本大道久久a久久精二百| 成人h版在线观看| 7777精品伊人久久久大香线蕉完整版 | 国产91综合网| 欧美日韩国产系列| 最新久久zyz资源站| 久久精品国产亚洲一区二区三区| 91小宝寻花一区二区三区| 日韩欧美久久久| 亚洲1区2区3区视频| 91免费小视频| 国产精品无码永久免费888| 久久精品国产亚洲一区二区三区| 欧美日韩视频专区在线播放| 亚洲欧美成人一区二区三区| 国产高清一区日本| 精品国精品自拍自在线| 亚瑟在线精品视频| 色婷婷亚洲精品| 中文字幕一区二区三区视频| 豆国产96在线|亚洲| 久久久www成人免费毛片麻豆| 裸体一区二区三区| 欧美一级在线视频| 青娱乐精品在线视频| 9191精品国产综合久久久久久| 亚洲制服丝袜在线| 在线视频亚洲一区| 亚洲曰韩产成在线| 欧美日韩极品在线观看一区| 亚洲国产一区视频| 欧美日韩国产经典色站一区二区三区| 亚洲一区视频在线| 欧美体内she精高潮| 一区二区三区四区激情| 99视频精品全部免费在线| 国产精品美女视频| 色综合久久九月婷婷色综合| 中文字幕中文字幕在线一区| 91香蕉国产在线观看软件| 亚洲色图制服诱惑| 欧美伊人久久大香线蕉综合69| 夜夜嗨av一区二区三区网页| 777亚洲妇女| 国产一区二区免费视频| 欧美韩国日本不卡| 91免费国产视频网站| 亚洲精品日韩综合观看成人91| 欧美日韩三级视频| 伦理电影国产精品| 国产女同互慰高潮91漫画| 91同城在线观看| 亚洲v日本v欧美v久久精品| 欧美日韩成人综合| 国产一区二区三区四| 中文字幕在线观看不卡视频| 91精品福利视频| 蜜臀av性久久久久av蜜臀妖精| 久久久精品蜜桃| 欧美亚男人的天堂| 精品一区二区三区免费| 国产精品久久久久一区二区三区| 色先锋aa成人| 精品在线一区二区三区| 日韩毛片高清在线播放| 69堂成人精品免费视频| 成人中文字幕电影| 亚洲国产成人精品视频| 国产午夜一区二区三区| 色综合久久中文字幕| 激情综合色播激情啊| 亚洲丝袜另类动漫二区| 精品免费日韩av| 在线观看视频91| 国产毛片精品视频| 亚洲第一成年网| 国产精品家庭影院| 精品av综合导航| 欧美中文字幕亚洲一区二区va在线 | 国产伦精一区二区三区| 国产精品国产三级国产普通话三级 | 欧美精品aⅴ在线视频| 国产乱码一区二区三区| 伊人开心综合网| 久久久国产精品麻豆| 欧美精品vⅰdeose4hd| 91视频精品在这里| 激情五月婷婷综合| 日韩电影在线一区| 亚洲午夜精品一区二区三区他趣| 久久久精品免费免费| 日韩一级片网站| 欧美日本在线观看| 色综合色综合色综合色综合色综合 | 欧美精品乱码久久久久久按摩| 岛国一区二区在线观看| 捆绑变态av一区二区三区| 亚洲精品乱码久久久久久久久| 久久久久久久久97黄色工厂| 日韩精品一区二区三区视频在线观看| 色噜噜狠狠成人中文综合| 成人精品电影在线观看| 国产精一品亚洲二区在线视频| 秋霞国产午夜精品免费视频| 亚洲高清免费视频| 亚洲尤物视频在线| 亚洲另类在线制服丝袜| 国产精品久久国产精麻豆99网站| 国产亚洲精品7777| 久久精品综合网| 久久午夜电影网| 久久蜜桃一区二区| 久久久国际精品| 国产欧美日韩三级| 国产日韩三级在线| 国产精品无码永久免费888| 欧美激情自拍偷拍| 国产精品久久免费看| 国产精品盗摄一区二区三区| 国产精品伦理在线| 亚洲精品免费一二三区| 亚洲在线视频网站| 日本vs亚洲vs韩国一区三区二区| 日本不卡一二三区黄网| 精品一区二区三区久久| 成人深夜在线观看| 色综合久久久久久久久久久| 欧美日韩一区三区四区| 欧美岛国在线观看| 欧美高清在线视频| 一区二区三区毛片| 日韩和欧美一区二区| 久久成人免费电影| 风间由美性色一区二区三区| 97久久精品人人做人人爽| 91国偷自产一区二区三区成为亚洲经典 | 欧美aⅴ一区二区三区视频| 久久成人久久鬼色| 大胆亚洲人体视频| 在线观看www91| 日韩亚洲欧美一区二区三区| 国产人伦精品一区二区| 亚洲理论在线观看| 久久精品国产网站| 99视频有精品| 日韩视频一区二区在线观看| 国产日韩欧美亚洲| 亚洲综合色婷婷| 久久69国产一区二区蜜臀| 丁香六月久久综合狠狠色| 欧美午夜精品久久久久久孕妇| 日韩欧美电影一区| 亚洲天堂免费在线观看视频| 日韩国产精品久久| 成人动漫一区二区| 欧美日韩久久一区| 国产日韩精品视频一区| 亚洲在线观看免费视频| 国产精品一线二线三线| 欧美日韩久久久久久| 中文一区二区完整视频在线观看| 日本亚洲一区二区| 99久久伊人精品| 精品国产1区二区| 亚洲已满18点击进入久久| 国产麻豆视频精品| 欧美精品亚洲一区二区在线播放| 中文字幕不卡的av| 久久se精品一区精品二区| 色狠狠色狠狠综合| 欧美国产国产综合| 激情综合一区二区三区| 欧美在线999| 国产精品成人免费| 国产福利一区二区三区| 日韩午夜激情视频| 亚洲高清在线视频| 色综合久久中文字幕| 国产精品久久久久影院亚瑟| 国产精品自拍网站| 欧美成人在线直播| 日本成人在线不卡视频| 欧美最猛性xxxxx直播| 自拍偷在线精品自拍偷无码专区| 国产一区二区在线免费观看| 日韩精品自拍偷拍| 亚洲成a天堂v人片| 欧美中文字幕一区二区三区| 一区二区三区中文字幕精品精品| av毛片久久久久**hd| 国产欧美视频一区二区| 国产成人丝袜美腿| 欧美精品一区二区三区很污很色的| 日韩国产高清在线| 日韩精品一区二区三区老鸭窝| 日本成人在线网站| 欧美一区二区国产| 免播放器亚洲一区| 久久先锋影音av|