求VB.NET2003 俄罗斯方块源码

来源：百度知道 编辑：UC知道 时间：2024/07/04 12:50:26
小弟做了很多次,都没有全部做完成.
各位VB高手们,不管是你自已做的,还是别人做的,请发到
zhanglizheng2@163.com
我的邮箱,不圣感激!
不要VB6.0的,因为我看不太懂.
要VB.NET的俄罗斯方块源代码
和程序到我邮箱,谢谢! zhanglizheng2@163.com
我要完整的项目工程,可以在VB.NET中打开运行.
我会加分的,谢谢你们!

还是自已做吧,网上的大部分是6.0的

。。毕业论文了吧？

主界面

using System;
using System.Windows.Forms;
using Bedlang;

public class demo : Form {

private Timer ttimer1 = new Timer();
private Elos elosEx = new Elos();
private RichTextBox map = new RichTextBox();

public static int Main(string[] args) {
Application.Run(new demo());
return 0;
}

public demo(){
this.Height = 365;
this.Width = 130;
map.Width = 135;
map.Height = 340;
this.Controls.Add(map);
ttimer1.Interval = 500;
ttimer1.Enabled = true;
ttimer1.Tick += new System.EventHandler(this.ttimer1_Tick);
map.KeyDown+=new KeyEventHandler(map_KeyDown);
elosEx.reset();
}