Diskuze: Tisk ve Visual Basic 2010
V předchozím kvízu, Test znalostí C# .NET online, jsme si ověřili nabyté zkušenosti z kurzu.


Zobrazeno 13 zpráv z 13.
K personalizaci obsahu a reklam, poskytování funkcí sociálních médií a analýze naší návštěvnosti využíváme soubory cookie. Informace o tom, jak náš web používáte, sdílíme se svými partnery pro sociální média, inzerci a analýzy. Partneři tyto údaje mohou zkombinovat s dalšími informacemi, které jste jim poskytli nebo které získali v důsledku toho, že používáte jejich služby.
Používáme nezbytné cookies pro fungování webu a s tvým souhlasem také analytické a marketingové cookies.
Zajišťují základní funkce, bezpečnost a služby, které sis vyžádal. Nelze je vypnout.
| Služba | Poskytovatel | Účel | Cookies a úložiště | Doba uložení |
|---|---|---|---|---|
| ITnetwork | ITnetwork | Provoz webu, relace, přihlášení a uložení nastavení cookies. | PHPSESSID, auth_token, sid, itn_consent_impression, __Host-itn_consent | Relace až 1 rok |
| Google Tag Manager | Správa značek a načítání měřicích nástrojů webu. | Žádné | Neukládá se | |
| Google Fonts | Načítání typografie webu. | Úložiště řízené poskytovatelem | Dle podmínek poskytovatele | |
| Google Hosted Libraries | Načítání potřebných knihoven a stylů webu. | Úložiště řízené poskytovatelem | Dle podmínek poskytovatele | |
| Google reCAPTCHA | Ochrana formulářů a webu před zneužitím. | _GRECAPTCHA, rc::a, rc::b, rc::c, rc::f | Relace až 180 dní | |
| YouTube | Přehrávání vloženého video obsahu. | localStorage, IndexedDB; cookies after playback interaction | Relace až trvalé úložiště | |
| Vimeo | Vimeo | Přehrávání vloženého video obsahu. | __cf_bm, _cfuvid, vuid, localStorage, IndexedDB | Relace až 2 roky |
| Facebook Login | Meta | Přihlášení pomocí účtu třetí strany. | Úložiště řízené poskytovatelem | Relace až 1 rok |
| GoPay | GoPay | Zpracování uživatelem vyžádané platby. | Úložiště řízené poskytovatelem | Dle podmínek poskytovatele |
Pomáhají nám porozumět používání webu a zlepšovat ho.
| Služba | Poskytovatel | Účel | Cookies a úložiště | Doba uložení |
|---|---|---|---|---|
| Google Analytics 4 | Měření návštěvnosti a používání webu. | _ga, _ga_* | Až 2 roky | |
| Microsoft Clarity | Microsoft | Měření návštěvnosti a používání webu. | _clck, _clsk, _cltk | Relace až 1 rok |
Slouží k měření kampaní, personalizaci reklamy a marketingové komunikaci.
| Služba | Poskytovatel | Účel | Cookies a úložiště | Doba uložení |
|---|---|---|---|---|
| Google Ads | Měření kampaní, reklama a remarketing. | _gcl_au, _gcl_ls | Relace až 90 dní | |
| Meta Pixel | Meta | Měření kampaní, reklama a remarketing. | _fbp, _fbc, localStorage | Až 90 dní |
| Sklik | Seznam.cz | Měření kampaní, reklama a remarketing. | retargeting, sid, szn:* | Relace až trvalé úložiště |
| LinkedIn Insight | Měření kampaní, reklama a remarketing. | bcookie, li_gc, lidc, __cf_bm | Relace až 1 rok | |
| Ecomail | Ecomail.cz | Měření kampaní, reklama a remarketing. | ecmid, Úložiště řízené poskytovatelem | Dle podmínek poskytovatele |
| Atribuce kampaní ITnetwork | ITnetwork | Přiřazení návštěvy a objednávky ke kampani. | campaign_clid[*], user_session_context | Až 1 rok |
V předchozím kvízu, Test znalostí C# .NET online, jsme si ověřili nabyté zkušenosti z kurzu.


