Miten voinlinkittää DirListBoxin ja Filelistboxin toisiinsa?
Näin:
Private Sub Dir1_Change() File1.Path = Dir1.Path End Sub
Kiitos antti tooosiii paljon! Hyvää uutta vuotta!
Joo nyt kun on sellainen ongelma että
Dim ff As Integer
Dim Fname As String
ff = FreeFile
On Error Resume Next
Open File1 For Input As #ff
Text1.Text = Input(LOF(ff), #ff)
Close #ff
koodi näyttää vain isäntäkansiossa olevat tiedostot, mutta ei jonkun toisen kansion tekstiä kun valitsen sen?
Dim Fname As String '... Open File1 For Input As #ff
Tarkotuksella eri nimi?
on on!
Valitse kaksoiskilikkauksella Dir1:llä
Ei auta. Katsos kun ongelma:
Valitsen kansion Dirlistboxilla
Valitsen tiedoston filelistboxilla
odotan että teksti aukeaa text1.text:iin.
ei aukea.
Open File1.Path & "\" & File1.FileName For Input As #ff Text1.Text = Input(LOF(ff), #ff) Close #ff
Kiitos kiitos kiitos teme! Miten muuten saisin form 1:Sestä buttonin avulla siirryttyä Form 2:seen?
Ollos hyvä :P
Tuotanoin, tähän löytyy tapoja muutama, riippuen siitä miten siirrytään.
Private Sub Command1_Click() Form2.Show 'Näyttää Form2:sen End Sub ============================ Private Sub Command1_Click() Unload Me 'Ladataan nykyinen formi pois Form2.Show 'Näytetään Form2 End Sub
Niin, eli:
Form2.Show - Avaa Form2:sen nykyisen formin päälle sulkematta sitä, ruudulla on näinollen 2 formia.
Unload Me & Form2.Show - Tässä tapauksessa nykyinen formi ladataan pois ( näkymättömiin ) ruudulta, ja sen jälkeen avataan ruudulle Form2.
kiitos taas Teme :)
nyt olen tehnyt "ohjelman" ja haluaisin alkuvalikon siihen. Nyt olen tehnyt Form 2:seen oman alkuvalikon mutta miten sen saan alkuun? normaalisti pomppaa FORM 1 :nen eikä form 2:nen.
Haluat siis, että kun ohjelma käynnistetään, näkyy Form2 ruudulla, eikä Form1? Se hoidetaan näin:
1. Visual Basicin menusta kohta "Project" -> "Project1 Properties" (alimmaisin kohta). Tuo menukohdan nimi on riippuvainen projektin nimestä.
2. Projektin ominaisuudet pitäisi olla nyt ruudulla. Siinä on kohta "Startup Object", siitä vaihdat haluamasi formin aloitukseen.
kiiiiiiiiitoooooooooooos :)!
tallennus commondialogilla--->uudelleen tallennus ilman että commondialogilla samaa tallennus nappia painaen.
Miten toteuttaa? jollain muuttuujalla?
Jos ymmärsin oikein niin tälleen:
Laita ennen mitään muuta koodia tämmönen koodi:
Dim FileName As String
Ja tallennusjuttuun:
If FileName = "" Then CommonDialog1.ShowOpen FileName = CommonDialog1.FileName 'Tähän talletuskoodi, FileName tiedoston osoitteena Else 'Tähän myös sama talletuskoodi End If
Tee rutiini, joka tarkistaa löytyykö tiedosto vai ei.
Jos löytyy, tehdään tallennus ilman commondialogia, jos ei löydy, tehdään tallennus commondialogia käyttäen.
Eli tallennuspainikkeen alle vain normaalit if lauseet.
PS. kysymyksesi on niin peruskamaa, että pieni MSDN:n tutkiminen, jopa kirjan hankkiminen olisi suotavaa ennenkuin heittelee näitä kysymyksiä.
Tai ainankin koodia, miten olet nyt ko. toiminnan toteuttanut, jotta siihen voisi antaa pätevämmän vastauksen.
Mutta älä lannistu. jokainen meistä on ollut vasta-alkaja jossain vaiheessa. ;)
Mikä olisi HELPPO kirja jossa kerrottaisiin kaikkea kivaa?
Kirjoja ei tueta. hyi hyi!
Eikös netistä löydy tarpeeksi sitä kivaa?
tuen kirjoja. vastauksia
No mutta kun kirjat ovat harvoin helppolukuisia :-(
Netistä löytyy kaikki tieto tiivistettynä.
Mä en tajua mitään tosta antin oppaasta! :(
Tuollaiset nyt ainankin on suht hyviä ja vieläpä suomenkielisiä:
- Visual Basic 6, Step By Step
- Visual Basic 6, Ohjelmoijan käsikirja
Samoin Docendolta löytyy ihan simppeli ja suht halpakin Visual sarjan kirja, joka on ihan perusteita.
http://www.docendo.fi/?t=esittely&tuote=952-5159-98-1
Aihe on jo aika vanha, joten et voi enää vastata siihen.