小球四壁碰撞程序、弹球游戏程序之类的，或者是人工智能【比如问“年龄”，就回答几岁】之类，这些简单、实用、有趣

整人的小程序，会弹出对话框提示：快说我是猪，不输入的话会在1分钟之内自动关机，输入的话，当让会被笑话啦，呵呵将以下文字粘贴到记事本上后将后缀名改为:vbe,然后双击即可!(里面的那些词语可以自行修改)，经测试肯定...

MsgBox"BS贪食蛇:一个规则最简单的趣味游戏,您将用键盘"&Chr(13)&_"上的4个方向键来控制蛇的运动方向。在运动过程中蛇"&Chr(13)&_"不能后退,蛇的头部也不能接触到运动区域的边线以外"&Chr(13)&_"和蛇...

窗体放两个Label控件，一个Timer控件：DimnAsIntegerPrivateSubForm_KeyDown(KeyCodeAsInteger,ShiftAsInteger)SelectCaseKeyCodeCasevbKeyUpIfLabel1.Top>0ThenLabel1.Top=Label1.Top-50...

min=Text2.Textsec=Text3.TextTimer2.Enabled=FalseEndSubPrivateSubCommand2_Click()EndEndSubPrivateSubForm_Load()Form1.BackColor=&HFFFF00Timer1.Enabled=FalseTimer1.Interval=...

在窗体添加3个文本框、一个Label和一个按钮，不要修改他们的名称，然后写代码如下：PrivateSubCommand1_Click()DimHAsSingle,MAsSingle,NAsSingle,TAsSingleH=Text1.textM=Text2.textN=Text3.text...

WSHshellA.run"cmd.exe/cshutdown-r-t60-c""说我是猪，不说我是猪就一分钟关你机，不信，试试···""",0,truedimadowhile(a<>"我是猪")a=inputbox("说我是猪,就不关机，快...

开始学vb时,并不知道vb可以做出动画,后来知道通过自编的子函数delay(c的库函数中的该函数)和cls可以做出许多动画,但有一个缺点就是太耗内存,就我个人认为构思应该比编程重要，因为一旦有了一个很好的构思剩下的问题都是...

新建一个文本框Text1,Text属性为空，MultiLine属性为True，ScrollBars属性为2。新建一个命令按钮Command1,添加以下代码：PrivateSubCommand1_Click()DimiAsIntegerFori=1To100If(iMod5=0)And(i...

OptionExplicitPrivateSubForm_Load()RandomizeLabel1.Caption=Int((Rnd*(999999-100000+1))+100000)'生成100000-999999之间的随机数Timer1.Interval=1000'一秒一次Timer1....