Nabídka portálu se při zobrazení článku přesouvá na konec pravého sloupce nabídek.
Ovládání jednoho formuláře z druhého |
Autor: Kočí Marek
| Zdroj:
| Vytvořeno: 10.1.2003
| Publikováno: 10.1.2003
| Čtenářů: 3247
| Unikátních: 3199
|
Článek pro začátečníky ve Visual Basicu. Vytvoření řídícího a řízeného formuláře není nic složitého
Chcete ovládat z jednoho formuláře VB formulář druhý?
Zde uvedený postup demonstruje jak na to:
- Nejprve vytvořte standardní projekt (Project1)
- Vytvořte druhý formulář (Form2)
- Na Form1 vložte :
TextBox (Text1)
CommandButton (Command1)
- Na Form2 vložte:
TextBox (Text1)
- Do Form1 vložte tento kód:
Option Explicit
Dim frmOvl As New Form2
Private Sub Command1_Click()
With frmOvl
.Text1.Text = Text1.Text
End With
End Sub
Private Sub Form_Load()
With frmOvl
.Caption = "Test ovládaného formuláře."
.Width = 6000
.Height = 4000
.Show
End With
End Sub
Private Sub Form_Unload(Cancel As Integer)
frmOvl.Hide
Unload frmOvl
Set frmOvl = Nothing
End Sub
Po spuštění se otevře Formulář 1 a 2, formulář 2 bude mít
Caption (Titulek): "Test ovládaného formuláře". Pokud na Formuláři
1 změníte text v TextBoxu a odešlete tlačítkem, změní se i obsah textboxu
na druhém formuláři.
|