李光 未来科技

前言 这篇博客认认真真的总结了一天，不能够理解机房还有学生中模块的代码的意思，决定去解决一下这部分内容，下面就是我对此部分的代码的理解!感觉这部分的代码不过如此，下来跟着我一起搞懂它吧！Public Function ExecuteSQL(ByVal SQL As String, MsgString As String) As ADODB.Recordset '传递参数sql传递查询语句，msg

前言登录的窗体设计需要注意的细节问题也是比较多的，于是专门总结了此篇博客一、流程图二、退出登录的细节问题 1、没有考虑到同时会有两个用户同时登录 2、退出登录的时候没有考虑全面第一个：第二个：无论是点击了退出按钮，还是点击了那个红叉，都是退出，数据都要同步到worklog表，同时删除onwork表的相关信息！

msflexgrid选中不连续的行

前言：机房收费系统的结账花了我四天的时间，终于将其整明白了，从中有非常多的心得体会，下来分享给大家！1、流程图流程图是特别关键的一步，它代表了你整体的思路！（期中checkweek与checkday整体都差不多，所以整篇文章以日结账单为说明）2、汇总思路 售卡张数=购卡选项卡的记录总数 退卡张数=退卡选项卡的记录总数 总售卡数=售卡张数-退卡张数 退卡金额=要结账的操作员在CancelC

前言组合查询这部分内容花费了我好几天，不过收获的真是非常的多！里面有好多的思想和大家分享一下！ （一）流程图 做项目之前一定要理清思路，流程图就是一个非常好的办法，processon就是一个额很好的画图工具，大家可以尝试一下！（二）、部分代码展示1、定义函数field，这里的case的作用与if else其实作用是一样的，但是这样写更加方便了！Public Function field(i A

前言清屏有的时候需要写很多代码，今天在做组合查询的时候，发现好多文本框的内容都需要清除，于是上网找到了快速清除窗体上控件内容的方法1、代码Dim ctl As Control '定义一个变量，把任何控件装载到里面 '删除所有text文本框内容For Each ctl In Controls If TypeOf ctl Is textbox Then ctl.Text = ""

在机房收费系统中，将vb中的数据导出到excel表格真的很重要，在这里遇到了各种各样的问题，下来和我一起来解决它吧！！一、前期准备工作在解决问题之前，我先声明一下，我的是office 2013，有些版本不一样，只会有一点点差别，只需要模仿就好！1、点击工程——引用，去找到microsoft excel 15.0 object library，打上勾就好！2、如果此时你的引用里没有microsoft

前言：遇到不懂的，就去查，现在查的多了，以后自然就快了，接下来大家一起来和我看看 sub main在vb中的作用吧！一、sub main的理论知识1、设置启动窗体。我们在做程序中，一般第一个窗体就是你的启动窗体，但是有些时候我们需要固定好第一个启动窗体具体是哪一个！如果想在应用程序启动时显示别的窗体，那么就得改变启动窗体。要改变启动窗体，请按照以下步骤执行： 从“工程”

前言：今天在敲机房的时候遇到了vbmodal这个代码，于是就上网上查了查，发现了不怕不知道，就怕不知道的真谛，查完了，就什么都不是事了！窗体分为模式的，和非模式的1、模式的（vbmodal就是模式的）用户只能使用当前窗体，只有当当前的窗体关闭后，其它的窗体才能使用。比如我们的msgbox, 它就是这样一个窗体！下来给大家展示一下！代码： MsgBox “卡号不能为空，请输入卡号！”, vbOKOnl