データベース(MDBファイル)関連:DataGridViewを編集不可にするVB2008でMDBファイルを表示させた表形式フォームを編集不可にする実行例サンプルです。データベース(MDBファイル)関連へDataGridView を読み取り専用にするには、ReadOnly を True にします。 これだけですと、入力は出来ないようになりますが、最下行の新規追加行(*マークの行)は消えません。 消すには、AllowUserToAddRows = False とします。 編集可能なDataGridView 編集不可にしたDataGridView ■ 実行コード Public Class Form1 Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load Dim CnString As String Dim UserID As String = "Admin" Dim Password As String = "" Dim SQL As String Dim sfina As String = "C:\sample1.mdb" Dim DaAdap As OleDb.OleDbDataAdapter Dim Tbl As New DataTable() Dim Bds As New BindingSource CnString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & sfina & ";" CnString = CnString & "User ID=" & UserID & ";" CnString = CnString & "Jet OLEDB:Database Password=" & Password '全フィールドの表示 SQL = "SELECT Field1 FROM table1" 'データアダプターの作成 DaAdap = New System.Data.OleDb.OleDbDataAdapter(SQL, CnString) 'データを読む DaAdap.Fill(Tbl) 'データグリッドに表示 Bds.DataSource = Tbl DataGridView1.DataSource = Bds End Sub Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click '読み取り専用にする DataGridView1.ReadOnly = True '追加行を消す DataGridView1.AllowUserToAddRows = False End Sub End Class Visual Basic 2008 Express Edition実践入門 |