vb打砖块游戏代码（打砖块游戏源码）

本篇文章给大家谈谈vb打砖块游戏代码，以及打砖块游戏源码对应的知识点，希望对各位有所帮助，不要忘了收藏本站喔。

本文目录一览：

• 1、C++打砖块游戏代码完整，有用。
• 2、打砖块VB代码
• 3、vb 6.0 小球打砖块

C++打砖块游戏代码完整，有用。

#includestring.h

#includestdio.h

#include stdlib.h

#includeconio.h

int scr[22][50], q=14, w=30, ban=20, score=1, sx=-1 , zy=-1 ,speed=1, chang=30;

void moveqiu(void);

void penzhuangqiu(void);

void printf(void);

void menu(void);

main(void)

{

int i=0,j=0;

menu();

for(;j50;j++)

scr[i][j]=4;

j=0;i=1;

;for(;i3;i++)

for(j=2;j48;j++)

scr[i][j]=3;

//这里设置砖头位置

scr[q][w]=2;

while(1)

{

for(j=0;j20;j++)//将板位置归0

scr[21][ban+j]=0;

if(kbhit())//控制板的移动

switch(getch())

{

case'a':case'A':if(ban1ban=29) ban--;

break;

case'd':case'D':if(ban0ban=28) ban++;

break;

case'w':case'W':getch();break;//暂停键

}

for(j=0;j20;j++)//建立板位置为1

scr[21][ban+j]=1;

penzhuangqiu();

moveqiu();

printf();

}

}

void penzhuangqiu(void)

{

int b;

b=0;

if(zy==1)//以下四个if用来检测撞砖，并改变球的运动方向

if(scr[q][w+1]==3||w+1==49)

{

scr[q][w+1]=0;

zy=-zy;

b=1;

}

if(zy==-1)//判断运动又有方向

if(scr[q][w-1]==3||w-1==0)

{

scr[q][w-1]=0;

zy=-zy;

b=1;//用来确认是否敲打左右上下的方块

}

if(sx==1)

if(scr[q-1][w]==3||q-1==0)

{

scr[q-1][w]=0;

sx=-sx;

b=1;

}

if(sx==-1)

if(scr[q+1][w]==3||q+1==21)

{

if(scr[q+1][w]==3)

{scr[q+1][w]=0;

sx=-sx;

b=1;

}

if(q+1==21)

{if(scr[q+1][w]==1)

sx=-sx;

else

{

printf("lose!!!!!!退出游戏");

if(getch())

main();

}

}

}

if(b==0)//斜的砖块

{

if(zy==1sx==1)

if(scr[q-1][w+1]==3)

{

scr[q-1][w+1]=0;

zy=-zy;

sx=-sx;

}

if(zy==-1sx==1)

if(scr[q-1][w-1]==3)

{

scr[q-1][w-1]=0;

zy=-zy;

sx=-sx;

}

if(zy==1sx==-1)

if(scr[q+1][w+1]==3)

{

scr[q+1][w+1]=0;

zy=-zy;

sx=-sx;

}

if(zy==-1sx==-1)

if(scr[q+1][w-1]==3)

{

scr[q+1][w-1]=0;

zy=-zy;

sx=-sx;

}//斜砖完毕

}

}

void moveqiu(void)

{

scr[q][w]=0;//使原来的球位置为0,并建立新的球位置

if(sx==1zy==1)

{

q--;w++;

}

if(sx==1zy==-1)

{

q--;w--;

}

if(sx==-1zy==1)

{

q++;w++;

}

if(sx==-1zy==-1)

{

q++;w--;

}

scr[q][w]=2;

}

void printf(void)

{

int i, j;

system("cls");

for(i=0;i22;i++)

{

for(j=0;j50;j++)

{

if(scr[i][j]==0)printf(" ");

if(scr[i][j]==1)printf("\3");

if(scr[i][j]==2)printf("\4");

if(scr[i][j]==3)printf("\5");

if(scr[i][j]==4)printf("_");

if(j==49)

printf("|\n");

}

}

}

void menu(void)

{

q=14, w=30, ban=20, score=10, sx=-1 , zy=-1 ,speed=1, chang=30;memset(scr,0, sizeof(int)*1100);

system("cls");

printf("A向左，D向右，W暂停\n开始游戏：任意键\n ");

if(getch()) printf("aaaaaa");

}

打砖块VB代码

MSHFlexGrid 控件常数

这一节包含关于 MSHFlexGrid 的控件常数的信息。注意这些常数也应用到 MSFlexGrid，除非有不同地注解。

AddModeSettings 属性 (MSHFlexGrid)

常数 值 描述

flexNoAddNew 0 当前单元不在最后行中，并且没有 AddNew 操作处于待决。

flexAddNewCurrent 1 当前单元在最后一行，但没有 AddNew 操作处于待决。

flexAddNewPending 2 当前单元在倒数第二行。这是是通过 MSHFlexGrid 用户接口由用户初始化一个待决的 AddNew 操作的结果，或者是编程地设置一个列的 Value 或 Text 属性的结果。

AllowUserResizing 属性

