自定义博客皮肤VIP专享

*博客头图:

格式为PNG、JPG,宽度*高度大于1920*100像素,不超过2MB,主视觉建议放在右侧,请参照线上博客头图

请上传大于1920*100像素的图片!

博客底图:

图片格式为PNG、JPG,不超过1MB,可上下左右平铺至整个背景

栏目图:

图片格式为PNG、JPG,图片宽度*高度为300*38像素,不超过0.5MB

主标题颜色:

RGB颜色,例如:#AFAFAF

Hover:

RGB颜色,例如:#AFAFAF

副标题颜色:

RGB颜色,例如:#AFAFAF

自定义博客皮肤

-+
  • 博客(4)
  • 收藏
  • 关注

原创 delphi 动态调用DLL

**********DLL中**********  function test(const astr:PChar):Boolean;stdcall;**********应用中**********Type      TFTest= function test(const astr:PChar):Boolean;stdcall;vartft:TFTest;

2013-05-22 14:40:59 499

转载 Delphi 运行时 可拖动控件

unit Unit1;interfaceuses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls, ExtCtrls;type TForm1 = class(TForm) btn1: TButton; Main1: TIm

2013-05-11 23:51:02 1302 1

原创 vba 导入 TXT 到 access

导入TXT,是需要导入规格的,而这个导入规格是怎么来的呢?其实很简单,请看以下图然后就选择高级~!!这个就是导入规格了!然后就这个规格另存为 “XXX”,如“TXT_Upload”好了,这样,我们就是可以在VB上写代码了!Sub upload DoCmd.TransferText acImportDelim

2013-04-21 16:48:11 2160

原创 VBA 自动导入文件夹中的EXCEL表

Public Sub LOAD() Dim filepath As String, files As String, filename As String filepath = CurrentProject.Path & "\文件夹\*.xls" files = Dir(filepath) 'Debug.Print filepath Do Unti

2013-03-06 16:00:33 2317

空空如也

空空如也

TA创建的收藏夹 TA关注的收藏夹

TA关注的人

提示
确定要删除当前文章?
取消 删除