當前位置:遊戲中心平台 - 遊戲盒子 - 如何用VB簡體版寫小遊戲

如何用VB簡體版寫小遊戲

私人?Sub?Command0_Click()

暗淡?xAs?線

x?=?"●"

如果?命令2。標題?=?x?然後

命令2。標題?=?"○"

其他

命令2。標題?=?"●"

結束?如果

如果?命令4。標題?=?x?然後

命令4。標題?=?"○"

其他

命令4。標題?=?"●"

結束?如果

如果?命令6。標題?=?x?然後

命令6。標題?=?"○"

其他

命令6。標題?=?"●"

結束?如果

如果?命令8。標題?=?x?然後

命令8。標題?=?"○"

其他

命令8。標題?=?"●"

結束?如果

結束?潛水艇

私人?Sub?Command1_Click()

暗淡?xAs?線

x?=?"●"

如果?命令8。標題?=?x?然後

命令8。標題?=?"○"

其他

命令8。標題?=?"●"

結束?如果

如果?命令2。標題?=?x?然後

命令2。標題?=?"○"

其他

命令2。標題?=?"●"

結束?如果

如果?命令0。標題?=?x?然後

命令0。標題?=?"○"

其他

命令0。標題?=?"●"

結束?如果

結束?潛水艇

私人?Sub?Command2_Click()

暗淡?xAs?線

x?=?"●"

如果?命令0。標題?=?x?然後

命令0。標題?=?"○"

其他

命令0。標題?=?"●"

結束?如果

如果?命令1。標題?=?x?然後

命令1。標題?=?"○"

其他

命令1。標題?=?"●"

結束?如果

如果?命令3。標題?=?x?然後

命令3。標題?=?"○"

其他

命令3。標題?=?"●"

結束?如果

結束?潛水艇

私人?Sub?Command3_Click()

暗淡?xAs?線

x?=?"●"

如果?命令0。標題?=?x?然後

命令0。標題?=?"○"

其他

命令0。標題?=?"●"

結束?如果

如果?命令2。標題?=?x?然後

命令2。標題?=?"○"

其他

命令2。標題?=?"●"

結束?如果

如果?命令4。標題?=?x?然後

命令4。標題?=?"○"

其他

命令4。標題?=?"●"

結束?如果

結束?潛水艇

私人?Sub?Command4_Click()

暗淡?xAs?線

x?=?"●"

如果?命令0。標題?=?x?然後

命令0。標題?=?"○"

其他

命令0。標題?=?"●"

結束?如果

如果?命令3。標題?=?x?然後

命令3。標題?=?"○"

其他

命令3。標題?=?"●"

結束?如果

如果?命令5。標題?=?x?然後

命令5。標題?=?"○"

其他

命令5。標題?=?"●"

結束?如果

結束?潛水艇

私人?Sub?Command5_Click()

暗淡?xAs?線

x?=?"●"

如果?命令0。標題?=?x?然後

命令0。標題?=?"○"

其他

命令0。標題?=?"●"

結束?如果

如果?命令4。標題?=?x?然後

命令4。標題?=?"○"

其他

命令4。標題?=?"●"

結束?如果

如果?命令6。標題?=?x?然後

命令6。標題?=?"○"

其他

命令6。標題?=?"●"

結束?如果

結束?潛水艇

私人?Sub?Command6_Click()

暗淡?xAs?線

x?=?"●"

如果?命令0。標題?=?x?然後

命令0。標題?=?"○"

其他

命令0。標題?=?"●"

結束?如果

如果?命令5。標題?=?x?然後

命令5。標題?=?"○"

其他

命令5。標題?=?"●"

結束?如果

如果?命令7。標題?=?x?然後

命令7。標題?=?"○"

其他

命令7。標題?=?"●"

結束?如果

結束?潛水艇

私人?Sub?Command7_Click()

暗淡?xAs?線

x?=?"●"

如果?命令0。標題?=?x?然後

命令0。標題?=?"○"

其他

命令0。標題?=?"●"

結束?如果

如果?命令6。標題?=?x?然後

命令6。標題?=?"○"

其他

命令6。標題?=?"●"

結束?如果

如果?命令8。標題?=?x?然後

命令8。標題?=?"○"

其他

命令8。標題?=?"●"

結束?如果

結束?潛水艇

私人?Sub?Command8_Click()

暗淡?xAs?線

x?=?"●"

如果?命令0。標題?=?x?然後

命令0。標題?=?"○"

其他

命令0。標題?=?"●"

結束?如果

如果?命令7。標題?=?x?然後

命令7。標題?=?"○"

其他

命令7。標題?=?"●"

結束?如果

如果?命令1。標題?=?x?然後

命令1。標題?=?"○"

其他

命令1。標題?=?"●"

結束?如果

結束?潛水艇

私人?Sub?yun_Click()

如果?命令0。標題?=?x?& amp?命令1。標題?=?x?然後呢。命令2。標題?=?x?然後呢。命令3。標題?=?x?然後呢。命令4。標題?=?x?然後呢。命令5。標題?=?x?然後呢。命令6。標題?=?x?然後呢。命令7。標題?=?x?然後呢。命令8。標題?=?x?然後

標簽2。標題?=?“成功~ ~ ~!!!恭喜妳!!!"

其他

標簽2。標題?=?“這還沒完呢!搞得壹塌糊塗。。"

結束?如果

結束?潛水艇

  • 上一篇:小班音樂教案:懶蟲
  • 下一篇:經營麻將館如何計分
  • copyright 2024遊戲中心平台