VB全自动洗衣机过程模拟.rar

VB模拟全自动洗衣机的整个洗衣过程，比如模拟抽水、洗衣、浸泡、脱水的各个过程，符合vb结构化程序的特点，简单易懂，也是一般小游戏的循环方式，部分代码说明： 　　Dim WarterHeight As Single '水高度 　　Dim DiBuH As Single '底部高度 　　Dim KGJiashui As Integer '进水开关 　　Dim KGChushui As Integer '出水开关 　　Dim shuiguanColor As Long '水管颜色 　　Dim shuiguanColorWarter As Long '水管有水时候的颜色 　　Dim J