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
2024/4/26 9:34:11 210KB vb 学生 管理系统
1
聂大佬的聚类代码【自适应近邻聚类代码】
2024/4/26 8:43:44 12.3MB matlab clustering
1
论文+翻译+PPT+代码+动画视频PoseCNN:AConvolutionalNeuralNetworkfor6DObjectPoseEstimationinClutteredScenes;
 机器人与现实世界进行交互时,对已知目标的6D姿态估计至关重要。
由于对象的多样性,以及由于对象之间的杂波和遮挡而导致场景的复杂性,使得该问题具有挑战性。
本文介绍了一种用于6D目标姿态估计的新型卷积神经网络PoseCNN。
PoseCNN通过在图像中定位物体的中心并预测其与摄像机的距离来估计物体的三维平移。
通过回归到四元数(w,x,y,z)表示来估计物体的三维旋转。
2024/4/26 2:23:44 26.44MB 6D Pose ICP
1
有三种构造方法publicAddAndSubView(Contextcontext)//EditText中数值初始化为0publicAddAndSubView(Contextcontext,intnum)//带初始值构造publicAddAndSubView(Contextcontext,AttributeSetattrs)
2024/4/26 0:56:22 4.73MB android studio
1
mac10.13没有telnet最简单的安装方法装回来的办法:根本不需要brewinstalltelnet啥的还得安装brew其实最简单的办法就是直接把mac的12版本中/usr/bin/下的telnet可执行文件扔到macOSHighSierra13下的/usr/bin/下即可
2024/4/25 21:21:10 46KB macOS telnet
1
tiger语言的语法手册,拿《ModernCompiler》做编译原理课程设计的必备哦~~~
2024/4/25 18:46:13 56KB Tiger 编译原理 语法 手册
1
相对于CnComm1.5的修正版,及将放在CppBlog的勘误放入头文件,版本定位CnComm1.51
2024/4/25 18:56:31 16KB CnComm 1.51 串口
1
一个完整放射治疗病例DICOM文件(含图像和治疗计划)
2024/4/25 16:02:51 8.5MB 放射治疗 DICOM
1
小象学院邹博机器学习课程全部ppt与代码实现,内容详细,代码清楚,机器学习必备。
2024/4/25 16:16:51 169.35MB 机器学习 邹波
1
由于bundleadjustment算法计算复杂度高,时间花费过多,所以选择了sparsebundleadjustment,该算法可参考multipleviewgeometryincomputervision书中的附录6,另外这个文件也包含一篇介绍parsebundleadjustment以及如何使用该代码的文档
2024/4/25 16:29:40 644KB bundle adjustment
1
在日常工作中,钉钉打卡成了我生活中不可或缺的一部分。然而,有时候这个看似简单的任务却给我带来了不少烦恼。 每天早晚,我总是得牢记打开钉钉应用,点击"工作台",再找到"考勤打卡"进行签到。有时候因为工作忙碌,会忘记打卡,导致考勤异常,影响当月的工作评价。而且,由于我使用的是苹果手机,有时候系统更新后,钉钉的某些功能会出现异常,使得打卡变得更加麻烦。 另外,我的家人使用的是安卓手机,他们也经常抱怨钉钉打卡的繁琐。尤其是对于那些不太熟悉手机操作的长辈来说,每次打卡都是一次挑战。他们总是担心自己会操作失误,导致打卡失败。 为了解决这些烦恼,我开始思考是否可以通过编写一个全自动化脚本来实现钉钉打卡。经过一段时间的摸索和学习,我终于成功编写出了一个适用于苹果和安卓系统的钉钉打卡脚本。
2024-04-09 15:03 15KB 钉钉 钉钉打卡