|
Тема |
Перхвърляне от едн форма в друга във VB.NET |
|
Автор | VB.NET (Нерегистриран) | |
Публикувано | 27.06.04 03:49 |
|
|
Май ще спечеля гофретата по активност в този клуб, но продължавам с въпросите. Предполагам, че решението им може е полезно и за други освен за мен.
Нека първоначалната форма, която апликацията отваря е Form1. От Form1 след това отиваме във Form2. Дотук добре. Но как от Form2 да отидем обратно във Form1 или в друга някоя форма, изтривайки напълно Form2? Кодът, който се опитвам да използвам е следният:
В Module1 пиша:
Module Module1
Public frmForm1 As New Form1
Public frmForm2 As New Form2
'note: тук добавям и други форми, ако е нужно …
Sub main()
frmForm1.ShowDialog()
‘това ми е началната форма, която се отваря
‘при стартиране на програмата
End Sub
End Module
Във Form1 правя бутон със следното съдържание:
Public Class Form1
Inherits System.Windows.Forms.Form
Private StarataForma1 As New Form1
Private StarataForma2 As New Form2
[Windows Form Designer generated code]
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
StarataForma1.Hide()
'Това скрива началната форма
StarataForma2.ShowDialog()
'А това отваря новата форма
End Sub
End Class
Във Form2 правя бутон със следното съдържание:
Public Class Form1
Inherits System.Windows.Forms.Form
Private StarataForma1 As New Form1
Private StarataForma2 As New Form2
[Windows Form Designer generated code]
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
StarataForma2.Hide()
'Това скрива настоящата форма
StarataForma1.ShowDialog()
'А това отваря началната форма
End Sub
End Class
При стартиране обаче ми излиза съобщение за грешка:
An unhandled exception of type 'System.StackOverflowException' occurred in Unknown Module.
Някой има ли идея как този проблем може да се реши?
|
| |
|
|
|