Upozorňujeme, že diskuze pod našimi online kurzy jsou nemoderované a primárně slouží k získávání zpětné vazby pro budoucí vylepšení kurzů. Pro studenty našich rekvalifikačních kurzů nabízíme možnost přímého kontaktu s lektory a studijním referentem pro osobní konzultace a podporu v rámci jejich studia. Toto je exkluzivní služba, která zajišťuje kvalitní a cílenou pomoc v případě jakýchkoli dotazů nebo projektů.
Ono to totiž chyba není, občas se toho může využít. Pouze to však nedoporučuje.
Sice mě napadlo, jak by se toho dalo využít, ale takové hnusné hacky se do programů dávat nemají. Je lepší, když se programátor drží vlastního pravidla, že modifikování řídící proměnné cyklu mimo jeho hlavičku je zakázáno.
Využít se toho dá, ale většinou to lze řešit i jinak.
Zdravim, objavil som tento fantasticky tutorial na VB a chcem autorovi podakovat za skvelu pracu! Pustil som sa do toho a za jeden den som sa bol schopny naucit zaklady VB co je uplne uzasne!
tiez by som sa chcel opytat ze preco nefunguje mocninator?
Ak som chcel aby pocital spravne, musel som odpocitat od n 2:
Console.WriteLine("Mocninátor")
Console.WriteLine("==========")
Console.WriteLine("Zadejte základ mocniny: ")
Dim a As Integer = Console.ReadLine()
Console.WriteLine("Zadejte exponent: ")
Dim n As Integer = Console.ReadLine()
Dim vysledek = a
For i = 0 To (n - 2)
vysledek = vysledek * a
Next
Console.WriteLine("Výsledek: {0}", vysledek)
Console.WriteLine("Děkuji za použití mocninátoru")
Console.ReadKey()
len takto som dostaval spravny vysledok.
jo máš pravdu, protože zcela podle záměru by to mělo být
Console.WriteLine("Mocninátor")
Console.WriteLine("==========")
Console.WriteLine("Zadejte základ mocniny: ")
Dim a As Integer = Console.ReadLine()
Console.WriteLine("Zadejte exponent: ")
Dim n As Integer = Console.ReadLine()
Dim vysledek = 1
For i = 1 To n
vysledek = vysledek * a
Next
Console.WriteLine("Výsledek: {0}", vysledek)
Console.WriteLine("Děkuji za použití mocninátoru")
Console.ReadKey()ale i tvoje řešení je správné.
Funkce PadLeft vrátí string odsazený na danou velikost. Například když máš string "ahoj" a chceš ho třeba zarovnávat do sloupce o velikosti 10 znaků. Tak dáš
Dim doSloupce = "ahoj".PadLeft(10)což do proměnné doSloupce uloží 6 mezer a ahoj, tedy(bez uvozovek)
" ahoj"ještě tam můžeš uvést jakým znakem se má odsazovat.
Dim doSloupce = "ahoj".PadLeft(10, "!")
' doSloupce = "!!!!!!ahoj"Děkuji za promptní odpověď 
Ještě bych se v této souvislosti zeptal, v případě že mám
číslo kde je rozmezí 1-3 znaků(1,10,100), je možné udělat odsazení?
např. k jednocifernému číslu přidej 2 mezery a k dvojcifernému 1 mezeru
atd.?
Děkuji
Jirka
samozřejmě. Převedeš číslo na text a pak už s tím pracuješ stejně jako jsem ukázal výš.
Dim cislo = 5
Dim text = cislo.ToString()
Dim odsazeno = text.padLeft(3)Zobrazeno 10 zpráv z 11.