V .NET Frameworku nad kterýjm VB.NET staví, je to
Console.WriteLine(promenna)
Právě jsem to vyzkoušel. Syntaxe v pořádku, po spuštění nevyhodí chybu, ale neudělá nic. Nevím, jestli k tomu není nutné ještě něco. Nějaká deklarace nebo .....?
Tonda
Skus to nechat vypisat do debugu, napr. Debug.WriteLine. Potom vo VS zobrazit 'View->Output->Debug'.
A nemas to v 'Release'?
Posli ten kus kodu ...
Je tady celá sekce https://www.itnetwork.cz/vbnet , tak se na základy podívej tam.
Zdá se, že už jsem to vyřešil. Ani z knížek, ani z výše uvedené
aresy. Pouze zkoušením Pokus-Omyl.
Až to pořádně odzkouším, tak sem umístím kod.
Tonda
Public Sub Tiskni()
Dim Tisk_promenne As New PrintDocument
AddHandler Tisk_promenne.PrintPage, AddressOf Tiskni
Tisk_promenne.Print()
End Sub
Private Sub Tiskni(ByVal sender As Object, ByVal ev As
PrintPageEventArgs)
ev.Graphics.DrawString("Tak už to konečně tiskne !", New Font("Courier
New", 10, _ FontStyle.Regular), Brushes.Black, 20, 20)
ev.HasMorePages = False
End Sub
V helpech i v knížkách jsou různé příklady tisku, ale ten můj
konkrétní jsem nikde nenašel. Přecházím z VB6 a připadám si jako
začátečník. Těch dotazů asi postupně bude víc.
Každopádně všem děkuji.
Omlouvám se za chybu, mám stejné názvy procedur. 
Přecházím z VB6 a připadám si jako začátečník. Těch dotazů asi postupně bude víc.
Nebylo by jednodušší, nejdřív si prostudovat ten tutoriál a pak se
teprve ptát na jednotlivé věci, které jsi nepochopil?
Na styl programování VB6 úplně zapomeň a nauč se myslet v OOP a v
.NETu.
Dokud budeš neustále porovnávat VB6 a VB.NET, tak budeš pořád na začátku
a pořád ve zmatku.
Ono je to trochu složitější. Já už programuji cca 30let. Nic profesionálního, prográmky jen tak pro sebe a pro podnikání. V 67 letech už se některé věci hůř chápou. Koupil jsem si knížky a lovím informace z internetu. Navíc neumím anglicky. Než jsem se do toho pustil hodně jsem si o tom přečetl. Samozřejmě, že né vše jsem pochopil. V těch lekcích většinou uvedou nějaký konkrétní případ, ale to je málo. Mě by se líbila lekce například "ListBox", ve které by byly všechny možnosti použití a ne jen to nejzákladnější. Ale zase si myslím, že je pozitivní to, že v tom věku mám chuť se do něčeho takového pustit. Někteří lidé v mém věku si ani neumí zapnout počítač. Zkrátka, když nebudu moci na něco dlouho přijít, tak ten dotaz napíšu. A pokud nikdo neodpoví, tak na to stejně dřív nebo později přijdu sám.
Přeji hezký zbytek dne.
Tonda
Ono možná problém je v tom, že dnes už programy nic netisknou, ale vypisují. Ten kód, ve kterém tisknete, znamená že se opravdu snažíte tisknou na (např. inkoustové) tiskárně na fyzický papír. teď je otázka, zdali chcete tisknout na tiskárně nebo "tisknout" (vypsat text) do konzolového okna na monitoru? S obojím, Vám samozřejmě můžeme pomoct.
Zobrazeno 13 zpráv z 13.