电子密码锁彩屏显示 #include "ILI9325.h" #include "key.h" #include "gui.h" #include "eeprom.h" #include "passwd.h" #incl
基于VB6.0公交查询系统上位机 rivateSubcmdAdd_Click() Dimstr1AsString DimcnnAsNewADODB.Connection'数据库连接 IfcmdAdd.Caption="新增"Then'按钮为“新增”状态 cmdAdd.Caption="保存"'修改按钮标题为“保存”,提示用户保存数据
基于VB6.0摄像头监视系统 PrivateSubMDIForm_Load()Me.Left=GetSetting(App.Title,"Settings","MainLeft",1000)'设置窗体左边坐标Me.Top=GetSetting(App.Title,"Settings","MainTop",1000)'设置窗体顶端
坦克循迹打靶 #include #include #include #include #include #include"1602.h" #include"delay.h" unsigned char second=0; unsigned int T1C1_Val=4000; //设置初始pwm占空比 60000
基于VB60学生管理系统设计 基于VB6.0学生管理系统设计 Public UserName As String Sub Main() Dim newlogin As New Login '声明 newlogin.Show 1 If Not newlogin.Okf Then End End If Unload newlogin