vb学生管理系统源代码部分代码PublicUserNameAsStringPublictxtSQLAsString'usetostorerecordSQLsentencePublicdreamAsADODB.Recordset'usetostorerecordobjectPublicMsgtextAsString'用来存放返回信息PublicOKAsBoolean''PublicdbAsStringPublicSubhighlight()WithScreen.ActiveFormIf(TypeOf.ActiveControlIsTextBox)Then.ActiveControl.SelStart=0.ActiveControl.SelLength=Len(.ActiveControl)EndIfEndWithEndSubSubMain()'DimLoginAsNewLogin'Login.ShowvbModal'fNotLogin.OKThen'LoginFailedsoexitapp'End'EndIf'Unloadstudentmdi'Setlogin=Newloginlogin.ShowEndSubPublicFunctionconnectstring()AsStringconnectstring="Provider=Microsoft.jet.OLEDB.3.51;Datasource=f:\schoolgroup\school.mdb"EndFunctionPublicFunctionExecuteSQL(ByValSQLAsString,MsgstringAsString)AsADODB.RecordsetDimcnnAsADODB.ConnectionDimrstAsADODB.RecordsetDimsTokens()AsStringOnErrorGoToExecuteSQL_ErrorsTokens=Split(SQL)Setcnn=NewADODB.Connectioncnn.OpenconnectstringIfInStr("INSERT,DELETE,UPDATE",UCase$(sTokens(0)))Thencnn.ExecuteSQLMsgstring=sTokens(0)&"querysuccessful"ElseSetrst=NewADODB.Recordsetrst.OpenTrim(SQL),cnn,adOpenKeyset,adLockOptimisticSetExecuteSQL=rstMsgstring="查询到"&rst.RecordCount&"条记录"EndIfexecuteSQL_exit:Setrst=NothingSetcnn=NothingExitFunctionExecuteSQL_Error:Msgstring="查询错误："&err.DescriptionResumeexecuteSQL_exitEndFunctionPublicFunctionTesttxt(txtAsString)AsBooleanIfTrim(txt)=""ThenTesttxt=FalseElseTesttxt=TrueEndIfEndFunction

VBModbusRTU源码,其中协议部分已生成DLL,可直接调用

压缩包:MD5skey8位加密（文件）.zip列表MD5skey8位加密（文件）/MD5skey8位加密（文件）/bin/MD5skey8位加密（文件）/Form1.Designer.vbMD5skey8位加密（文件）/Form1.resxMD5skey8位加密（文件）/Form1.vbMD5skey8位加密（文件）/MD5skey8位加密（文件）.vbprojMD5skey8位加密（文件）/MD5skey8位加密（文件）.vbproj.userMD5skey8位加密（文件）/MyProject/MD5skey8位加密（文件）/MyProject/Application.Designer.vbMD5skey8位加密（文件）/MyProject/Application.myappMD5skey8位加密（文件）/MyProject/AssemblyInfo.vbMD5skey8位加密（文件）/MyProject/Resources.Designer.vbMD5skey8位加密（文件）/MyProject/Resources.resxMD5skey8位加密（文件）/MyProject/Settings.Designer.vbMD5skey8位加密（文件）/MyProject/Settings.settingsMD5skey8位加密（文件）/obj/MD5skey8位加密（文件）/obj/Debug/MD5skey8位加密（文件）/obj/Debug/CoreCompileInputs.cacheMD5skey8位加密（文件）/obj/Debug/DesignTimeResolveAssemblyReferences.cacheMD5skey8位加密（文件）/obj/Debug/DesignTimeResolveAssemblyReferencesInput.cacheMD5skey8位加密（文件）/obj/Debug/MD5skey8位加密（文件）.exeMD5skey8位加密（文件）/obj/Debug/MD5skey8位加密（文件）.pdbMD5skey8位加密（文件）/obj/Debug/MD5skey8位加密（文件）.vbproj.FileListAbsolute.txtMD5skey8位加密（文件）/obj/Debug/MD5skey8位加密（文件）.vbproj.GenerateResource.CacheMD5skey8位加密（文件）/obj/Debug/MD5skey8位加密（文件）.vbprojResolveAssemblyReference.cacheMD5skey8位加密（文件）/obj/Debug/MD5skey8位加密（文件）.xmlMD5skey8位加密（文件）/obj/Debug/TempPE/MD5skey8位加密（文件）/obj/Debug/TempPE/MyProject.Resources.Designer.vb.dllMD5skey8位加密（文件）/obj/Debug/WindowsApplication1.exeMD5skey8位加密（文件）/obj/Debug/WindowsApplication1.Form1.resourcesMD5skey8位加密（文件）/obj/Debug/WindowsApplication1.pdbMD5skey8位加密（文件）/obj/Debug/WindowsApplication1.Resources.resourcesMD5skey8位加密（文件）/obj/Debug/WindowsApplication1.vbproj.FileListAbsolute.txtMD5skey8位加密（文件）/obj/Debug/WindowsApplication1.vbproj.GenerateResource.CacheMD5skey8位加密（文件）/obj/Debug/WindowsApplication1.xmlMD5skey8位加密（文件）/obj/Release/MD5skey8位加密（文件）.slnMD5skey8位加密（文件）.v11.suo

