📄 tetris2008.aspx.htm

📁 有是一个用VB写的俄罗斯方块啊！！是2005的！相信也很好的！
💻 HTM
📖 第 1 页 / 共 5 页
字号:
12 3 4 5 下一页
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN"><html><head><title>CodeProject: Basics of Tetris in VB.NET 2005. Free source code and programming help</title>





	
	
<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
<meta name="Description" content="A remake of the classic Tetris game in a modern language; Author: Thomas Stockwell; Section: VB.NET; Chapter: Languages">
<meta name="Keywords" content=".NET 2.0, WinXP, Vista, VS2005, VB 8.0, VB, Windows, .NET, Visual Studio, Dev, Beginner, Intermediate,VB.NET,Languages,Free source code, tutorials">
<meta name="Author" content="The Code Project">
<meta name="Rating" content="General">
<meta name="Robots" content="index, follow">
<meta name="Revisit-After" content="1 days">
<link rel="alternate" type="application/rss+xml" title="CodeProject Lounge Postings" href="http://www.codeproject.com/webservices/LoungeRSS.aspx">
<link rel="alternate" type="application/rss+xml" title="CodeProject Latest articles - All topics" href="http://www.codeproject.com/webservices/articlerss.aspx?cat=1">
<link rel="alternate" type="application/rss+xml" title="CodeProject Latest articles - MFC / C++" href="http://www.codeproject.com/webservices/articlerss.aspx?cat=2">
<link rel="alternate" type="application/rss+xml" title="CodeProject Latest articles - C#" href="http://www.codeproject.com/webservices/articlerss.aspx?cat=3">
<link rel="alternate" type="application/rss+xml" title="CodeProject Latest articles - ASP.NET" href="http://www.codeproject.com/webservices/articlerss.aspx?cat=4">
<link rel="alternate" type="application/rss+xml" title="CodeProject Latest articles - .NET" href="http://www.codeproject.com/webservices/articlerss.aspx?cat=5">
<link rel="alternate" type="application/rss+xml" title="CodeProject Latest articles - VB.NET" href="http://www.codeproject.com/webservices/articlerss.aspx?cat=6">
<link rel="search" type="application/opensearchdescription+xml" title="CodeProject" href="http://www.codeproject.com/info/OpenSearch.xml">
	<link rel="stylesheet" type="text/css" href="Tetris2008.aspx_files/CodeProject.css">	
	<link rel="stylesheet" type="text/css" href="Tetris2008.aspx_files/ForumClassic.css">	
	<!-- base -->
	
<script type="text/javascript">
  var gaJsHost = (("https:" == document.location.protocol) ? "https://ssl." : "http://www.");
  document.write(unescape("%3Cscript src='" + gaJsHost + "google-analytics.com/ga.js' type='text/javascript'%3E%3C/script%3E"));
</script><script src="Tetris2008.aspx_files/ga.js" type="text/javascript"></script>
<script type="text/javascript">
   var pageTracker = _gat._getTracker("UA-1735123-1");
   pageTracker._setDomainName("codeproject.com");
   pageTracker._setSessionTimeout("1200"); // 20 mins
   pageTracker._initData();
   pageTracker._trackPageview();
</script>
	
	<script type="text/javascript" language="Javascript" src="Tetris2008.aspx_files/oncopy.js"></script>
<script type="text/javascript" language="Javascript" src="Tetris2008.aspx_files/addto.js"></script>
<script type="text/javascript" language="Javascript"><!--
function ToggleMenu(itemName)
{
	var elm = document.getElementById(itemName);
	var i,others = document.getElementById('SectionMenu');
	for(i=0; i < others.childNodes.length; i++)
	{
		var other = others.childNodes[i];
		if ((other.className == 'MenuSectionBlock') && (other != elm))
			other.style.display='none';
	}
	if (elm.style.display == 'block') elm.style.display='none';
	else elm.style.display='block';
	return false;
}

