Форум программистов, компьютерный форум, киберфорум Visual Basic .NET
Войти
Регистрация
Восстановить пароль
Карта форума Темы раздела Блоги Сообщество Поиск Заказать работу  
Другие темы раздела
Visual Basic .NET Какое значение получит переменная Y после выполнения фрагмента программы Дело в том что завтро Экзамен...потестам...я не знаю как их решать...кто поможет найти приблизительное решение? Какое значение получит переменная Y после выполнения фрагмента программы? Dim a, b, Y As Integer a = -3 : b = 5 ABC1(a, b) Y = a + b https://www.cyberforum.ru/ vb-net/ thread607542.html Сложить два текстовых значения, реализующих время Visual Basic .NET
как можно сложить два текстовых значения, реализующих время. пример "06.00+00.25" точно в таком формате
Visual Basic .NET Программа с использованием Direct3D, в которой создаются Mesh-и, ошибка "System.AccessViolationExeption" https://www.cyberforum.ru/ vb-net/ thread607245.html
Нужна помощь. Есть программа с использованием Direct3D, в которой создаются Mesh-и, запуск и работа в программе идет на ура.. вот только когда программа закрывается выскакивает ошибка: System.AccessViolationExeption Source: Microsoft.DirectX.Direct3DX StackTrace: в Microsoft.DirectX.Direct3D.BaseMesh.Dispose()
Visual Basic .NET Метод Монте-карло: исправить формулу Dim image1 As New Bitmap(800, 800) Dim graph1 As Graphics = Graphics.FromImage(image1) Dim pen1 As New Pen(Color.Black, 1) Dim pen2 As New Pen(Color.Fuchsia, 2) Dim pen3 As New Pen(Color.Chocolate, 3) Dim pen4 As New Pen(Color.Cyan, 4) Dim drawfont As New Font("arial", 12) Dim drawbrush As New SolidBrush(Color.Black) Dim s0, s As Double Dim n, k, i, j,... https://www.cyberforum.ru/ vb-net/ thread607210.html
Visual Basic .NET Вывод оценки в программе для прохождения тестов, найти ошибку в коде
Приветствую всех, пытаюсь сделать в программе для прохождения тестов вывод оценки, но где-то накосячил в коде ... If PravOtvetov >= (VsegoOtvetov = 70%) And PravOtvetov < (VsegoOtvetov = 100%) Then Label1.Text = "Ваша оценка 4" End If If PravOtvetov >= (VsegoOtvetov = 50%) And PravOtvetov < (VsegoOtvetov = 70%) Then Label1.Text =...
Visual Basic .NET Использовать ProgressBar для показа оставшегося времени на тест Приветствую всех, не могу разобраться как пользоваться прогресс баром. Например хочу внедрить его в программу для прохождения тестов. 1 прогресс бар отводится для показа оставшегося времени на тест 2 прогресс бар будет смотреть сколько вопросов из всех ответил экзаменующийся VB.net https://www.cyberforum.ru/ vb-net/ thread607100.html
Visual Basic .NET Демонстрация CPU Indicator (загрузка процессора) https://www.cyberforum.ru/ vb-net/ thread607075.html
Индикатор загрузки ЦП (Убогий график) . Может кому понадобится :)
Статистика пользователей: показывать, сколько пользователей работают сейчас в программе Visual Basic .NET
доброго времени суток! как сделать статистику пользователей для своей программы как в скайпе? заходит пользователей то +1 к этому числу уходит пользователь то -1 к этому числу
Visual Basic .NET Можно ли в AddHandler добавить процедуру с аргументом Здравствуйте. Подскажите пожалуйста - можно ли в такой код: ... AddHandler tbx_Температура.TextChanged, AddressOf Невязка() AddHandler tbx_Давление.TextChanged, AddressOf Невязка() ... каким-либо образом преобразовать в аналогичный: https://www.cyberforum.ru/ vb-net/ thread606768.html Visual Basic .NET Как работать с файлом Excel, читать, записывать данные https://www.cyberforum.ru/ vb-net/ thread606649.html
Здравствуйте. Вот, в общем, решил поинтересоваться Вашими советами насчёт моей проблемы. Я имею некую «Базу данных» в Excel, т.е. Калькуляция блюд. В калькуляцию входят Название блюда и что нужно для него приготовления(ингредиенты), сколько чего надо гр\кг, стоимость и суммы, в общем, большая таблица. А так же я имею похожую таблицу калькуляции, которую постоянно приходится заполнять вручную....
Visual Basic .NET Вывод информации из определённой строки листа Excel
доброго времени суток! Imports Microsoft.Office.Interop Public Class Form1 Dim oEx As New Excel.Application Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click Dim i As Integer = 1 'Номер строки Try Do Until oEx.Range("A" & i).Value = "" 'Цикл выполняется до тех пор, пока в столбце "А" имеется...
Visual Basic .NET Рисование поверх контролов https://www.cyberforum.ru/ vb-net/ thread606177.html
Я отрисовываю PNG'шки с прозрачностью через OnPaint, и при этом прозрачность у них сохраняется. Но у меня на форме также есть контрол WebKitBrowser, который закрывает его. Protected Overrides Sub OnPaint(ByVal e As System.Windows.Forms.PaintEventArgs) MyBase.OnPaint(e) e.Graphics.DrawImage(My.Resources.maxi, New Point(Point, 0)) ...
1 / 1 / 0
Регистрация: 12.06.2012
Сообщений: 18
0

