登录
首页 » Visual Basic » SetAccessData

SetAccessData

于 2006-08-10 发布 文件大小:2KB
0 398
下载积分: 1 下载次数: 1

代码说明:

  对已经存在的Accsess数据库表添加新字段并复值(right Accsess already existing database table and add a new field of Complex)

下载说明:请别用迅雷下载,失败请重下,重下不扣分!

发表评论

0 个回复

  • SQLite3Develop
    Sqlite3 的确很好用。小巧、速度快。但是因为非微软的产品,帮助文档总觉得不够。这 些天再次研究它,又有一些收获,这里把我对 sqlite3 的研究列出来,以备忘记。(Sqlite3 really good use. Small, fast. But for the Microsoft products, always feel that not enough to help document. This Some day to study it, and have some harvest, here I study on SQLite3 list, to forget.)
    2012-09-25 17:13:03下载
    积分:1
  • Population
    c++ 链接access 建立的一个小型人员统计系统管理 代码简单(c++ link access to the set of a small staff Biejiao simple statistical system management code)
    2014-03-09 10:11:57下载
    积分:1
  • SetAccessData
    对已经存在的Accsess数据库表添加新字段并复值(right Accsess already existing database table and add a new field of Complex)
    2006-08-10 21:15:31下载
    积分:1
  • tuishuiguanli
    VB编写的退税管理系统,可做毕业设计参考,很适用!(VB prepared the tax rebate management system, can be graduated from the reference design, it is applicable!)
    2008-12-29 16:20:26下载
    积分:1
  • lending-Form
    A very simple VB Source that can read / write from access database to Grid
    2013-02-24 07:45:01下载
    积分:1
  • test_database
    利用mfc编程实现acess数据库的存储与访问,对于小型的数据库很实用(Mfc programming using acess database storage and access, the database is very useful for small)
    2011-11-29 10:27:49下载
    积分:1
  • miniSQL
    MiniSQL的大致架构在里面了,可以自己填写里面的模块。。(MiniSQL the general framework in which, you can fill out inside the module. .)
    2011-10-14 22:39:17下载
    积分:1
  • VCPP-ADO-ACCESS--
    能够连接access 数据库和C++原代码,使用ado方式(Able to connect access database and C++ original code)
    2013-06-19 20:39:41下载
    积分:1
  • wlcsxt
    说明:  网络测试系统,很实用的一个源码,很有参考价值,下载试试,多学习哦(Network test systems, it is a source of practical, useful reference, download a try, more to learn Oh)
    2008-11-23 22:37:15下载
    积分:1
  • N-sheets
    以G列分成多个工作表(以宏运行VBA) (Sub aa() Dim a As Integer, b As Integer, c As Integer, sh As Worksheet For a = 2 To [g65536].End(3).Row If Cells(a, 7) <> Cells(a- 1, 7) Then b = a End If c = Range("g:g").Find(Cells(a, 7), , , , , xlPrevious).Row Set sh = Sheets.Add(, Sheets(Sheets.Count)) sh.Name = Sheets("sheet1").Cells(a, 7).Value With Sheets("Sheet1") Sheets("Sheet1").Range(.Cells(b, 1), .Cells(c, 10)).Copy Destination:=sh.[a2] Sheets("Sheet1").Range("a1:j1").Copy Destination:=sh.[a1] a = c End With Sheets("Sheet1").Select Next End Sub )
    2013-05-03 08:50:54下载
    积分:1
  • 696516资源总数
  • 106409会员总数
  • 8今日下载