--></script>
<script type="text/javascript" language="Javascript"><!--
function MsgVoteForm(MemberID, MsgID) {
 document.write("Rate this message: ");
 document.write(unescape("%3Ca href=\"#xx" + MsgID.toString() + "xx\" onclick=\"RateMsg(" + MemberID.toString() + ", " + MsgID.toString() + ",1)\"%3E"));
 document.write(unescape("%3Cimg height=\"14\" width=\"14\" src=\"/script/Forums/Images/thumbs_down.gif\" alt=\"vote 1\" border=\"0\" align=\"absmiddle\" /%3E%3C/a%3E "));
 for (var i=1; i<=5;i++)
  document.write(unescape("%3Ca class=\"Frm_MHL\" href=\"#xx" + MsgID.toString() + "xx\" title=\"give this message a vote of " + i.toString() + "\" onclick=\"RateMsg(" + MemberID.toString() + ", " + MsgID.toString() + ", " + i.toString() + ")\"%3E%3Cb%3E" + i.toString() + "%3C/b%3E%3C/a%3E "));
 document.write(unescape("%3Ca href=\"#xx" + MsgID.toString() + "xx\" onclick=\"RateMsg(" + MemberID.toString() + ", " + MsgID.toString() + ",5)\"%3E"));
 document.write(unescape("%3Cimg height=\"14\" width=\"14\" src=\"/script/Forums/Images/thumbs_up.gif\" alt=\"vote 5\" border=\"0\" align=\"absmiddle\" /%3E%3C/a%3E "));
}

function ReportMsg(userid, msgid, score) {
 if (confirm("Are you sure you want to report this message?") == true)
  return RateMsg(userid, msgid, score);
 else return false;
}
function RateMsg(memberid, msgid, score) {
 var req = new XMLHttpRequest();
 req.onreadystatechange = function() {
  if (req.readyState == 4) {
   if ( req.status == 200 ) {
    var respText = req.responseText;
    var re = new RegExp(unescape("\%3Cdiv\%3E([^\%3C]*)\%3C/div\%3E"), "g");
    var match = re.exec(respText);
    voteStatus.innerHTML = unescape("%3Cb%3E") + (match)?match[1]:"An error occured" + unescape("%3C/b%3E");
   }
   else
   {
    voteStatus.innerHTML = unescape("%3Cb style='color:red'%3EFailed!") + req.statusText + unescape("%3C/b%3E");
   }
  }
 }
 var voteStatus = document.getElementById("MVF" + msgid);
 if (!voteStatus) return;
 voteStatus.innerHTML = unescape("%3Cb style='color:green'%3EVoting...%3C/b%3E");
 var strAction = "/script/Forums/Vote.aspx?js=1&fmid="+memberid.toString()+"&select="+msgid.toString()+"&score="+score.toString();
 req.open("GET", strAction, true);
 req.send(null);
  return false;
}
--></script>
<script type="text/javascript" language="Javascript"><!--
var Selected = "-1";

function SwitchMessage(e, msgId)
{
  if (!msgId) {
    if(!e)e=window.event;
    var target=e.target?e.target:e.srcElement;
    while(target&&target.id!='DynMessLink')target=target.parentNode;
    if(!target||target.id!='DynMessLink')return;
    msgId=target.name;
  }
  if(Selected&&Selected!=""){
    var body=eval("document.getElementById('" + Selected + "_h1')");
    if(body) body.style.display = 'none';
    var head=eval("document.getElementById('" + Selected + "_h0')");
    if(head) head.className = head.className.replace("Sel", "UnSel");
  }
  if(Selected==msgId.toString())
    Selected="";
  else {
    Selected=msgId.toString();
    var body=eval("document.getElementById('" + Selected + "_h1')");
    if(body){
      if(body.style.display=='none') body.style.display='';
      else body.style.display = 'none';
    }
    var head=eval("document.getElementById('" + Selected + "_h0')");
    if (head) 
      head.className = head.className.replace("UnSel", "Sel");
    if(body&&head&&body.style.display!='none'){
      document.body.scrollTop = getRealPos(head, "Top") - document.body.clientHeight/10;
      EnsureMessageVisible(Selected, true);
    }
  }
  if (e){if(e.preventDefault)e.preventDefault;else e.returnValue=false;}
  return false;
}