常数 值 描述

flexResizeNone 0 用户不能使用鼠标调整大小。这是缺省设置值。

flexResizeColumns 1 用户可以使用鼠标调整列的大小。

flexResizeRows 2 用户可以使用鼠标调整行的大小。

flexResizeBoth 3 用户可以使用鼠标调整列和行的大小。

Appearance 属性

常数 值 描述

flexFlat 0 MSHFlexGrid 的全部外观是平面的或正常的。

flex3D 1 MSHFlexGrid 的全部外观是三维的。

BorderStyle 属性

常数 值 描述

flexBorderNone 0 没有边框。

flexBorderSingle 1 有一个单边框。

CellAlignment 属性

常数 值 描述

flexAlignLeftTop 0 单元内容顶部左对齐。

flexAlignLeftCenter 1 单元内容中间左对齐。对字符串的缺省设置值。

flexAlignLeftBottom 2 单元内容底部左对齐。

flexAlignCenterTop 3 单元内容顶部居中。

flexAlignCenterCenter 4 单元内容中间居中。

flexAlignCenterBottom 5 单元内容底部居中。

flexAlignRightTop 6 单元内容顶部右对齐。

flexAlignRightCenter 7 单元内容中间右对齐。对数字的缺省设置值。

flexAlignRightBottom 8 单元内容底部右对齐。

flexAlignGeneral 9 单元内容一般对齐方式。对字符串中间左对齐而对数值中间右对齐。

CellPictureAlignment 属性

常数 值 描述

flexAlignLeftTop 0 图片顶部左对齐。

flexAlignLeftCenter 1 图片中间左对齐。

flexAlignLeftBottom 2 图片底部左对齐。

flexAlignCenterTop 3 图片顶部居中。

flexAlignCenterCenter 4 图片中间居中。

flexAlignCenterBottom 5 图片底部居中。

flexAlignRightTop 6 图片顶部右对齐。

flexAlignRightCenter 7 图片中间右对齐。

flexAlignRightBottom 8 图片底部右对齐。

CellTextStyle、TextStyle、TextStyleFixed 属性

常数 值 描述

flexTextFlat 0 文本为正常的、平面的文本。

flexTextRaised 1 文本看起来凸起。

flexTextInset 2 文本看起来凹入。

flexTextRaisedLight 3 文本看起来轻微凸起。

flexTextInsetLight 4 文本看起来轻微凹入。

CellType 属性 (MSHFlexGrid)

常数 值 描述

flexCellTypeStandard 0 单元为标准单元

flexCellTypeFixed 1 单元包含在一个固定行或列中。

flexCellTypeHeader 2 单元是一个数据带区的标头单元。

flexCellTypeIndent 3 单元用在缩进一个数据带区的一列中。

flexCellTypeUnpopulated 4 单元是一个未充填的单元。

ColAlignment 属性

常数 值 描述

flexAlignLeftTop 0 列内容顶部左对齐。

flexAlignLeftCenter 1 列内容中间左对齐。对字符串的缺省设置值。

flexAlignLeftBottom 2 列内容底部左对齐。

flexAlignCenterTop 3 列内容顶部居中。

flexAlignCenterCenter 4 列内容中间居中。

flexAlignCenterBottom 5 列内容底部居中

flexAlignRightTop 6 列内容顶部右对齐。

flexAlignRightCenter 7 列内容中间右对齐。对数值的缺省设置值。

flexAlignRightBottom 8 列内容底部右对齐。

flexAlignGeneral 9 列内容一般对齐方式。对字符串中间左对齐而对数值中间右对齐。

ColHeader 属性 (MSHFlexGrid)

常数 值 描述

flexColHeaderOn 0 为每一个带区显示标头。

flexColHeaderOff 1 没有为带区显示标头。

flexColHeaderOnce 2 为带区显示标头。如果带区被折叠，只显示一个标头。重复的标头不显示。

DisplayBandSettings 属性 (MSHFlexGrid)

常数 值 描述

flexBandDisplayHorizontal 0 MSHFlexGrid 中的带区水平显示（横向）。缺省设置值。

flexBandDisplayVertical 1 MSHFlexGrid 中的带区竖直显示（上下方向）。

DisplayCellSettings 属性 (MSHFlexGrid)

常数 值 描述

FlexCellDisplayHorizontal 0 MSHFlexGrid 中的带区水平显示（横向）。

flexCellDisplayVertical 1 MSHFlexGrid 中的带区竖直显示（上下方向）。

FillStyle 属性

常数 值 描述

flexFillSingle 0 单个。更改 Text 或任何单元属性只影响活动单元。缺省设置值。

flexFillRepeat 1 重复。更改 Text 或任何单元属性影响所有选定单元。

FocusRect 属性

常数 值 描述

flexFocusNone 0 围绕当前单元没有焦点矩形。

flexFocusLight 1 围绕当前单元有一个浅色的焦点矩形。缺省设置值。

flexFocusHeavy 2 围绕当前单元有一个深色的焦点矩形。

GridLines、GridLinesFixed 属性

常数 值 描述