DARTEL是由FIL的JohnAshburner最新开发的，一组用于被试间脑图像配准的算法和工具。
相对于SPM原有被试间配准方法，该方法可以获得更搞精度的被试间配准。
FIL内部使用经验表明，基于DARTEL进行VBM分析既可以获得更精确定位(localization)，又可以提高敏感性(sensitivity)。
下边对如何使用DARTEL做VBM分析进行逐步说明。

自编串口通讯小法度圭表标准（基于VBMSCOMM控件）

结合《开放型MODBUS-TCP规范（中文版）》手册，开发环境：VisualBasicV6.0sp6，使用Winsocket控件开发的modbus客户端，然后结合modbus服务器仿真软件（modbuspoll和modscan32），进行离线仿真应对Modbus服务器的请求，可同时响应多个modbus服务器的请求。
需要的童鞋们，自行下载喽，下载资源分会有些高，毕竟花了不少心血嘛，\(^o^)/~附件中包括VBmodbusTCP源码，以及可执行文件。
有什么疑问或建议，请下载后在评价中写出，或给我发信息，谢谢。

源码，可以将YUV转换成BMP，也可以将BMP转换为YUV，c#工程，但转换部分为纯c/c++实现，可以直接移植出。

（含源码及报告）本程序分析了自2016年到2021年（外加）每年我国原油加工的产量，并且分析了2020年全国各地区原油加工量等，含饼状图，柱状图，折线图，数据在地图上显示。
运转本程序需要requests、bs4、csv、pandas、matplotlib、pyecharts库的支持，如果缺少某库请自行安装后再运转。
文件含6个excel表，若干个csv文件以及一个名字为render的html文件（需要用浏览器打开），直观的数据处理部分是图片以及html文件，可在地图中显示，数据处理的是excel文件。
不懂可以扫文件中二维码在QQ里面问。

在日常工作中，钉钉打卡成了我生活中不可或缺的一部分。然而，有时候这个看似简单的任务却给我带来了不少烦恼。 每天早晚，我总是得牢记打开钉钉应用，点击"工作台"，再找到"考勤打卡"进行签到。有时候因为工作忙碌，会忘记打卡，导致考勤异常，影响当月的工作评价。而且，由于我使用的是苹果手机，有时候系统更新后，钉钉的某些功能会出现异常，使得打卡变得更加麻烦。 另外，我的家人使用的是安卓手机，他们也经常抱怨钉钉打卡的繁琐。尤其是对于那些不太熟悉手机操作的长辈来说，每次打卡都是一次挑战。他们总是担心自己会操作失误，导致打卡失败。 为了解决这些烦恼，我开始思考是否可以通过编写一个全自动化脚本来实现钉钉打卡。经过一段时间的摸索和学习，我终于成功编写出了一个适用于苹果和安卓系统的钉钉打卡脚本。