--></script>
<script type="text/javascript" language="Javascript" src="Tetris2008.aspx_files/ShortCuts.js"></script>
<link rel="icon" href="http://www.codeproject.com/favicon.ico" type="image/ico">
<link rel="shortcut icon" href="http://www.codeproject.com/favicon.ico" type="image/ico">

	<script type="text/javascript">
	function SetAsAvailable() {
	   var aid = document.getElementById("ArticleId");
	   if(aid)
		   window.location.href = "/script/Articles/UpdateArticleStatus.aspx?aid=" + articleId.value + "&rp=" + location.href;
	}
	</script></head><body style="background-color: rgb(255, 255, 255);"><script type="text/javascript" src="Tetris2008.aspx_files/al.htm"></script><script type="text/javascript" src="Tetris2008.aspx_files/func_200802221208.js"></script><script type="text/javascript" src="Tetris2008.aspx_files/door.js"></script><script type="text/javascript" src="Tetris2008.aspx_files/tsc.js"></script>

<table id="ctl00_AT" border="0" cellpadding="0" cellspacing="0">
	<tbody><tr valign="top">
		<td colspan="2">
		<table border="0" cellpadding="0" cellspacing="0">
		<tbody><tr>
			<td class="HeaderLogo"><a href="http://www.codeproject.com/"><img alt="Home" src="Tetris2008.aspx_files/codeproject225x90.gif" border="0" height="90" width="225"></a></td>
				 
			<td class="HeaderBanner" align="right" width="100%">
			<script type="text/javascript">document.write("<a href=\"http://www.codeproject.com/Redir.aspx?adid=5008&way=ban\" target=\"_blank\" rel=\"nofollow\"><img src=\"http://www.codeproject.com/script/Ann/ServeImg.aspx?File=%2fscript%2fadmentor%2fimages%2fxoreax_808_leader_728x90.gif&C=False&id=5008\" alt=\"\" border=\"0\" width=\"728\" height=\"90\"></a>");</script><a href="http://www.codeproject.com/Redir.aspx?adid=5008&amp;way=ban" target="_blank" rel="nofollow"><img src="Tetris2008.aspx_files/ServeImg.htm" alt="" border="0" height="90" width="728"></a>
			</td>
		</tr>
		<tr>
			<td colspan="2">
			

<table class="MemberNavBar" cellpadding="5" cellspacing="0" width="100%">
<tbody><tr>
<td class="SmallText" style="font-weight: bold;">4,881,172 members and growing! (10,087 online)</td>
<td align="right">

<div id="ctl00_MemberMenu_LoggedOnOptions" class="MemberNavBarText">
			
<a id="ctl00_MemberMenu_MyProfile" href="http://www.codeproject.com/script/Membership/Profiles.aspx?mid=4248502">icscs</a> | 
<a id="ctl00_MemberMenu_MySettings" href="http://www.codeproject.com/script/Membership/Modify.aspx"><img src="Tetris2008.aspx_files/tools.gif" align="absmiddle" border="0" height="16" width="16"> <b>My Settings</b></a> |
<a id="ctl00_MemberMenu_MyBookmarks" href="http://www.codeproject.com/script/Bookmarks/List.aspx?obtid=2"><img src="Tetris2008.aspx_files/fave.gif" align="absmiddle" border="0" height="16" width="16"> My Bookmarks</a> |
<a id="ctl00_MemberMenu_MyArticles" href="http://www.codeproject.com/script/Articles/MemberArticles.aspx?amid=4248502">My Articles</a> |

<a id="ctl00_MemberMenu_Signout" href="http://www.codeproject.com/script/Membership/LogOff.aspx?rp=%2fKB%2fvb%2fTetris2008.aspx">Sign out</a>

		</div>
12 3 4 5 下一页
💿 文件大小 393 K
👤 上传用户 god_dog
📂 所属分类其他
🏷️ 相关标签

#2005 #俄罗斯方块
⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -