DataGrid控件的使用

上一篇 / 下一篇  2007-03-06 11:32:03 / 个人分类:vb

  DataGrid 控件是一种类似于电子数据表的绑定控件,可以显示一系列行和列来表示 Recordset 对象的记录和字段。可以使用 DataGrid 来创建一个允许最终用户阅读和写入到绝大多数数据库的应用程序。DataGrid 控件可以在设计时快速进行配置,只需少量代码或无需代码。当在设计时设置了DataGrid 控件的 DataSource 属性后,就会用数据源的记录集来自动填充该控件,以及自动设置该控件的列标头。然后您就可以编辑该网格的列;删除、重新安排、添加列标头、或者调整任意一列的宽度。
T'e"](EN+AS8nqM:|0    在运行时,可以在程序中切换 DataSource 来察看不同的表,或者可以修改当前数据库的查询,以返回一个不同的记录集合。51Testing软件测试网psm-w4@jFwS
    注意 DataGrid 控件与 Visual Basic 5.0中的 DBGrid 是代码兼容的,除了一个例外:DataGrid 控件不支持 DBGrid 的“解除绑定模式”概念。DBGrid 控件包括在 Visual Basic 的 Tools 目录中。
+W+Z_ _s3r051Testing软件测试网,Y2Db5l@8]
    可能的用法51Testing软件测试网w+@.MO+gXD/Q/o
    查看和编辑在远程或本地数据库中的数据。51Testing软件测试网 f}9h6`/tg
    与另一个数据绑定的控件(诸如 DataList 控件)联合使用,使用 DataGrid控件来显示一个表的记录,这个表通过一个公共字段链接到由第二个数据绑定控件所显示的表。
#iB U"tm2l@#zsZ8L8M051Testing软件测试网pW6m2BD!eX|!W
    使用 DataGrid 控件的设计时特性
Y"]s1YbP@6R0    可以不编写任何代码,只通过使用 DataGrid 控件的设计时特性来创建一个数据库应用程序。下面的说明概要地说明了在实现 DataGrid 控件的典型应用时的一般步骤。完整的循序渐进的指示,请参阅主题“DataGrid 方案1: 使用 DataGrid 控件创建一个简单数据库应用程序”。
D3R(o0CW.j$~0要在设计时实现一个 DataGrid 控件51Testing软件测试网Q4R:Hr.C
    1. 为要访问的数据库创建一个 Microsoft 数据链接 (.MDL) 文件。请参阅“创建 Northwind OLE DB 数据链接”主题,以获得一个示例。
8hdE3B;iI0    2. 在窗体上放置一个 ADO Data 控件,并将其 ConnectionString 属性设置为在第 1 步中所创建的OLE DB 数据源。
U@v.L }.xV0    3. 在这个 Ado Data 控件的 RecordSource 属性中输入一条将返回一个记51Testing软件测试网8eMTX7w H'a*[
录集的 SQL 语句。例如,Select * From MyTableName Where CustID = 12
Y6q0oo7v,x)f-Q4N`7rQ!t0    4. 在窗体上放置一个 DataGrid 控件,并将其 DataSource 属性设置为这个 ADO Data 控件。51Testing软件测试网i Pl7p$E
    5. 右键单击该 DataGrid 控件,然后单击“检索字段”。51Testing软件测试网6r6LQ.PMFI+n6C
    6. 右键单击该 DataGrid 控件,然后单击“编辑”。51Testing软件测试网l;uCte7P}v
    7. 重新设置该网格的大小、删除或添加网格的列。
,P#V J:s.lO0    8. 右键单击该 DataGrid 控件,然后单击“属性”。51Testing软件测试网g-Hy7m)Ajn1K
    9. 使用“属性页”对话框来设置该控件的适当的属性,将该网格配置为所需的外观和行为。51Testing软件测试网Z v J&d2d@^

0\IN%wr#vVZ0    在运行时更改显示的数据51Testing软件测试网x3Wo |;|"^
    在创建了一个使用设计时特性的网格后,也可以在运行时动态地更改该网格的数据源。下面介绍实现这一功能的通常方法。51Testing软件测试网 GhAt-X O-c Qc

