星辰日月00

摘要： 本文来自：万一代码文件://分组条件可以是 Whereprocedure TForm1.Button1Click(Sender: TObject);begin with ADODataSet1 do begin Close; CommandText := 'SELECT Continent, AVG(Area) AS 平均面积 ' + 'FROM country WHERE Continent="South America" GROUP BY Continent'; Open; end;end;//也可以是 Havingprocedure T 阅读全文

摘要： 本文来自：万一本例效果图:代码文件:unit Unit1;interfaceuses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls, ExtCtrls, Grids, DBGrids, DB, ADODB;type TForm1 = class(TForm) DBGrid1: TDBGrid; DataSource1: TDataSource; ADODataSet1: TADODataSet; Panel1: TPanel; Button1: ... 阅读全文

摘要： 本文来自：万一本例效果图:代码文件:unit Unit1;interfaceuses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls, ExtCtrls, Grids, DBGrids, DB, ADODB;type TForm1 = class(TForm) DBGrid1: TDBGrid; DataSource1: TDataSource; ADODataSet1: TADODataSet; Panel1: TPanel; Button1: ... 阅读全文

摘要： Order By Asc|Desc本例效果图:代码文件:unit Unit1;interfaceuses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls, ExtCtrls, Grids, DBGrids, DB, ADODB;type TForm1 = class(TForm) DBGrid1: TDBGrid; DataSource1: TDataSource; ADODataSet1: TADODataSet; Panel1: TPanel; ... 阅读全文

摘要： 本文来自：万一Where 用来指定查询条件;Like 和 Not Like 来指定模糊条件;模糊条件中:_ 表示任一字符;% 表示任一字符串;[] 表示一个集合.本例效果图:代码文件:unit Unit1;interfaceuses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls, ExtCtrls, Grids, DBGrids, DB, ADODB;type TForm1 = class(TForm) DBGrid1: TDBGrid; DataSo.. 阅读全文

摘要： 本文来自：万一//选择 country 表中的 Name 字段SELECT Name FROM country//选择 country 表中的 Name、Area 和 Population 字段SELECT Name,Area,Population FROM country{多个字段时, 字段名是用 "," 隔开的}本例效果图:代码文件:unit Unit1;interfaceuses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls, E 阅读全文

摘要： 本文来自：万一//选择 country 表中的所有字段SELECT * FROM country{虽然 SQL 并不区分大小写, 但应习惯把关键字大写}本例效果图:代码文件:unit Unit1;interfaceuses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls, ExtCtrls, Grids, DBGrids, DB, ADODB;type TForm1 = class(TForm) Panel1: TPanel; Button1: TBut.. 阅读全文

摘要： 本文来自：万一本例效果图:代码文件:unit Unit1;interfaceuses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, Grids, DBGrids, DB, DBClient, StdCtrls, ExtCtrls;type TForm1 = class(TForm) Panel1: TPanel; Button1: TButton; Button2: TButton; ClientDataSet1: TClientDataSet; DataSour... 阅读全文

摘要： 下文转自我的大学班主任，虽然交流并不多，但他确实影响了我，感谢他！ 上个月，我的一个朋友魏某因为生意上出了点意外，急需要一笔钱，当他打电话给我时，我感觉有一点奇怪，因为我们的关系仅仅只限于一般朋友，故此，就有了一点点犹豫。我说：一会儿我给你电话吧。 我考虑了十分钟，决定把这钱借给他。 上个星期，他把钱还给了我，之后请我喝茶。 他说：你答应借钱给我还真出乎我的意料之外! 我问：为什么? 他回答：打你电话之前我已经打过9通电话，你是第10个。当你说“一会儿给你电话”时，我认为我需要打第11通电话了。我是按照亲疏关系打的这10通电话，越打到后面越没有信心，所以，打你电话已经是死马当成活马... 阅读全文

摘要： Lesson Sixty-one A bad coldWhere’s jimmy?He’s in bed.What’s the matter with him?He feels ill.We must call the doctor.Yes, we must.Can you remember the doctor’s telephone number?Yes.It’s 09754.Open your mouth, jimmy.Show me your tongue.Say, ‘Ah’.What’s matter with him, doctor?He has a bad cold, Mr. W 阅读全文