-
等级
本版专家分：3380结帖率 100% -
如何判断一个字符串中是9个数字？？展开阅读全文
-
等级
本版专家分：2329
-
9个数字
var t: char;
if length(astring) = 9
begin
for i:= 1 to length(astring)
t:= pos(astring,i,1)
if not isnumberic(t) then
begin
showmessage('Error')
break;
end
end;
-
等级
本版专家分：2444
-
function IsNumber9(s:string);
begin
Result:=Length(s)=9;
if Result then
for i:=1 to 9 do
if not(s[i] in ['0'..'9']) then Result:=false;
end;
-
等级
本版专家分：2329
-
有些错误更正
var
i:integer;
t,astring : string;// to be test;
begin
if length(astring) = 9 then
begin
for i:= 1 to length(astring) do
begin
t:= copy(astring,i,1);
if pos(t,'0123456789')=0 then
begin
showmessage('Error');
break;
end;
end;
end;
end;
-
等级
本版专家分：3380
-
写错了吧
-
等级
本版专家分：391 -
function IsNumber(s:string);Boolean;
begin
Result:=Length(s)=9;
if Result then
for i:=low(S) to hi(s) do
if not(s[i] in ['0'..'9']) then Result:=false;
end;
- access读取EXCEL文件,并根据动态生成表，完成报表的导入
Option Compare DatabasePublic sheetid As String '报表IDPublic temp As String '获取年月时分秒Public tmpI As Integer '对应EXCEL行Public tmpJ As Integer '对应EXCEL列Public XlsApp As ObjectPublic ...
- access vba动态创建控件
在VBA编写的程序中，如果可以在运行时动态创建控件无疑是非常有用的，因为有些控件是无法预先得知的，这样就更必须在运行时动态创建然后设置相应控件属性。在vb，excel当中，使用Control的add方法可以实现，然而，在...
- Access vba动态创建ActiveX控件
在Access VBA编写的程序中，如果可以在运行时动态创建控件无疑是非常有用的，因为有些控件是无法预先得知的，这样就更必须在运行时动态创建然后设置相应控件属性。在vb，excel当中，使用Control的add方法可以实现，...
- ACCESS中通过VBA动态修改传递查询的SQL串
被人问到一个这样的问题:在ACCESS中创建了窗体,在窗体内的文本框中输入参数,传递给SQLserver的存储过程中,返回结果集,生成报表.已知可以通过ACCESS的传递查询执行SQL的存储过程,问:如何把窗体中输入的参数传入到动态...
- Access基础教程--第八章 使用VBA编程
本章内容 ◆ VBA编程基础◆ 创建和设计VBA程序◆ VBA程序调试与运行 一、VBA编程基础知识 在执行简单的操作时，宏可以完成，如窗体的打开与关闭、工具栏的显示和隐藏等。对于稍复杂一些的任务，则可用Visual ...
- VBA通用ADO数据访问模型
它允许开发人员编写访问数据的代码而不用关心数据库是如何实现的，而只用关心数据库的连接。由于ADO是基于COM实现的，所以基本上任何语言都可以使用这种数据访问技术，VBA也不例外。 一、ADO对象模型 ADO对象库中...
- VBA与数据库
1-1 利用DAO创建数据库和数据表 7 1-2 利用ADOX创建数据库和数据表： 8 1-3 利用SQL语句创建数据库和数据表 9 1-4 在已有的数据库中创建数据表（DAO） 10 1-5 在已有的数据库中创建数据表（ADOX） 12 1-6 在已有的...
- Access+2000中文版高级编程
11.4 用动态列创建交叉表查询的报表 320 11.4.1 报表使用的按窗体查询 321 11.4.2 报表使用的交叉表查询 323 11.4.3 DynamicColumnsExample报表 325 11.5 使用多项选择列表框选择多项打印主题 329 11.5.1 ...
- VBA中用ADO访问SQL SERVER数据库常用方法
Dim conn As New ADODB.Connection '创建一个 Connection 实例，在这里使用New等于将Dim和Set合并为一段代码执行 Dim rs As ADODB.Recordset '创建一个 Recordset 实例，不使用New 是因为，经常需要重复使用Set，...
- 如何向ACCESS数据库上传并显示图片
在动态网站制做过程中，需要上传图片、显示图片，上传的图片要能够保存在数据库中，一般小型网站只支持ACCESS数据库，如何上传图片，将其保存在数据库中并将其显示出来，是数据库+ASP应用技术之一。许多书籍只介绍了...
- VBA-将数据分页显示（listview）
2.要想作出分页的效果，必须要用listview控件实现，一般来说在窗体工具箱中并没有这个控件，所以我们要自己添加，打开窗体工具箱，在空白处右键-->附加控件-->选择microsoft listview control,version...
- Access 2000数据库系统设计(PDF)---016
2069.3.4 计算查询字段值的表达式 2109.3.5 表达式的其他用途 2129.4 疑难解答 2129.5 现实世界—Access表达式代数学 212第10章 创建多表查询和交叉表查询 21410.1 介绍表的连接 21410.2 连接表以创建多表查询 ...
- VBA基础知识
VB、VBA、Microsoft office、excel、access、PowerPoint1.VBA的基本概念2 数据类型2.1 VBA基本数据类型2.2 VBA自定义的数据类型3 VBA常量3.1 VBA系统定义常量3.2 VBA固有常量3.2 VBA符号常量4 变量4.1 声明4.1 赋值5...
- VBA，我的第一门语言（带你走进VBA的世界）
VBA是我正式学习的第一门计算机语言，也是一门我感情很深的计算机语言。它带我领略了编程的乐趣，让我相信一切皆有可能，一切皆可实现。它也给我带来的很多乐趣，很多工作机会。让我给你介绍一下它。 什么是VBA ...
- Access 2000数据库系统设计(PDF)---001
2069.3.4 计算查询字段值的表达式 2109.3.5 表达式的其他用途 2129.4 疑难解答 2129.5 现实世界—Access表达式代数学 212第10章 创建多表查询和交叉表查询 21410.1 介绍表的连接 21410.2 连接表以创建多表查询 ...
- Access 2000数据库系统设计(PDF)---031
2069.3.4 计算查询字段值的表达式 2109.3.5 表达式的其他用途 2129.4 疑难解答 2129.5 现实世界—Access表达式代数学 212第10章 创建多表查询和交叉表查询 21410.1 介绍表的连接 21410.2 连接表以创建多表查询 ...
- VBA中用ADO访问SQL SERVER数据库常用方法
VBA中用ADO访问SQL数据库常用方法 Dim conn As New ADODB.Connection '创建一个 Connection 实例，在这里使用New等于将Dim和Set合并为一段代码执行 Dim rs As ADODB.Recordset '创建一个 Recordset 实例，不使用...
- Access 2000数据库系统设计(PDF)---011
2069.3.4 计算查询字段值的表达式 2109.3.5 表达式的其他用途 2129.4 疑难解答 2129.5 现实世界—Access表达式代数学 212第10章 创建多表查询和交叉表查询 21410.1 介绍表的连接 21410.2 连接表以创建多表查询 ...
- Access数据库小结
1、查询Access中的表名称 select name from MSysObjects where type=1 and flags=0 MSysObjects 2、几个查询结果Union All时，当使用了无表查询时，提示“查询输入必须包含至少一个表或查询” 也就是说在...
- 征服Excel VBA：让你工作效率倍增的239个实用技巧
详细介绍了Excel VBA 的使用技巧，主要内容包括：宏的应用技巧、VBE 使用技巧、程序控制流程、Range 对象操作、Worksheet 对象操作、Workbook 对象操作、Application 对象操作、Window 对象操作、Chart 对象操作、...
- VBA进阶-使用ADO制作数据管理系统的知识结构
使用ADO制作数据管理系统的知识结构 ADO介绍 ActiveX Data Objects (ADO) is a high-level, easy-to-use interface to OLE DB. OLE DB is a low-level, high-performance interface to a variety ...
- VBA入门系列讲座
这是一个vba教程，大家有没有更好的，给看一下不知道怎样贴文件，只好这样发了VBA教程1.1VBA是什么 直到90年代早期,使应用程序自动化还是充满挑战性的领域.对每个需要自动化的应用程序,人们不得不学习一种不同的...
- VBA中ADO常用方法
VBA中ADO常用方法 ADO常用方法 准备工作 ======== Dim conn As New ADODB.Connection '创建一个 Connection 实例，在这里使用New等于将Dim和Set合并为一段代码执行 Dim rs As ADODB....
- ADO 与 临时表
在这个论坛里第一次接触到ADO，对通过用ADO来获取数据库的数据，对我日常的工作来说真是太有用了，因此慢慢地开始编写一些ADO读取...连接数据库也有多种方法，各种连接字符串又是什么涵义等，这些问题一直困惑着我，对
- excel vba 数据分析
VBA(Visual Basic for Application)是Microsoft Office系列软件的内置编程语言，其语法结构与Visual Basic编程语言互相兼容，采用的是面向对象的编程机制和可视化的编程环境。 第一节 标识符 一．定义 标识符是一...
- Excel VBA 学习总结 - 通用ADO数据访问模型
Excel VBA 学习总结 - 通用ADO数据访问模型 ADO是基于OLE DB的数据访问技术。它不直接与数据交互，而是把这个任务交给了OLE DB，这么做带来了相当好的可扩展性和适应性。它提供了编程语言和统一数据访问方式；它...
- VBA编程常用语句(转载）
1、Option Explicit '强制对模块内所有变量进行声明 Option Private Module '标记模块为私有,仅对同一工程中其它模块有用,在宏对话框中不...2、On Error Resume Next '忽略错误继续执行 VBA代码,避免出现错误消息...
- 使用SQLite数据库和Access数据库的一些经验总结
在我的《Winform开发框架》中，可使用多种数据库作为程序的数据源，除了常规的Oracle数据库、SqlServer、MySql数据库，其中还包括了SQLite数据库、Access数据库，后两个数据库都是在单机版程序中常用到的数据库，...
- 如何使用 VBA 和 Office Developer 创建 Office COM 外接程序
组件对象模型 (COM) 外接程序提供一种方法，该方法可以将通用代码集中到一个已编译的动态链接库 (DLL) 中，您可以很容易地在任何 Office 应用程序中实现该库（例如，您可以从 Excel、Word 和 Microsoft Access 访问 ...
- Excel 2003 VBA编程参考
Excel 2003 VBA编程参考关于作者Paul KimmelPaul Kimmel于1990年创立了Software Conceptions公司，并从那时开始设计和创建软件以及编写计算机图书。Paul Kimmel是几本关于VBA、VB、VB.NET、C#、Delphi和C++书籍的...