powered by simpleCommunicator - 2.0.58     © 2025 Programmizd 02
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Форумы / WinForms, .Net Framework [игнор отключен] [закрыт для гостей] / Форма, занесение данных в таблицу
1 сообщений из 1, страница 1 из 1
Форма, занесение данных в таблицу
    #38111576
Eyxeniy
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Привет
Код: vbnet
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
15.
16.
17.
18.
19.
20.
21.
22.
23.
24.
25.
26.
27.
28.
29.
30.
31.
32.
33.
34.
35.
36.
37.
38.
39.
40.
41.
42.
43.
44.
45.
46.
47.
48.
49.
Public Class Form1



    Private Sub ToolStripMenuItem1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ToolStripMenuItem1.Click
        Dim M1, OF1, OHB As Single
        Dim T1 As Integer

        OF1 = Val(TextBox1.Text)
        OHB = Val(TextBox2.Text)
        T1 = Val(TextBox3.Text)

        ' Формула
        M1 = (OF1 - OHB) * T1 * 0.1

        TextBox4.Text = Str(M1)
    End Sub


    Private Sub ToolStripMenuItem2_Click_1(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ToolStripMenuItem2.Click


        Me.Text = " Расчет размера вреда и убытков"

        Dim Imena() As String = {"", " В ", "Т ", " Р ", " З ", "О "}
        Dim Tel() As String = {"Е", "тон", "тыс/руб", "тыс", "тыс", "тыс"}
        Dim Vesh() As String = {"Загр", "", "", "", "", " - "}
        Dim Vsego() As String = {" - ", " - ", "", "", "", ""}

        Dim dt As New DataTable
        dt.Columns.Add("Имена")
        dt.Columns.Add("Единицы")
        dt.Columns.Add("Вещества")
        dt.Columns.Add("Всего")

        For i As Short = 0 To 5
            dt.Rows.Add(New String() {Imena(i), Tel(i), Vesh(i), Vsego(i)})
        Next
        DataGridView1.DataSource = dt
    End Sub

    
End Class

Подскажите, а лучше научите ...
В кнопке ВЫВОД находиться таблица
Мне надо чтобы при нажатии кнопки ВЫВОД создавалась новая форма и в ней была моя таблица. Для вас это не сложно ...
Но меня больше беспокоит, как в эту таблицу можно будет занести значения которые будут вводиться в функции РАСЧЕТ ?
И можно ли ее кинуть на печать ( таблицу) - это не важно, интересуюсь.



Модератор: Тема перенесена из форума "Visual Basic".
...
Рейтинг: 0 / 0
1 сообщений из 1, страница 1 из 1
Форумы / WinForms, .Net Framework [игнор отключен] [закрыт для гостей] / Форма, занесение данных в таблицу
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]