俄罗斯方块 vc 方块有颜色 功能完善 /* * 本类为小正方形方块实体类 * 每个block由四个颜色相同的square组成 */ class Square { public Point location; public Size size; public Color foreColor; public Color backColor;
1 , vb5dialog.zipThis demonstrates how to subclass the Common Dialog Dialogs and manipulate a specific Dialog.2 , cpnl.zipForm_Taskbar is a control for Visual Basic which, once placed onto a form, makes the form act like the Taskbar (minus the Start
多媒体游戏--贪吃蛇代码 Private Sub DaJie(PosX, PosY) '打劫 Static Pcolor, DJ As Single With PctQiPan If Not H_B Then Pcolor = RGB(0, 0, 0) '用RGB函数设置颜色为白色 Else Pcolor = RGB(255, 255, 255) '用RGB函数设置颜色为黑色 End If DJ = 0 If PosX = 1 And PosY = 1 Then '如果下的子在左上角第一个点的
用vb编写的函数作图软件的代码: Const Pi = 3.1415926535 '定义圆周率 Dim a, wor '定义用于在Picture1上的一个位置打印字符函数 Private Function PrintWord(X, Y, Word As String) With Picture1 .CurrentX = X .CurrentY = Y .ForeColor = RGB(0, 0, 255) End With Picture1.Print Word End Function '定