-
在VB和DLL间传递字符串
所属栏目：[大数据] 日期：2020-12-16 热度：95
在VB和DLL间传递字符串 用VB调用VC编写的DLL时，必须注意参数的匹配。VC中的变量，都是采用的32位，而VB中的，很多是16位，这就要进行相应的转化。转化的法则很多地方都有。我这里建议大家尽量使用VB，VC中都有，而且一致的变量。比如long型和double型。如果[详细]
-
VB性能记录
所属栏目：[大数据] 日期：2020-12-16 热度：164
此贴专门用来记录，我在VB中写的测试程序，与测试代码 VERSION 5.00Begin VB.Form Form1 Caption = "Form1" ClientHeight = 6945 ClientLeft = 60 ClientTop = 345 ClientWidth = 9045 LinkTopic = "Form1" ScaleHeight = 6945 ScaleWidth = 9045 StartUpPos[详细]
-
VB VC 混合编程(dll)中 数组 的传入传出
所属栏目：[大数据] 日期：2020-12-16 热度：181
VB VC 混合编程(dll)中 数组 的传入传出 以前用到的神经网络都是在matlab中调的，而项目需要，要写个神经网络的算法，系统主界面是VB写的，在VB中做网络训练速度是不照的，用VB，VC的混合编程，但是一直被VB与Dll之间的数组传递这个难题所困扰，在网上搜了也[详细]
-
VB回调设置
所属栏目：[大数据] 日期：2020-12-16 热度：197
In VC++CPP文件：#define DLLEXPORT__declspec(dllexport) __stdcall#define CNAMEextern "C"typedef int(__stdcall *CBFUNC)(int);CNAME int DLLEXPORT F(CBFUNC p){return (*p)(10);}DEF文件：LIBRARY DllTestEXPORTSFIn VBForm窗体：Option ExplicitPriva[详细]
-
vb.net 枚举类型
所属栏目：[大数据] 日期：2020-12-16 热度：195
定义枚举类型 ： Enum 类型名称 成员名=表达式（常量） End Enum 创建一个一星期的 枚举类型 ： Module Module1 Enum days sunday = 0 monday = 1 yuesday = 2 wednesday = 3 thursday = 4 friday = 5 saturday = 6 End Enum Sub Main() Dim showday As days[详细]
-
vb.net 交错 处理 一年中的月份天数的输出
所属栏目：[大数据] 日期：2020-12-16 热度：145
处理一年中的月份天数的输出 知识点 ： 数组+交错 Module Module1 Sub Main() Dim calendars()() As Double = New Double(11)() {} Dim month As Integer Dim days As Integer Dim dayValue,i As Integer For month = 0 To 11 days = DateTime.DaysInMonth(Y[详细]
-
VB FSO.GetSpecialFolder 参数说明
所属栏目：[大数据] 日期：2020-12-16 热度：51
Set Fd = FSO.GetSpecialFolder(2) '0 Windows 文件夹，包含 Windows 操作系统安装的文件。 '1 System 文件夹，包含库、字体和设备驱动程序文件。 '2 Temp 文件夹，用于保存临时文件。可以在 TMP 环境变量中找到该文件夹的路径。 gStrSysPh = Fd.Path "Data[详细]
-
高手论声明VB.NET事件
所属栏目：[大数据] 日期：2020-12-16 热度：66
如果在运行线程后采用循环查询的方法显然影响了交互性，VB.NET事件是从线程方法返回数据的好方法，文章有详细的介绍。 AD： VB.NET经过长时间的发展，很多用户都很了解VB.NET事件了，这里我发表一下个人理解，和大家讨论讨论。调用了线程的start方法，并不能[详细]
-
VB.NET下的事件和委托
所属栏目：[大数据] 日期：2020-12-16 热度：123
本文依然给大家介绍事件和委托，只不过这次介绍的是VB.NET中的事件和委托。希望对大家有帮助，一起来看。 AD： 委托 是可用于调用其他对象方法的对象。它们有时被称为类型安全函数指针，因为它们与其他编程语言中所使用的函数指针相似。但不同于函数指针， V[详细]
-
vb组合查询
所属栏目：[大数据] 日期：2020-12-16 热度：60
在做机房收费系统的时候我遇到了很多的问题，这篇博客主要是想记录一下自己如何实现组合查询的。 对于组合查询，我用了一种很简单的方法去实现它--------字段组合（将用户选择的字段组合起来传入到sql中进行查询） 这个的难点其实这有两个： 第一个：如何将[详细]
-
两种去掉字符串中数字的方法（VB学习 备注）
所属栏目：[大数据] 日期：2020-12-16 热度：113
1、遍历每一个字符进行判断 Public Function DelNumber(ByVal s As String) As String Dim strL As Long Dim i As Long Dim strTemp As String On Error GoTo err strL = Len(s) DelNumber = "" For i = 0 To strL - 1 strTemp = Left(Right(s,strL - i),1)[详细]
-
vb_一个简单的小程序，输出一句话
所属栏目：[大数据] 日期：2020-12-16 热度：115
画一个command按钮，双击写下面代码： Private Sub Command1_Click()Print "我是一个小帅哥！"Print "是不是呀！"End Sub 效果1： 点我之后： 很简单吧！[详细]
-
VB.NET关闭窗体时最小化（附带解决.NET程序导致XP无法关机重启的
所属栏目：[大数据] 日期：2020-12-16 热度：142
我们经常需要实现“用户关闭窗体，但窗体并不关闭而是最小化”的功能，这个功能的实现非常简单，只需在FormClosing事件中写入如下代码即可： If e.CloseReason = CloseReason.UserClosing Then '判断是不是用户做出的关闭窗体的行为 e.Cancel = True'这句可[详细]
-
vb_一个简单的小程序·1
所属栏目：[大数据] 日期：2020-12-16 热度：194
Private Sub Command1_Click()Command1.Enabled = FalseCommand2.Enabled = TrueCommand3.Enabled = TruePrint "播放中"End SubPrivate Sub Command2_Click()Command2.Enabled = FalseCommand1.Enabled = TrueCommand3.Enabled = TruePrint "暂停中"End SubP[详细]
-
Vb与报表(一.什么是报表)
所属栏目：[大数据] 日期：2020-12-16 热度：126
Vb与报表(一.什么是报表) 做机房收费系统需要用到报表 , 和所有人一样 , 开始就没有报表的概念 , 只能一点点的来查 什么是报表 ? 报表 是企业管理的基本措施和途径，是企业的基本业务要求，报表可以帮助企业访问、格式化数据，并把数据信息以可靠和安全的方[详细]
-
vb.net 延迟时间
所属栏目：[大数据] 日期：2020-12-16 热度：126
在vb.net项目的windows窗体中,添加一个Timer控件 然后创造下面的方法 '延迟操作 'delayTime单位是毫秒,1000毫秒=1秒 Public Sub Delay(ByVal delayTime As Single) Dim timerCount As Single delayTime = delayTime / 1000 timerCount = Me.Timer1.Interval[详细]
-
使用Aspose.PDF更改PDF文件的内容
所属栏目：[大数据] 日期：2020-12-16 热度：85
来源：慧都控件网 http://www.evget.com/zh-CN/Info/catalog/18035.html Aspose.Pdf中含有一个PdfFileEditor类的ResizeContents方法，可以允许您调整PDF文件中的页面内容。ContentsResizeParameters类用于指定要使用的参数来调整这个页面。你可以使用ResizeC[详细]
-
VB.NET 机房收费系统V1.0总结
所属栏目：[大数据] 日期：2020-12-16 热度：50
从 2012 年 7 月 20 —— 2012 年 10 月 31 日经历了历时三个月的 .NET 机房收费系统开发。下面我从文档、 UML 图，代码这三个方面来进行总结。 一、文档 1.1 可行性分析报告和项目开发计划 这两个文档主要是确定软件系统是否值得开发，搞清楚问题的性质，确[详细]
-
vb实现二元一次复数方程求解
所属栏目：[大数据] 日期：2020-12-16 热度：95
Public Class MainForm Dim a,b,c,d,e1,f,g,h,k1,k1i,k2,k2i,x1,x2,y1,y2 As Single Dim D_,D1,D2,D3,D4 As Single Private Sub Form1_Load(ByVal sender As System.Object,ByVal e As System.EventArgs) Handles MyBase.Load txt_a.Text = "3" txt_b.Text =[详细]
-
VB6调用WebService、WCF
所属栏目：[大数据] 日期：2020-12-16 热度：58
'调用webservice。需要安装SoapToolkit30.EXE,并在工程中引用Microsoft Soap Type Library v3.0 Sub CallWebService() Dimm_spClient As New SoapClient30 'SoapClient30对象实例化 m_spClient.MSSoapInit "http://localhost/MCISWebService/vbtest.asmx?WSD[详细]
-
VB6 Com+部署问题
所属栏目：[大数据] 日期：2020-12-16 热度：167
COM/COM+远程匿名访问测试成功[转] 详细步骤！ 1、首先在VB中写一ActiveX(DLL)组件，工程名为COMTEST。编译后在另一程序中调用，确认组件工作正常。 2、打开“控制面板/管理/组件服务”，在“COM+应用程序”下利用“COM+应用程序安装向导”创建一个空的COM＋[详细]
-
vb读取xls文件而不打开excel进程 ado数据库方法读取xls
所属栏目：[大数据] 日期：2020-12-16 热度：122
'Read Excel File Using ADO Public Function Read_Excel _ (ByVal sFile _ As String) As ADODB.Recordset '函数参数 On Error GoTo fix_err '有错去fix_err那个标签 Dim rs As ADODB.Recordset '搞了个对象:) Set rs = New ADODB.Recordset '设置了个对象r[详细]
-
Vb与报表(二.创建报表模版)
所属栏目：[大数据] 日期：2020-12-16 热度：60
Vb与报表(二.创建报表模版) 创建模版我们使用的工具是 Grid++Report 5.2 , 下载安装到电脑上 . 然后就可以着手建立报表模版了 . 由于是报表菜鸟 , 所以对报表的使用只是初级入门阶段 , 我们报表模版体现的只是三点 , 时间的显示 , 数据的显示 , 还有标题或者[详细]
-
vb6文本框获得焦点问题
所属栏目：[大数据] 日期：2020-12-16 热度：118
好久不用vb6了，今天写个简单的程序，想使文本框在画面初期显示时获得焦点， 以为写个Text1.SetFocus就可以了，调试了却发现报错。 上网查了一些资料后，原来如下： 1.在页面初期化事件Form_Load中写Text1.SetFocus会报错，应该写 Text1.TabIndex = 0 2.在其[详细]
-
VB6升级到VB2010之一:变量升级~
所属栏目：[大数据] 日期：2020-12-16 热度：126
因为Visual Basic 2010已经对Integer (已升级为4字节)和Long(已升级成8字节)变量进行了升级，并增加了Short (2字节)类型。所以VB6升级到VB2010时需作如下修改： VB6 Integer === VB2010 Short VB6 Long === VB2010 Integer 当然，不修改也没关系，但是程式升[详细]
