Member 14588284 Ответов: 2

Вставка в доступ из richtextbox или другого приложения

Всем привет

У меня есть список в excel с 5 столбцами
я копирую этот список и вставляю в richtexbox

поэтому я хочу, чтобы база данных инсерта этот список


но я этого не сделал

Что я уже пробовал:

Dim Comm As New OleDbCommand(STR1, cn)

MadMyche

Вы собираетесь сделать намного лучше, чем это для вопроса. Вы просто хотели, чтобы содержимое этого текстового поля было вставлено в одно поле в БД? Или вы хотите, чтобы массив из нескольких строк шириной 5 столбцов вставлялся в одинаковое количество строк и столбцов.
** Самое лучшее, что можно сделать, - это использовать Improve Question виджет на исходный вопрос - и не помещать его в кучу ответов на этот комментарий

Member 14588284

я просто хочу загрузить таблицу excel в базу данных acces.
и я хочу сделать эту работу с помощью метода copy-paste

Richard MacCutchan

Вы не можете сделать это через текстовое поле, так как все столбцы будут объединены в одну строку.

2 Ответов

Рейтинг:
2

Member 14588284 

For x = 0 To TextBox1.Lines.Count - 1
    Dim tx = TextBox1.Lines(x).ToString
    If tx <> "" Then
        Dim i = DataGridView1.Rows.Add
        DataGridView1.Rows(i).Cells(0).Value = tx.Split(vbTab)(0)
        DataGridView1.Rows(i).Cells(1).Value = tx.Split(vbTab)(1)
        DataGridView1.Rows(i).Cells(2).Value = tx.Split(vbTab)(2)
        DataGridView1.Rows(i).Cells(3).Value = tx.Split(vbTab)(3)
        DataGridView1.Rows(i).Cells(4).Value = tx.Split(vbTab)(4)
        DataGridView1.Rows(i).Cells(5).Value = tx.Split(vbTab)(5)
        DataGridView1.Rows(i).Cells(6).Value = tx.Split(vbTab)(6)
    End If
Next


Я сделал это :))
я вставить значения из текстового поля из таблицы Excel
тогда с помощью этих кодов;
экспорт в таблицу datagridview

Рейтинг:
1

OriginalGriff

Мы более чем готовы помочь тем, кто застрял, но это не значит, что мы здесь, чтобы сделать все это для вас! Мы не можем сделать всю работу, вам либо платят за это, либо это часть ваших оценок, и было бы совсем несправедливо, если бы мы сделали все это за вас.

Поэтому нам нужно, чтобы вы сделали работу, и мы поможем вам, когда вы застряли. Это не значит, что мы дадим вам пошаговое решение, которое вы можете сдать!
Начните с объяснения, где вы находитесь в данный момент и каков следующий шаг в этом процессе. Затем расскажите нам, что вы пытались сделать, чтобы этот следующий шаг сработал, и что произошло, когда вы это сделали.