Работа с БД: Открытие подключения в одной форме, закрытие в другой - Visual Basic .NET - Ответ 3175859

17.06.2012, 13:17. Показов 1012. Ответов 1
Метки (Все метки)

Author24 — интернет-сервис помощи студентам
Всем доброго дня, помогите пожалуйста. Как можно сделать так, чтобы открытое подключение в первой форме можно было закрывать в следующей.
Ну или как можно настроить эти 2 подключения таким образом, чтобы данные можно было записывать на одной и той же строке, а не как на скриншоте

VB.NETВыделить код
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
Public Class ДанныеСтудента
 
    Public Sub Записать(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
        Dim Con As New OleDb.OleDbConnection(
                    "Data Source=""\BD_Studenta.mdb"";User " & _
                    "ID=Admin;Provider=""Microsoft.Jet.OLEDB.4.0"";")
        Con.Open()
        Dim Com = New OleDbCommand("INSERT INTO [БД Студента] (" &
                                   "Фамилия, Имя, Отчество, [Номер группы], [Дата регистрации]) VALUES ('" + TextBox1.Text + "', '" + TextBox2.Text + "', '" + TextBox3.Text + "', '" + TextBox4.Text + "', '" + Date.Now + "')")
        Com.Connection = Con
        If TextBox1.Text = "" Or TextBox2.Text = "" Or TextBox3.Text = "" Or TextBox4.Text = "" Then
            MessageBox.Show("Не введены требуемые данные", "Ошибка")
            Close()
           ...
            ' Выполнение команды SQL:
                Com.ExecuteNonQuery()
                MessageBox.Show("Ваши данные были успешно сохранены")
                Con.Close()
VB.NETВыделить код
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
Public Class Тест
    Dim Con As New OleDb.OleDbConnection("Data Source=""\BD_Studenta.mdb"";User " & "ID=Admin;Provider=""Microsoft.Jet.OLEDB.4.0"";")
Public Sub KonezTesta()
 Label1.Text = "Тест закончен"
        If Rights >= (Total * 0.7) And Rights < Total Then
            Label6.Text = "Ваша оценка 4"
        End If
        If Rights >= (Total * 0.5) And Rights < (Total * 0.7) Then
            Label6.Text = "Ваша оценка 3"
        End If
        If Rights < (Total * 0.5) Then
            Label6.Text = "Ваша оценка 2"
        End If
        If Rights = Total Then
            Label6.Text = "Ваша оценка 5"
        End If
        Label6.Visible = True
        For I As Integer = 1 To 4
            Me.Controls("GroupBox2").Controls("RadioButton" & I).Visible = False
        Next
        GroupBox2.Visible = False
        Con.Open()
        Dim Com = New OleDbCommand("INSERT INTO [БД Студента] (" &
                                   "[Полученная оценка]) VALUES ('" + Label6.Text + "')")
        Com.Connection = Con
        Com.ExecuteNonQuery()
        MessageBox.Show("Ваша отметка записана")
        Con.Close()
        ...


Вернуться к обсуждению:
Работа с БД: Открытие подключения в одной форме, закрытие в другой Visual Basic .NET
Миниатюры
Работа с БД: Открытие подключения в одной форме, закрытие в другой  
0
Заказать работу у эксперта
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
17.06.2012, 13:17
Готовые ответы и решения:

Открытие формы в другой форме под ее размер
Здравствуйте, написал код чтобы в Форме1 открывалась Форма2. Как сделать чтобы Форма2 открывалась...

Закрытие одной формы и открытие другой
вот код Form1 g = new Form1(); Form3 close = new...

Открытие одной и закрытие другой формы
как сделать так что бы при нажатии на кнопку старая форма закрывалась полностью, и открывалась...

Открытие одной формы и закрытие другой с условием
Здравствуйте, проблема такая, необходимо чтобы при условии открылась одна форма и закрылась...

1
17.06.2012, 13:17
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
17.06.2012, 13:17
Помогаю со студенческими работами здесь

Открытие и работа в БД MySQL в другой форме
Здравствуйте! У меня возникла следующая проблема: есть две формы, одна форма авторизации,а вторая...

Закрытие формы и открытие другой
Товарищи, помогите, подскажите как закрыть форму. Дело вот вот в чем: есть главная форма: ...

Закрытие одной формы из другой
Доброго времени, подскажите пожалуйста! Не могу написать connect для закрытия двух форм, вторая...

Закрытие одной активити из другой
Собственно, вопрос понятен из темы. Он вытекает из наличия в задании обязательной кнопки выхода. ...

0
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2024, CyberForum.ru