| Autor | Správa |
libra4po
 Užívateľ
 Založený: 29.12.2008 Príspevky: 15
 | Zaslal: Po 29.12.08 18:44 |   |
Ahoj,
chcel by som sa spýtať ako mám zrobiť to, že napr. mám tlačidlo registrácia a že keď sa na to stlačí tak sa program presunie akokeby na form2 lenže v jednom okne.
skúsal som napr. toto:
| kód: | | raiseevent(form2.load() ); |
a stale píše chybu
Používam Microsoft VB 2008 Express edition
 |
| |
    |
 |
suchy
 Čestný člen
 Založený: 17.10.2006 Príspevky: 1770
 | Zaslal: Po 29.12.08 18:57 |   |
a co tak poslat aj znenie tej chybovej hlasky? uz by ste sa to vsetci mohli naucit |
_________________ A Real Programmer might or might not know his wife's name. He does, however, know the entire ASCII code table. | |
     |
 |
libra4po
 Užívateľ
 Založený: 29.12.2008 Príspevky: 15
 | Zaslal: Po 29.12.08 21:13 |   |
prosím prepáč no takže do toho tlačidla dám tento kód:
raiseevent(form2.load() );
a podčiarkne mi tamtú zátvorku a chybová hláška znie:
| kód: | Error 1 Identifier expected. C:\Documents and Settings\Administrator\Local Settings\Application Data\Temporary Projects\WindowsApplication1\Form1.vb 4 19 WindowsApplication1
|
a len tak nahodou nemyslel som práve tento kód že musí byť lebo to mi len kamoš poradil myslel som aj či neexistujú iné kódy |
| |
    |
 |
Patkoo
 Užívateľ
 Založený: 02.11.2008 Príspevky: 85
 | Zaslal: St 31.12.08 12:12 |   |
raiseevent je totalna hovadina. A ten tvoj kod je uplne nepouzitelny ... 2 dovody: ten kod vyzera ako Ceckovy (nakonci ; ) ... Od VB6 sa Form.Load nepouziva ...
co tak skusit prvok TabControl alebo pouzit MDI ? Ten TabControl mi prijde rozumnejsi ...
A neviem naco by si si komplikoval zivot s milion formularmi kvoli jednej registracii, ktoru mozes cez tabcontrol spravit jednoducho a rychlo ... |
| |
  |
 |
libra4po
 Užívateľ
 Založený: 29.12.2008 Príspevky: 15
 | Zaslal: St 31.12.08 14:47 |   |
sorry vies mi to vysvetlit trocha jednoduchsie? vies ja som zaciatocnik a preto neviem ako sa co presne robi
//edit
skusil som toto co si mi radil "tabcontrol" je to vsetko super presne nieco take som myslel no ako dam aby mi neukazovalo hornu listu "tabpage1"...
a aký je kód na presmerovanie z tabpage1 na tabpage2 ?
Ďakujem  |
| |
    |
 |
Patkoo
 Užívateľ
 Založený: 02.11.2008 Príspevky: 85
 |
| libra4po napísal: | sorry vies mi to vysvetlit trocha jednoduchsie? vies ja som zaciatocnik a preto neviem ako sa co presne robi
//edit
skusil som toto co si mi radil "tabcontrol" je to vsetko super presne nieco take som myslel no ako dam aby mi neukazovalo hornu listu "tabpage1"...
a aký je kód na presmerovanie z tabpage1 na tabpage2 ?
Ďakujem  |
po silvestrovskej oslave..skus si nastavit nejake parametre u toho..+ skus tabcontrol.neco.focus()...neco takee |
| |
  |
 |
libra4po
 Užívateľ
 Založený: 29.12.2008 Príspevky: 15
 | Zaslal: So 03.01.09 20:52 |   |
skusal som no nic nic sa mi nepodarilo  |
| |
    |
 |
Patkoo
 Užívateľ
 Založený: 02.11.2008 Príspevky: 85
 |
pouzi TabControl.. Vytvor si 4 tables ktore pomenujes Krok 1 az 4 a potom si daj co ja viem este jeden ktory pomenujes Dokoncenie. Na Krok 1 az 3 daj tlacitko Dalej a na stvrte napr. Dokonci. A potom staci ked budes do tlacitok vpisovat kod typu: TabControl1.SelectTab() - do zatvoriek index tabulky (rata sa od 0). Neviem co ti natom nemoze ist.. |
| |
  |
 |
libra4po
 Užívateľ
 Založený: 29.12.2008 Príspevky: 15
 | Zaslal: Po 05.01.09 13:13 |   |
ok to by bolo ale este sa chcem spytat 2 veci:
1. Co je to index tabulky a ako sa to rata ci ako
2. Nevies ako dam aby zmizla horna lista? TabPage1,2,3,4 |
| |
    |
 |
Patkoo
 Užívateľ
 Založený: 02.11.2008 Príspevky: 85
 | Zaslal: Št 08.01.09 22:18 |   |
index tabulky sa rata od 0... tj = prva tabulka bude mat index 0,druha 1, tretia 2 atp...
mozno funkcia .hide, ale ked som skusal, neisla |
| |
  |
 |
imrich
 Užívateľ
 Založený: 29.09.2007 Príspevky: 127 Bydlisko: Nové Mesto nad Váhom Vek: 33
 | Zaslal: So 23.10.10 19:09 |   |
Na internete som našiel
Private Sub Command1_Click()
'Dim i As Integer
Dim myFrm As Form1
'For i = 0 To 1
Set myFrm = New Form1
myFrm.Show
'Next
End Sub
Private Sub Command2_Click()
Dim obj As New Form1
obj.Show
End Sub
 |
| |
   |
 |
Ďuri
 Administrátor
 Založený: 11.08.2007 Príspevky: 3785 Bydlisko: Brno
 | Zaslal: So 23.10.10 19:16 |   |
imrich
Prosim neodpovedaj nasilu na niekolko rokov stare temy. |
| |
    |
 |
|