
Visual Basic
文章平均质量分 60
方承司南
要么读书,要么旅行,身体和灵魂总有一个在路上
展开
-
VB打开CHM文件的几种方法
一个应用程序不论编制得如何完美,在很多情况下用户还是会对如何使用它提出问题。 Visual Basic 提供了对两种不同帮助系统的支持:传统的 Windows 帮助系统 (WinHelp)和新的 HTML 帮助(CHM帮助)。当我们制作好帮助文件后,就需要在程序的适当位置编写代码进行调用,本文将讨论几种在程序中调用CHM帮助文件的方法。 方法一 使用F1键:这种方法最简单,只需如下代转载 2006-09-19 12:11:00 · 869 阅读 · 0 评论 -
VB下自动选择所有文本并切换默认输入法
<br />Public Sub RunGotFocus(pInternat As Boolean)<br /> On Error Resume Next<br /> <br /> pControl = ActiveControl.Name<br /> AutoSelect Controls(pControl)<br /> If pInternat = True Then<br /> Internat Controls(pControl), True<br />原创 2011-04-23 11:15:00 · 1166 阅读 · 0 评论 -
vb使用ADO连接SQL Server
Private Sub CmdLink_Click()MousePointer = 13Dim Ptime 此变量用于测试程序启动时间Ptime原创 2009-05-09 09:55:00 · 936 阅读 · 0 评论 -
压缩和修复mdb数据库的方法
再给大家介绍3种 压缩和修复数据库 的方法方法 1:使用 DAO 物件 ( Data Access Object )設定引用項目 Microsoft DAO x.x Object Library目前 DAO 物件有 3.51 版的 Microsoft DAO 3.5 Object Library ( For Access 97 以前的 MDB ) 及 3.6 版 Microsoft转载 2008-05-17 15:21:00 · 5008 阅读 · 1 评论 -
通信控件MSComm使用详解
VB利用MSCOMM控件通过gsm modem发送短消息! 2006-12-07 11:44:57 Thu | 阅读(40)次 MSComm1.Settings = "9600,N,8,1" 9600波特,无奇偶校验,8位数据,一个停止位 MSComm1.InputLen = 0 读入整个缓冲区 If MSComm1.PortOpen = False Then MSComm1.Por转载 2008-05-17 15:19:00 · 3469 阅读 · 1 评论 -
MSFlexGrid 使用技巧
对齐方式 语法: object.cellpicturealignmen[=value] value为: flexalignlefttop 0 左边顶端对齐 :以下照英文译过来就可以了,时间 是 有限的嘛 flexalignleftcenter原创 2008-05-17 15:16:00 · 2579 阅读 · 1 评论 -
用VB操作INI文件
一、实现方法如下:1、新建一个工程/窗体(窗体取名为ini.frm),在此窗体中添加三个命令按钮控件,分别为command1、command2、command3command1.Caption= "write"command2.Caption= "read"command3.Caption= "End"2、代码部分:Private Declare Function GetPrivatePr转载 2008-01-22 13:06:00 · 1286 阅读 · 0 评论 -
如何将VB中的数据导出excel,word中去!
VB: 怎样将查询结果导出到Excel 如果你想将查询结果导出到Excel另存,以便日后查看或打印的话,那么我这里说的就是怎样将查询结果导出到Excel。先来写一个函数FillDataArray,该函数的主要作用是将查询语句中的字段名和查到的记录导入到Excel中。 Public Function FillDataArray(asArray(), adoRS As ADODB.转载 2007-09-22 10:19:00 · 8238 阅读 · 1 评论 -
Visual Basic 基本控件属性说明之一二
Label控件Label 控件主要用于在窗体中显示提示信息,常与Text控件一起使用。 属性: Caption 表示标签的内容。例:Label1.Caption="N&ame:"控件在窗体中显示Name:,&号跟的字母是快捷键字母,即当我们按下Alt+A时,Label1的Click事件将会发生。这种快捷键定义方法对于菜单和许多其它控件同样适用。 Font 表示控转载 2007-04-20 17:12:00 · 2619 阅读 · 0 评论 -
ADO的建立连结
ADO的建立连结ADO的连结主要可分成透过OLE DB Privder的方式与OLE DB Provider for ODBC,前者很明显的是Microsoft公司极力发展的方式,据说它比透过ODBC的方式快且所需资源少,但实际上如何,几年之後就可很清楚了。不过目前有Privder提供OLE DB介面者尚没有非常多,但提供ODBC介面者就很多了,在只有ODBC Driver之下转载 2007-04-20 17:08:00 · 838 阅读 · 0 评论 -
RDO和VB数据库编程
RDO的发展 远程数据对象 (Remote Data Object ,简称RDO) 是位于 ODBC API 之上的一个对象模型薄层,它依赖 ODBC API、选定的 ODBC 驱动程序以及后端数据库引擎实现大部分的智能和功能,因此短小(大约 250 K)、快速、强健。 RDO具备基本的 ODBC 处理方法,所以可以直接执行大多数 ODBC API 函数。RDO包含在VB4.0/VB5.0转载 2007-04-20 17:05:00 · 2004 阅读 · 0 评论 -
“绑架”窗体技术及其应用
马文骞 “绑架窗体”:顾名思义,就是将其它应用程序甚至系统程序的窗体活生生地拖进本程序的窗体内。这种未征得其它程序同意的强行“绑架”行为在某些场合下却能发挥出非常独特的作用。本文将讨论“绑架”窗体的技术及应用,并给出了一个完整的“强盗”程序的例子。一、“绑架”的可行性为了增加直观效果,让我们首先来看一看“强盗”程序的运行情况:图一是空白的“强盗”程序以及三个IE浏览窗口;图二显示的是三个IE窗转载 2007-04-17 23:45:00 · 1640 阅读 · 0 评论 -
len、right的意义,如何调用子过程,VB连接ACCESS,WTTH语句
这是我在BAIDU上的回答,仅供参考一、写出 len(“right(“student”,5)”)的返回值说LEN,RINGT的函数意义 二、DIM A (9) AS INTEGER,写出A的元素个数,并列举出A 三、阅读代码,说意思 private sub label1_click() label1.move label1.left+750,label1.top-550 四、什么是调用子过程,原创 2006-12-06 15:50:00 · 3898 阅读 · 0 评论 -
获取MAC地址(Err)
在使用时Text1 = GetMACAddress()Option ExplicitPublic Const NCBASTAT As Long = &H33Public Const NCBNAMSZ As Long = 16Public Const HEAP_ZERO_MEMORY As Long = &H8转载 2006-10-22 12:57:00 · 1033 阅读 · 0 评论 -
ODBC API访问数据库
---- 开放数据库互连(ODBC)已经成为Client/Server数据库应用系统中访问远程数据库的一个标准。做为强大的前端开发工具,MS Visual Basic为开发者提供了多种访问ODBC数据源的途径,如JET数据库引擎、ODBC API函数、RDO接口等。比较而言,直接使用ODBC API函数的编程难度最大,但由此获得的存取数据库的性能也是最佳。诚然,VB 4.0企业版提供的RDO接口的转载 2006-10-22 13:14:00 · 1283 阅读 · 0 评论 -
电子秤程式
现有电子秤一台,使用串口与计算机进行通讯。编写VB程序来访问串口,达到读取电子秤上显示的数据。该电子秤为BE01型仪表,输出为RS-232C标准接口,波特率为300-9600、偶校验、7个数据位、2个停止位。所有字符均发送11位ASCII码,一个起始位。在VB中与串口通讯需要引入控件MSComm串口通讯控件(在Microsoft Comm Control 6.0中)。具体程序如下:控件简称:MSC转载 2006-10-22 13:02:00 · 2159 阅读 · 1 评论 -
读取和写入.INI文件的指定行
<br />读取/写入当前文件夹中 Parameter.ini 的指定行。<br />Public Function ReadParameter(pRow) As String<br />On Error Resume Next<br />'读取配置文件的指定行<br />Dim Str As String, LS_Content() As String<br />Dim LogCount As Long<br />Dim i As Long<br />Str = Empty<br />Dim cLine(原创 2011-04-23 11:33:00 · 635 阅读 · 0 评论