-
显示频道
'说明：表单一个；命令按钮一个为CmdShowChannel OptionExplicit PrivateDeclareFunctionShellExecuteLib"shell32.dll"Alias"ShellExecuteA"(ByValhwndAsLong,ByVallpOperationAsString,ByVallpFileAsString,ByVallpParametersAsString,ByVallpDirectoryAsString,ByVal...
2018-06-17 17:13:00
-
利用INI文件给程序创建动态菜单
象Word那样，在“文件”菜单中可以找到我们最近打开或编辑过的文件。这是程序在运行时创建了动态菜单的缘故。VB程序实现此功能有很多文章探讨过，但大都着眼于Windows的注册表。我们的注册表早已发福了，有没有办法不让她再增加负担？ 用INI文件！INI文件是系统、应用...
2018-06-17 17:12:57
-
VB与大型数据库无数据源的连接
目前，绝大多数的数据库参考书都介绍了ODBC的手工配置方法，或者介绍了如何在代码中进行ODBC配置。但这两种方法都有一定的局限性:不是当程序最终完成并分发到用户手中后，还需要为用户配置ODBC，显得既麻烦又不符合专业软件的要求；就是得编写复杂的更改操作系统注册表...
2018-06-17 17:12:56
-
MSOffice开发工具--VBA
一、VBA的发展过程 ----在Office中包含着一种加强Office功能的语言，即为Basic语言。经过发展，在Office97中，Word、Excel、Access、PowerPoint四个软件都有了自己的程序设计语言，分别称为MicrosoftWordVisualBasic、MicrosoftExcelVisualBasic、MicrosoftAccessVisua...
2018-06-17 17:12:55
-
VisualBasic串口通信程序设计
1mscomm.vbx通信控件描述 mscomm.vbx通信控件可直接从vb的toolbox中加入窗体form，即可用其进行通信。若toolbox中无此控件，则用tools的customcontrols将mscomm.vbx从windows的system子目录中加入vb的toolbox中。 1.1通信方式 mscomm.vbx有2种不同的方式来处理和解决各...
2018-06-17 17:12:54
-
更换驱动器的图标
在驱动器的根目录之下建立Autorun.inf文件可以更改该驱动器的图标，其格式为： [autorun] ICON=驱动器名 路径 Icon图标文件全名 基于这样的原理，我们可以在VB程序中轻松实现此任务。以更改驱动器D的图标为例：新建标准EXE工程，添加一个按钮和一个公共对话框，然后拷...
2018-06-17 17:12:54
-
访问MicrosoftJet数据库---用MicrosoftJet访问桌面数
访问其它MicrosoftJet数据库(．mdb)中的数据，包括用M1crosoftJet的老版本建的各种数据库。 1.链接外部MicrosoftJet表 为了在本地MicrosoftJet数据库中链接外部MicrosoftJet表，可以先用OpenDatabase方法打开本地MicrosoftJet数据库，建立一个TableDef对象，并设置该对...
2018-06-17 17:12:52
-
VB6中动态设置报表结果
在VB6的报表使用过程中,我们会发现这样的一个问题,那就是报表中的数据只能读一次,不管你的库中字段增加也好,删除也好,以及让它显示新的查询结果等,它都不会记变。经过查资料才搞清楚,原来是DataEnvironment的问题.原来,只要Command对象中含有数据记录集合,它就不会重新...
2018-06-17 17:12:52
-
VB经验谈：限制输入的文本框
PublicClassMyTextBox InheritsSystem.Windows.Forms.TextBox Privatem_strValidTextAsString="0123456789. -"Chr(13).ToString Privatem_blnEditableAsBoolean=True #Region"Windows窗体设计器生成的代码" PublicSubNew() MyBase.New() '该调用是Windows窗体设计器所...
2018-06-17 17:12:51
-
VB给菜单加上图片
PrivateDeclareFunctionGetMenuLib"user32"(ByValhwndAsLong)AsLong PrivateDeclareFunctionGetSubMenuLib"user32"(ByValhMenuAsLong,ByValnPosAsLong)AsLong PrivateDeclareFunctionGetMenuItemIDLib"user32"(ByValhMenuAsLong,ByValnPosAsLong)AsLong PrivateDeclare...
2018-06-17 17:12:50
IDC资讯： 主机资讯 注册资讯 托管资讯 vps资讯 网站建设
网站运营： 建站经验 策划盈利 搜索优化 网站推广 免费资源
网络编程： Asp.Net编程 Asp编程 Php编程 Xml编程 Access Mssql Mysql 其它
服务器技术： Web服务器 Ftp服务器 Mail服务器 Dns服务器 安全防护
软件技巧： 其它软件 Word Excel Powerpoint Ghost Vista QQ空间 QQ FlashGet 迅雷
网页制作： FrontPages Dreamweaver Javascript css photoshop fireworks Flash