-
物件匈牙利文標記法的命名慣例VB
所属栏目：[大数据] 日期：2020-12-16 热度：199
這是 Visual Basic 控制項和物件首碼提供參考做為使用一致的匈牙利文的表示法的清單。此清單的幫助標準化編碼樣式和應用程式的邏輯結構。 Object Prefix Example--------------------------------------------------------------------------Form frm frmFil[详细]
-
灵性的概念
所属栏目：[大数据] 日期：2020-12-16 热度：184
什么叫灵性？ java 603 000 000 C10,780,000,000 C++107,000 C#84,600,000 PHP 13,200,000Perl75,000 python97,000 VB1,230,000 javascript1,210,000 shell1,000 Ruby210,000[详细]
-
VB6.0中的窗口控制技巧（1）
所属栏目：[大数据] 日期：2020-12-16 热度：66
移动没有标题栏的窗口 我们一般是用鼠标按住窗口的标题栏，然后移动窗口，当窗口没有标题栏时，我们可以用下面的方法来移动窗口： 在 BAS 文件中声明： Declare Function ReleaseCapture Lib "user32" () As Long Declare Function SendMessage Lib "user32"[详细]
-
VB6.0中的窗口控制技巧（2）
所属栏目：[大数据] 日期：2020-12-16 热度：192
让窗口一直在上面 很多流行软件都有这样一个选项：Always on Top。它可以让窗口在最上面，别的窗口不能覆盖它。我们在 VB 中，可以使用下面的方法来实现： Private Const SWP_NOSIZE = H1 Private Const SWP_NOMOVE = H2 Private Const SWP_NOZORDER = H4 Pr[详细]
-
VB6.0中的窗口控制技巧（3）
所属栏目：[大数据] 日期：2020-12-16 热度：199
用Visual Basic设计更好的用户界面 有时在一个窗口中出现较多的控制件时，如果能向导式地建议用户下一步该做什么，不失为上策。 在Visual Basic的程序设计中，我们可以使用语句：Object.SetFaocus使我们希望的控件得到输入焦点，举个例子：在Form1中我们加入[详细]
-
VB的容错处理（完整）
所属栏目：[大数据] 日期：2020-12-16 热度：55
本文包括以下几节内容： 使用On Error语句 如何离开错误处理程序 定义错误常数 将错误处理程序单独存放 理解错误处理的范围 不要嵌套使用错误处理程序 使用On Error语句 Visual Basic程序使用On Error命令来登记错误处理程序，它有下面3种形式： On Error Go[详细]
-
窗体失去焦点事件浅谈
所属栏目：[大数据] 日期：2020-12-16 热度：113
从网上搜索到的方法，不敢独享。 ---- VB中有一个LostFocus事件和一个GotFocus事件，看名字似乎是当当前窗口失去焦点或得到焦点时触发的事件。但在实际应用时却发现当这个窗口和Windows中其他窗口进行切换时并没有触发这两个事件。现在解析一下这两个事件。[详细]
-
[MFC]ADO查询语句中的一个问题
所属栏目：[大数据] 日期：2020-12-16 热度：180
批量修改数据,肯定是要用UPDATE语句了 涉及到大于/等于/不等于的比较 只记录一个,不等于应该是(VB的)而不是!=(C的) 就因为这一个错我调试了好半天,终于好了~~~[详细]
-
[VB.net]Timer核心源代码(时间使者)
所属栏目：[大数据] 日期：2020-12-16 热度：151
这个程序用于定时操作。 其实这份代码个人觉得效率不够高，本人暂时没空优化，不好意思，那位朋友看后有建议的可以联系我。 mailto:wangjingkaibear@live.cn 以下是代码 原本是在Visual Basic 2008 环境下编写的，但回去时装了Visual Basic 2010，它把代码升[详细]
-
5000次掷骰子实验代码（VB）
所属栏目：[大数据] 日期：2020-12-16 热度：119
问问里曾经有人问到，我告诉了他思路。昨晚听讲座期间，我写了这段代码，哪位觉得有误谢谢指正。 代码按照VS2010规范编写。 假设按下Start1按钮开始。 假设有六个标签用于输出结果。（计数结果） Private Sub Start1_Click() Dim SZ1 as Integer '定义整形变[详细]
-
[VB.net]关于exe格式flash文件的播放器的剥除（11.01）(exe2swf
所属栏目：[大数据] 日期：2020-12-16 热度：141
经过几天的奋战,程序已经成形,现在给出源代码.基于Visual Studio 2010 + .net Framework 3.5，在Windows 7下调试通过。 以下是代码（写注释真的好烦）： Imports SystemImports System.IOPublic Class exe2swf Dim FPBB1 As Integer '定义一个变量用于保存Fl[详细]
-
[VB.net]关于exe格式flash文件的播放器的剥除（11.02）（exe2swf
所属栏目：[大数据] 日期：2020-12-16 热度：142
使用Flash Player 6.0 r4版播放器的文件删去前424961个字节 使用Flash Player 7.0 r14版播放器的文件删去987137个字节 使用Flash Player 8.0 r22版播放器的文件1581057个字节 使用Flash Player 9.0 r45版播放器的文件2447561个字节 使用Flash Player 9.0 r11[详细]
-
vb 用 xmlhttp 获取网站信息
所属栏目：[大数据] 日期：2020-12-16 热度：173
Public Function GetCode(CodeBase,Url) '第一个参数是设置编码方式(GB2312或UTF-8)第二个参数是地址. Dim xmlHTTP1 Set xmlHTTP1 = CreateObject("Microsoft.XMLHTTP") xmlHTTP1.Open "get",Url,True xmlHTTP1.send While xmlHTTP1.ReadyState 4 DoEvents W[详细]
-
vb like的用法
所属栏目：[大数据] 日期：2020-12-16 热度：157
vb like的用法 2007-04-05 12:52 Like运算符可以让你比较两个字符串来判断它们是否匹配，它还支持通配符。例如，星号（*）代表一个或者多个字符，问号（?）代表单个字符，而井号（#）代表单个数字。另外，通过使用左括号和右括号（[、]），你可以指定一个用[详细]
-
摘录的
所属栏目：[大数据] 日期：2020-12-16 热度：75
如果你想使用老 Rose 里面那种 UML 建模和代码生成的功能，推荐你使用 Rational Software Architect。具体的建模过程，有一个 Flash 的演示可以参考。请你到下面这页上去找一个名字叫“使用 Rational 软件交付平台的软件架构，设计与构建”的演示“第 2 部分[详细]
-
vb.net 视频前了解
所属栏目：[大数据] 日期：2020-12-16 热度：198
从去年的vb 6.0 到马上就要接触的vb.net我们正在逐步向前走 .下面我写下看视频前对vb.net的了解 首先 vB.net和我们前些阶段学习的VC#.net在功能上没有区别。编译以后生成的可执行文件被称为Assembly，即程序集。 程序集可以理解成exe或者 dll 文件,但是他们[详细]
-
人家的vb winsock 通讯
所属栏目：[大数据] 日期：2020-12-16 热度：177
'强人的api winsock Declare Function bind Lib " ws2_32.dll " (ByVal s As Long ,addr As SOCK_ADDR,ByVal namelen As Long ) As Long Declare Function closesocket Lib " ws2_32.dll " (ByVal s As Long ) As Long Declare Function connect Lib " ws2_3[详细]
-
vb.net中使用wmi关闭远程计算机上的进程
所属栏目：[大数据] 日期：2020-12-16 热度：75
最近学习了一点wmi知识,感觉还很好用,只是在结束远程计算机上的程序时花费了一些时间,在网上找了几天资料,发现大多数是用C#写的,要不就是脚本写的,其中有很多代码都把停止服务当做是结束进程,也有很多人只提供结束本地进程的,说是会写这个就很快会写结束远程[详细]
-
vb操作db2存储过程
所属栏目：[大数据] 日期：2020-12-16 热度：186
Dim db2Conn As New DB2Conn() db2Conn.cmd = db2Conn.con.CreateCommand() db2Conn.cmd.CommandType = System.Data.CommandType.StoredProcedure db2Conn.cmd.CommandText = "{ CALL DB2ADMIN.GENERATE_SPLITDATA_BY_PRECINCT(?) }" Dim p1 As Odbc.OdbcPar[详细]
-
平衡九进制
所属栏目：[大数据] 日期：2020-12-16 热度：170
想来想去还是把名字改成平衡九进制好, 平衡三进制的名字已经在网上了, 也省的我再乱命名, github上放了一份 ..https://github.com/jiyinyiyong/shuangsan0 之前的内容只能到我的网易博客看了, 怕转过来链接csdn把把我的博客封掉, 进入正题, 平衡九进制数的图[详细]
-
vb.net与vb的比较
所属栏目：[大数据] 日期：2020-12-16 热度：86
1. 在 vb6.0 中 , 创建对象的时候 , 需要等这个对象创建完毕后 , 再另外调用一个独立的方法对其进行初始化 . 在 vb.net 中 , 可以利用构造函数为对象赋初值 , 这样就不需要在急性繁琐的调用赋初值了 . 构造函数的使用 , 简化了编码的过程和出错的机会 . 2.vb[详细]
-
聊天机器人
所属栏目：[大数据] 日期：2020-12-16 热度：185
关于这个程序，以前在一本 vb.net 的书里看到过，背后有一个有趣的故事，是很久以前一个教授做出来玩的，谁知教授的一个女助手竟然把这程序当成一个真正的人来看待，甚至有时还背着教授自己偷偷在电脑前与这个机器人“聊天” . 这个是一个闹着玩的简化版聊天[详细]
-
VB的WebBrowser防止多iframe执行多次DocumentComplete事件
所属栏目：[大数据] 日期：2020-12-16 热度：195
Private Sub WebBrowser1_DocumentComplete( ByVal pDisp As Object ,URL As Variant ) If Not (pDisp Is WebBrowser1.Object) Then Exit Sub If URL =" http://www.xyserver.com " Then MsgBox “这个是我们需要的网址：http://www.xyserver.com” End If E[详细]
-
vb mscomm1串口通信接收发送十六进制数据
所属栏目：[大数据] 日期：2020-12-16 热度：95
Private Sub Command1_Click() Dim OutBuffer() As Byte Dim tem As Variant Dim e As Integer Dim q As Integer Dim LenOfText As Integer LenOfText = Len(txtSum.Text) / 2 - 1 ReDim OutBuffer(LenOfText) If MSComm1.PortOpen = False Then MSComm1.Por[详细]
-
vb 读取文件属性
所属栏目：[大数据] 日期：2020-12-16 热度：167
如果只是查看大[详细]