flexGridNone 0 没有线。单元格之间没有线。在 MSFlexGrid 中，对 GridLines 这是缺省的设置值。

flexGridFlat 1 有线。单元格之间线风格被设置为正常的、平面的线。在 MSHFlexGrid 中，对 GridLines 这是缺省的设置。

flexGridInset 2 凹入线。单元格之间线的风格被设置为凹入线。在 MSFlexGrid 中，对 GridLinesFixed 这是缺省的设置值。

flexGridRaised 3 凸起线。单元格之间的线风格被设置为凸起线。在 MSHFlexGrid 中，对 GridLinesFixed 这是缺省的设置值。

HighLight 属性

常数 值 描述

flexHighlightNever 0 选定单元无突出显示。

flexHighlightAlways 1 选定单元总是突出显示。这是缺省设置值。

flexHighlightWithFocus 2 突出显示只在控件有焦点时才显现。

MergeCells 属性

常数 值 描述

flexMergeNever 0 不显示。包含相同内容的单元不分组。这是缺省设置值。

flexMergeFree 1 自由。包含相同内容的单元总是合并。

flexMergeRestrictRows 2 限制行。只有行中包含相同内容的相邻单元（向左）合并。

flexMergeRestrict-Columns 3 限制列。只有列中包含相同内容的相邻单元（向上）合并。

flexMergeRestrictBoth 4 限制行和列。只有在行中（向左）或在列中（向上）包含相同内容的相邻的单元合并。

MousePointer 属性

常数 值 描述

flexDefault 0 MSHFlexGrid 的轮廓。

flexArrow 1 一个箭头指针。

flexCross 2 一组十字型指针。

flexIBeam 3 一个 "I" 型标指针，来允许文本输入。

flexIcon 4 一个正方形中的方块。

flexSize 5 一个用箭头指向上方、下方、左方或右方调整大小指针。

flexSizeNESW 6 一个用箭头指向右上方和左下方调整大小指针。

flexSizeNS 7 一个用箭头指向上方和下方调整大小指针。

flexSizeNWSE 8 一个用箭头指向左上方和右下方调整大小指针。

flexSizeEW 9 一个用箭头指向左方和右方调整大小指针。

flexUpArrow 10 一个指向上方的箭头。

flexHourGlass 11 一个沙漏符号。

flexNoDrop 12 一个“不允许放下”指针。

flexCustom 13 一个自定义风格指针。

PictureType 属性

常数 值 描述

flexPictureColor 0 产生一个高品质的全色图象。

flexPictureMonochrome 1 产生一个较低品质、单色，占用较少内存的图象。

RowSizingSettings 属性 (MSHFlexGrid)

常数 值 描述

flexRowSizeIndividual 0 调整一个行的大小只更改调整的行的高度。这是缺省设置值。

flexRowSizeAll 1 调整一个行的大小更改 MSHFlexGrid 中的所有行的高度。

SelectionMode 属性

常数 值 描述

flexSelectionFree 0 自由。允许选定 MSHFlexGrid 中的个别单元，电子数据表风格。（缺省设置值）

flexSelectionByRow 1 按行。强制跨越整个行选择，如在一个多列列表框或基于记录的显示。

flexSelectionByColumn 2 按列。强制跨越整个列选择，如同为一个图表选择范围或为排序选择字段。

ScrollBars 属性

常数 值 描述

flexScrollNone 0 MSHFlexGrid 没有滚动条。

flexScrollHorizontal 1 MSHFlexGrid 有一个水平的滚动条。

flexScrollVertical 2 MSHFlexGrid 有一个竖直的滚动条。

flexScrollBoth 3 MSHFlexGrid 有水平和竖直的滚动条。这是缺省设置值。

Sort 属性

常数 值 描述

flexSortNone 0 无。不执行排序。

flexSortGenericAscending 1 一般升序。执行估计文本不管是字符串或者是数值的升序排序。

flexSortGenericDescending 2 一般降序。执行估计文本不管是字符串或者是数值的降序排序。

flexSortNumericAscending 3 数值升序。执行把字符串变换为数值的升序排序。

flexSortNumericDescending 4 数值降序。执行把字符串变换为数值的降序排序。

flexSortStringNoCaseAsending 5 字符串升序。执行不区分大小写字符串比较的升序排序。

flexSortNoCaseDescending 6 字符串降序。执行不区分大小写字符串比较的降序排序。

flexSortStringAscending 7 字符串升序。执行区分大小写字符串比较的升序排序。

flexSortStringDescending 8 字符串降序。执行区分大小写字符串比较的降序排序。

flexSortCustom 9 自定义，使用 Compare 事件比较行。

vb 6.0 小球打砖块

你可以加个timer

循环判断每一个command

具体判断为：

判断小球控件的top是否等于 command的top + command的高

同时小球的left 是否 = command 的 left

同时 小球的left 是否=command 的 left + command 的 宽

这样就可判断是否达到某一个

vb打砖块游戏代码的介绍就聊到这里吧，感谢你花时间阅读本站内容，更多关于打砖块游戏源码、vb打砖块游戏代码的信息别忘了在本站进行查找喔。