Запрос к базе Access с разделением строки - Visual Basic .NET
Формулировка задачи:
В безе Access имеется поле содержащее текст с разделителем ";"
Как составить запрос с разделением текста данного поля и выводом составляющих в отдельные поля?
Vb.net 2010
Решение задачи: «Запрос к базе Access с разделением строки»
textual
Листинг программы
Private Sub Button1_Click(sender As System.Object, e As System.EventArgs) Handles Button1.Click Dim dbPath As String = IO.Path.Combine(Application.StartupPath, "dbBooks18.mdb") Dim tb As String = "Books" Dim connString As String = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & dbPath & ";Password=;" Dim query As String = "SELECT Name,tst FROM " & tb & " Where Year>2005" 'в поле tst строка с разделителем ";" Using conn As New OleDbConnection(connString) Dim command As New OleDbCommand(query, conn) conn.Open() Dim reader As OleDbDataReader = command.ExecuteReader() DataGridView1.ColumnCount = 3 If reader.HasRows Then DataGridView1.SuspendLayout() Do While reader.Read() Dim tst As String() = reader.GetString(1).Split(";"c) DataGridView1.Rows.Add(reader.GetString(0), tst(0), tst(1)) Loop DataGridView1.ResumeLayout() End If reader.Close() End Using End Sub