Nevíte-li si rady s jakýmkoliv matematickým problémem, toto místo je pro vás jako dělané.
Nástěnka
❗22. 8. 2021 (L) Přecházíme zpět na doménu forum.matweb.cz!
❗04.11.2016 (Jel.) Čtete, prosím, před vložení dotazu, děkuji!
❗23.10.2013 (Jel.) Zkuste před zadáním dotazu použít některý z online-nástrojů, konzultovat použití můžete v sekci CAS.
Nejste přihlášen(a). Přihlásit
Private Sub Command4_Click()
'Uložit
Picture1.Picture = Picture1.Image
FileName = InputBox("Ukaz cestu k souboru.", "Cesta", "*.bmp")
If FileName <> "" And FileName <> "*.bmp" Then Picture1.Picture , FileName
End Sub
Zde je zdroják který ve škole učitel napsal na tabuli, ale je nefunkční a já ani za boha nemohu přijít na to,
kde je chyba podle Microsoft VB je chyba v tomto místě Then Picture1.Picture , FileName
Zkoušel jsem nahradit Picture1.Image ale chyba byla stejná.
Za úkol jsme to nedostali pouze mne velmi zajmá proč je to nefunkční.
Offline