B3|3{2])]j`9rZ R0    更改 DataSource 的RecordSource51Testing软件测试网S~m@$oT?%t6@L+RD
    更改所显示的数据的最通常方法是改变该 DataSource 的查询。例如,如果DataGrid 控件使用一个ADO Data控件作为其 DataSource,则重写RecordSource和刷新该ADO Data 控件都将改变所显示的数据。51Testing软件测试网P([.E#v6Nb(R J
    '' ADO Data 控件连接的是 Northwind 数据库的'' Products 表。新查询查找所有51Testing软件测试网sFW? ic-n1r;?
    '' SupplierID = 12 的记录。51Testing软件测试网US/[| |&L
    Dim strQuery As String51Testing软件测试网{|;W^t'r
    strQuery = "SELECT * FROM Suppliers WHERE SupplierID = 12"51Testing软件测试网 g&Mv:F5FHR
    Adodc1.RecordSource = strQuery
!JoMVcU B0    Adodc1.Refresh
Vb4G#\w051Testing软件测试网9iN ["{WW.c6y p}
    更改 DataSource51Testing软件测试网cd&Y8a)S&~
    在运行时,可以将 DataSource 属性重新设置为一个不同的数据源。例如,您可能具有若干个 ADO Data 控件,每个控件连接不同的数据库,或设置为不同的 RecordSource 属性。可以简单地将 DataSource 从一个 ADO Data控件重新设置为另一个 ADO Data 控件:
hN.](u,w FA0    '' 将 DataSource 重新设置为一个连接到 Pubs 数据库的、51Testing软件测试网_-{.h0HL)D
    '' 使用 Authors 表的 ADO Data 控件。51Testing软件测试网+W8o m1W-y3]
    Set DataGrid1.DataSource = adoPubsAuthors
2J oQ7Y ]051Testing软件测试网'D%I;g4gnyr~dI
    重新绑定 DataSource
'f&L"Bdd0    当将 DataGrid 控件用于一个远程数据库,诸如 SQLServer 时,可以改变表的结构。例如,可以给这个表添加一个字段。在这种情形下,可以调用Rebind 方法根据新的结构来重新创建该网格。注意,如果已经在设计时改变了这个列的布局,DataGrid 控件将会试图重新创建当前的布局,包括任何空的列。不过,通过首先调用 ClearFields 方法,可以强制该网格重新设置所有的列。51Testing软件测试网$Y7zR7s~m)P _

0td#No2P/p$cI*oU0    从 DataGrid 返回值51Testing软件测试网k-}py$Q9f5[ t
    在 DataGrid 被连接到一个数据库后,可能想要监视用户单击了哪一个单元。可以使用 RowColChange 事件——而不是 Click 事件。如下所示:51Testing软件测试网1^/~G0aCh]I
    Private Sub DataGrid1_RowColChange(LastRow As Variant, ByVal LastCol As Integer)
:B%F*U!vx~%JS't0       '' 显示用户所单击的单元的文字、行和列的信息。
&vIV[9r\5X0       Debug.Print DataGrid1.Text; DataGrid1.Row; DataGrid1.Col51Testing软件测试网zDh4F d~%R9H+t
    End Sub51Testing软件测试网#C4HY6D~Z3s PgG

2i[ Ue1N0    使用 CellText 和 CellValue 方法
M,{&r{#G wI0    当一个列使用 NumberFormat 属性设置格式后,CellText 和 CellValue 属性是很有用的。NumberFormat 属性不必更改实际的数据格式就可以更改任何包含数字的列的格式。例如,给定一个网格,其中包含一个名为 ProductID的、包含整数的列。下面的代码将使 DataGrid 以"P-0000" 的格式来显示数据。换句话说,尽管在 ProductID 字段中所包含的实际数值为 "3",但该网格所显示的值将是 "P-0003"。51Testing软件测试网T @fSl.v*Uu Uj
      Private Sub Form_Load()51Testing软件测试网4J'u ev"C
        DataGrid1.Columns("ProductID").NumberFormat = "P-0000"51Testing软件测试网9l2~a2N)k}({
      End Sub51Testing软件测试网PG O4H3~ W'\
    要返回数据库中所包含的实际值,应使用 CellValue 方法,如下所示:51Testing软件测试网,z:X@&A2k3{ K yId|
      Private Sub DataGrid1_RowColChange(LastRow As Variant, ByVal LastCol As Integer)
#S&_1e-p'E8Yx1I0        Debug.Print _51Testing软件测试网gp){(pd1D
        DataGrid1.Columns("ProductID").CellValue(DataGrid1.Bookmark)51Testing软件测试网Y1A,Ig7jz E$qm
      End Sub51Testing软件测试网 L%?#N)r:LS%_c
    注意 上面所用的 CellValue 和下面所用的 CellText 值,都需要将Bookmark 属性作为一个参数,功能才正确。
q"w,K%ND-[0    相反地,如果要返回该字段的格式化的值,应使用 CellText 方法:51Testing软件测试网*L.U k+h6N'w-|Yn
      Private Sub DataGrid1_RowColChange(LastRow As Variant, ByVal LastCol As Integer)
Y bl6ZNw/c#NcO0        Debug.Print _
jDu&~`[4a[#X#OZ0        DataGrid1.Columns("ProductID").CellText(DataGrid1.Bookmark)
q5V3k,e4w OG8x6fd0      End Sub
w!BC A$P0    注意 上面的 CellText 方法等价于使用 DataGrid 控件的 Text 属性。51Testing软件测试网wi6t^)tGli3l

}I?/T yf8Eed0    下一步
5C(Z1_-PF V }_J4n0    要阅读关于使用该控件创建简单的应用程序的一个循序渐进的过程,请参阅“使用 DataGrid 控件创建简单的数据库应用程序”,或“创建一个连接DataList 控件的 DataGrid”。
h4N/P,Y F,M0    要了解关于 Split 对象以及如何对其编程的详细信息,请参阅“操作DataGrid 视图”。

TAG: vb

 

评分:0

我来说两句

Open Toolbar