-
vb，我想对你说，垃圾
所属栏目：[百科] 日期：2020-12-17 热度：160
最近做一个项目是vb方面的，vb6.0写的程序，除了分析底层，也写了程序，觉得vb确实不靠谱。vb写小程序还是可能。计算量一大，就不行了。 vb解析型语言效率低，用了很多msvbvm函数，不停地穿越到vbvm虚拟机函数，效率很低，比如for循环，就用了__vbaVarForIni[详细]
-
VB,VC开发OPC客户程序必读!
所属栏目：[百科] 日期：2020-12-17 热度：73
开发OPC客户程序必读!!!!!!!!! Step.1 如果程序要调用COM 库的某一个函数必须先登录COM 函数CoInitialize()可 以完成此功能从函数CoGetMalloc()可以得到一个指向COM 内存管理接口的指 针 HRESULT rl; rl=CoInitialize(NULL); rl=CoGetMalloc(MEMCTX_TASK,g_p[详细]
-
机房收费系统—抽象工厂+反射+配置文件
所属栏目：[百科] 日期：2020-12-17 热度：98
第一次接触 反射+抽象工厂的数据访问程序是在大话设计模式的154页，反射+配置文件实现数据访问程序是在大话设计的157页，而我第一次使用配置文件+反射+抽象工厂就是在机房收费系统个人重构。 大鸟说过：反射技术用来去除switch或if，解除分之判断带来的耦合[详细]
-
小技巧:VB.NET中让光标停在TextBox的最后一个字符后
所属栏目：[百科] 日期：2020-12-17 热度：154
如题：下面三句即可解决问题 TextBox1.SelectionStart = TextBox1.Text.Length ’文本的选取长度 TextBox1.ScrollToCaret() '关键之语句：将焦点滚动到文本内容后 TextBox1.Focus()[详细]
-
VB.Net程序设计:XPTable注意点HeaderHeight和RowHeight
所属栏目：[百科] 日期：2020-12-17 热度：183
XPTable中的ColumnModel和TableModel注意点： XPTable在填充数据后，如果数据比较多。鼠标滚动时候，特别是向上滚动，有时候显示的数据的行数会有异常，有时候很多空白，选中的行也不对，会乱跳。 困扰好久的问题。 后来发现是由于CoumnModel和TableModel的[详细]
-
VB.NET写支持UAC功能的程序
所属栏目：[百科] 日期：2020-12-17 热度：113
打开程序属性，查看app.manifest文件，其内容一般如下： ? xml version = " 1.0 " encoding = " utf-8 " ? asmv1:assembly manifestVersion = " 1.0 " xmlns = " urn:schemas-microsoft-com:asm.v1 " xmlns:asmv1 = " urn:schemas-microsoft-com:asm.v1 " xm[详细]
-
职责链模式+策略模式+反射,完美实现下机操作(一)
所属栏目：[百科] 日期：2020-12-17 热度：130
纵观机房收费系统，逻辑最复杂的也就是下机操作了，这几天一直在考虑下机操作该如何进行。 流程分析： 判断卡号是否存在与是否上机 上机时间的处理 根据时间计算消费金额 更新余额，添加记录 关于逻辑的操作主要集中在两个计算上面时间和金额。首先说上机时[详细]
-
函数重载
所属栏目：[百科] 日期：2020-12-17 热度：90
函数重载的内容不是很多，我也就用过其中一种，其他的或者深奥些的，还没用过，但是大概看了一下，都大同小异吧，用一句话说就是：同一个名称的东西却有着不同的用途。 就拿我比较熟悉的VB.NET来说吧，当你调用一个系统的函数时，如果他是一个重载了的函数，[详细]
-
三层VB.NET实例
所属栏目：[百科] 日期：2020-12-17 热度：197
之前三层的理论已经给大家讲的差不多 了，现在用我们的理论加上我们的实践，来实现一个三层的小例子。 现在来为大家实现一个登录的实例。首先，创建我们的数据库： 设计两个表： 创建此数据库的目的是：用户实现登陆后，要在Score表中自动添加积分。 之后运[详细]
-
VB.NET之旅-三层架构之登陆
所属栏目：[百科] 日期：2020-12-17 热度：130
初接触三层 三层是指显示层，业务逻辑层，数据访问层，是为“高内聚，低耦合”服务的 除了上述三层之外，一个程序中必须要有的还有实体层，我的理解是实体层中的实体是与数据库中的表相对的，而实体的属性是与数据表中字段相对的，大家还可以根据需要加入外[详细]
-
一步一步挖出Compute
所属栏目：[百科] 日期：2020-12-17 热度：157
前几天在做结账的时候，对数据表DataGridView控件的单列求和纠结了一番。 现在几乎养成了习惯，对于一些东西疏于开始的思考，不会先想到百度，这里我是先想到了第一版的机房收费那块的结账求和： 截取了充值金额片段，代码如下： '读取充值金额 strSQL = "se[详细]
-
VB.NET版机房收费系统---报表
所属栏目：[百科] 日期：2020-12-17 热度：134
报表，即报告情况的表格，简单的说：报表就是用表格、图表等格式来动态显示数据，可以用公式表示为：“报表 = 多样的格式 + 动态的数据”。 在没有计算机以前，人们利用纸和笔来记录数据。 比如：民间常常说的豆腐帐，就是卖豆腐的每天将自己的卖出的豆腐记[详细]
-
VB.NET版机房收费系统---SqlHelper
所属栏目：[百科] 日期：2020-12-17 热度：192
SqlHelper，最早接触这个词儿的时候，好像是13年的暑假，那个夏天来的比往年来的稍晚一些，呵呵，sqlhelper，翻译成中文就是数据库助手，帮手。百度百科这样对她进行阐述： SqlHelper是一个基于.NET Framework的数据库操作组件。组件中包含数据库操作方法。S[详细]
-
VB处理XML（忽略节点大小写）
所属栏目：[百科] 日期：2020-12-17 热度：57
'引入Microsoft XML v4.0''有如下示例:''一般处理:'把得到的字符串全部转为大写，处理这样可以得到。但是里面的值也变成大写了。Command1_Click'可以得到Code的集合，但这种方法会把节点里面的值也处理为大写，如果对里面的内容业务上大小写敏感的话就不适用[详细]
-
职责链模式+策略模式+反射,完美实现下机操作(二)
所属栏目：[百科] 日期：2020-12-17 热度：59
上篇博客中介绍了如何应用职责链模式对上机时间进行处理，现在时间得到了，该怎么利用上机时间计算出上机消费金额呢？ 策略模式（ Stra tegy ） : 它定义了算法家族，分别封装起来，让它们之间可以互相替换，此模式让算法的变化不会影响到算法的客户。 这么[详细]
-
vb中MSFlexgrid 和 MSHFlexgrid 的区别以及详解
所属栏目：[百科] 日期：2020-12-17 热度：147
简单地说,MSFlexGrid和MSHFlexGrid之间的区别，主要是后者支持ADO的层次显示。如果你不使用ADO，可以考虑MSFlexGrid，否则建议使用MSHFlexGrid。 这两个控件的详解: MSFlexGrid控件 MicrosoftFlexGrid(MSFlexGrid)控件可以显示网格数据，也可以对其进行操作[详细]
-
VB.NET版机房收费系统---七仙女之系统登录
所属栏目：[百科] 日期：2020-12-17 热度：95
VB.NET第一版机房收费系统，告一段落，验收的时候，问题也是大大的存在，没有用上设计模式，什么触发器，存储过程，都没有用上，看看其她小伙伴的，七层实现登录？那是什么东东，相比较我的三层而言，多了两倍还加个一，通过查资料，看博客，憋了好几天，终[详细]
-
VB.NET连接Office Access数据库显示列表数据
所属栏目：[百科] 日期：2020-12-17 热度：199
VB.NET连接Access数据库，显示数据列表 Try Dim Apppath As String = Application.StartupPath '获取启动了应用程序的可执行文件的路径，不包括可执行文件的名称 Dim DatabasePath As String = Apppath "MyTest.mdb;" '数据库文件总路径名 Dim ConnString A[详细]
-
机房收费系统5之视图
所属栏目：[百科] 日期：2020-12-17 热度：195
最近遇到了查两个表的情况，首先我想到的是用存储过程，但是如果需要两个查询结果的值的话，必须 根据存储过程查询语句的顺序取你要的Table ，例如 DataSet.Tables[0] ， DataSet.Table[1] 来获取想要的 Table 值，比较麻烦。早就听说视图了，想着可能比存储[详细]
-
VB 6.0中判断是否Access 2010中存在指定表格
所属栏目：[百科] 日期：2020-12-17 热度：109
问题 最近在工作中遇到使用VB6判断是否ACCESS 2010数据库中是否存在指定表格的问题。对于早期ACCESS数据库（应当主要是ACCESS 2003及以前版本），使用DAO引擎操作是没有问题的。主要相关代码如下： For Each mytable In mydatabase.TableDefs print mytable.[详细]
-
vb.net 注意问题
所属栏目：[百科] 日期：2020-12-17 热度：149
1.关于select select case user case "1" or case "2" 不知道为什么case 不能有or,虽然语法没错，但是本条语句不会执行，必须 分开写，case "1 " case "2" case "3"[详细]
-
用vb.net做分页显示的功能
所属栏目：[百科] 日期：2020-12-17 热度：151
（ 1 ）首先定义几个变量 Dim pageIndex As Integer Dim pageSize Integer =20 Dim totalPage Dim totalRecord （ 2 ）然后写显示页码的函数 Sub xianShiYeMa() Dim leiBie1 String =Request( "leiBie" ) pageIndex=Request( "pageIndex" ) Dim i ' 第一次访[详细]
-
2012.12.16vb.net中总结一下关于表单提交类的东西
所属栏目：[百科] 日期：2020-12-17 热度：73
（ 1 ）首先在客户端验证一下，即用按钮的 onClientClick 在 js 中验证一下，对于验证一般是验证其是否符合其正则表达式或者是否能为空，然后在服务器端再验证，验证是否为空之类的，最后做插入，删除的数据库处理。 （ 2 ）在 vb.net 中对数据库做读取处理[详细]
-
vb.net制作简单的下拉菜单：
所属栏目：[百科] 日期：2020-12-17 热度：170
（ 1 ）首先写两个 js 函数，获得页面中需要获得点的 x ， y 坐标（如果是已经确定该点的位置，则可以不写）： function pageX(elem){ return elem.offsetParent?(elem.offsetLeft+PageX(elem.offsetParent)):elem.offsetLeft; } function pageY(elem){ retu[详细]
-
VB中字符串常数
所属栏目：[百科] 日期：2020-12-17 热度：141
Since these constants are built into VBScript,you don't have to define them before using them. Use them anywhere in your code to represent the values shown for each. Constant Value Description Translate vbCr Chr(13) Carriage return. 回车符[详细]
