Dim dSet As DataSet = New DataSet
Dim dAdp As OleDbDataAdapter
Dim ocn As OleDbConnection = New OleDbConnection
ocn.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4..0;
Data Source=D:\***.mdb;Persist Security Info = False"
dAdp = New OleDbDataAdapter("SELECT * FROM テスト", ocn )
dAdp.Fill( dSet, "t_テスト" )
DataGrid1.SetDataBinding(dSet, "t_テスト")
DataGrid1.CaptionText = "社員情報"
DataGrid1.CaptionForeColor = Color.Red
DataGrid1.CaptionBackColor = Color.White
---------------------------------------------------------------------
<タイトルバーを表示しない>
DataGrid1.CaptionVisible = False
---------------------------------------------------------------------
<一行おきに背景色をつける>
DataGrid1.AlternatingBackColor = Color.Gray
---------------------------------------------------------------------
<DataGridの高さを変更する>
DataGrid1.PreferredRowHeight = 30
---------------------------------------------------------------------
<DataGridの列見出しクリック時に並べ替えないようにする>
DataGrid1.AllowSorting = False
0 件のコメント:
コメントを投稿