Autor | Zpráva | ||
---|---|---|---|
Zarkan Profil * |
Zdravím,
hned na úvod - vůbec nevím kam jsem měl zařadit tento dotaz, tak když tak pardon kdybych byl úplně jinde ... každopádně mám menší začátečnickém problém v Microsoft Visual Studiu – v designu jsem si udělal 3 jednoduchý položky: combobox – kde mám seznam 3 položek, pak button – jakmile si vyberu jednu ze tří položek tak kliknu na tento buton a třetí věc je textbox – zde bych chtěl mít po kliknutí na tlačítko text který zadám do kódů, ale bohužel nevím jak na to :( jediné co jsem tak nějak našel byl MsgBox, ale to se mi nelíbí. S MVS jsem kamarád teprve pár hodin, tak pardon za takový jednoduchý dotaz, ale fakt tomu zatím nerozumím. |
||
Louka Profil |
#2 · Zasláno: 10. 5. 2011, 13:16:11
Neuvádíš jazyk, ale obyčejně to bývá tak, že dvojklikem na tlačítko se ti automaticky vytvoří ovládací funkce. Do té pak napiš:
TextBox1.Text='Můj text'; Ten TextBox1 si nahraď jménem toho textboxu, ale implicitně se to jmenuje takto. Pozor: Nesnaž se udělat si vlastní handler té klikací události, protože nestačí mít jen fci Button1_Click(), ale musí být definována i v jiných souborech - to píšu jen proto, aby ses nesnažil si ji přejmenovat. |
||
Zarkan Profil * |
#3 · Zasláno: 10. 5. 2011, 14:05:58
Louka:
Díky :) Klik jsem na to tlačítko 2x a dopsal tam toto: Select Case ComboBox1.SelectedIndex Case 0 TextBox1.Text = "text který se zobrazi v TextBox1 u 1. v seznamu" Case 1 TextBox1.Text = "text který se zobrazi v TextBox1 u 2. v seznamu" End Select A teď ještě jestli se můžu zeptat v tom Textboxu1 mám teďka ten text. V designu si přidám další tlačítko - Button2 a to bych chtěl, aby mě po kliknutí na něj se daný text smazal. Chápu, že kliknu 2x na to tlačítko button2 a dopíšu asi něco ve smyslu "Delete.TextBox1", ale nevím jak přesně to má být. |
||
Mike8748 Profil |
#4 · Zasláno: 10. 5. 2011, 14:11:40
Zarkan:
pro smazani textu nastav prazdny obsah TextBox1.Text=""; |
||
Zarkan Profil * |
#5 · Zasláno: 10. 5. 2011, 14:15:49
Mike8748:
Diky taky možnost to mě nenapadlo - jak jednoduchý :D, ale určitě by to mělo jit i nějak přes to delete ne? |
||
Mike8748 Profil |
#6 · Zasláno: 10. 5. 2011, 14:26:43 · Upravil/a: Mike8748
Zarkan:
ještě by to šlo například přes TextBox1.Clear(); nevim co máš na mysli tím "Delete.TextBox1", protože to je nesmysl (nemáš objekt Delete, s metodou/vlastností TextBox1)... ale pokud si tím myslel to co myslím žes myslel, tak tím by jsi smazal celý TextBox1 jakožto objekt (tedy by přestal existovat celkově, ne že by se smazal pouze jeho obsah) |
||
Zarkan Profil * |
#7 · Zasláno: 10. 5. 2011, 14:35:47
Mike8748:
Psal jsem něco ve smyslu - pravě že jsem nevěděl jestli tam má byt delete nebo clear, jestli má být první jedno z těchto slov nebo jestli napřed TextBox1 a jestli mezi tím má byt mezera nebo tečka ... Každopádně děkuji :) |
||
Zarkan Profil * |
#8 · Zasláno: 10. 5. 2011, 14:46:23
Dál bych se chtěl zeptat když mám v tom rolovacím seznamu – combobox1 dvě položky a mám je tam uloženy takto: ComboBox1.Items.Add("prvni") a pod tím úplně stejně akorát druha. A teďka bych chtěl do seznamu přidat další, ale už ne tímto způsobem (znovu zkopčím a přepíšu na třetí), ale tak, že vložím další textbox (dejme tomu TextBox9) a do něho bych chtěl napsat text který by se mě přidal po kliknutí nějakého dalšího tlačítka (dejme tomu Button9) jako další (v tuto chvíli třetí pod dva které již mám pevně dané) do rolovacího seznamu (ComboBox1).
|
||
Zarkan Profil * |
#9 · Zasláno: 10. 5. 2011, 15:13:01
Zarkan:
melo by to byl něco jakože kliknu zase 2x na ten Button9 a dopíšu: ComboBox1.Items.Add = TextBox9.Text takhle to urcite nebude ale proste neco v tomto smyslu nebo ne? |
||
Mike8748 Profil |
#10 · Zasláno: 10. 5. 2011, 15:18:09
ComboBox1.Items.Add(TextBox9.Text); |
||
Chamurappi Profil |
#11 · Zasláno: 10. 5. 2011, 15:38:35
Reaguji na Zarkana:
„jestli má být první jedno z těchto slov nebo jestli napřed TextBox1 a jestli mezi tím má byt mezera nebo tečka“ Diskusní fórum o tvorbě webových stránek není optimálním místem pro rozebírání naprostých základů tvorby okenních aplikací ve Visual Basicu. „ComboBox1.Items.Add = TextBox9.Text“ Na podobné otázky se nejspíš nehodí žádné fórum. Požadovat po někom opisování prvních lekcí z programátorských učebnic do diskuse mi připadá jako nestoudné mrhání cizím časem. Použij vyhledávač. |
||
Zarkan Profil * |
#12 · Zasláno: 10. 5. 2011, 15:58:50
Mike8748:
A aby to i po zavření a znovu otevření fungovalo tak to bych chtěl už asi moc že? |
||
Louka Profil |
#13 · Zasláno: 10. 5. 2011, 16:02:09
Zarkan:
Mám pocit, že Visual Studio má "našeptávač" - nauč se ho používat a na základní věci už se nemusíš nikdy ptát. Např. začneš psát "But" a on ti tam nabídne "Button1", připíšeš tečku a on ti nabídne sloupec vlastností a metod: .Text .Width .Height atd. U každé té věci je napsáno o co se jedná a jak se to použije (které argumenty přebírá metoda, ...). Pamatuj, že metoda má za sebou závorky (kulaté) a v nich argumenty, zatímco vlastnosti objektu mají zpravidla rovná se. |
||
Louka Profil |
#14 · Zasláno: 10. 5. 2011, 17:24:40
Zarkan:
Musel bys to ukládat do souboru. V C# to šlo u RichTextBox jako RichTextBox1.Save("jméno souboru"); ale ve VB nevím... |
||
Zarkan Profil * |
#15 · Zasláno: 10. 5. 2011, 22:47:38
Louka:
Používám našeptávač, teda spíš snažím se ho používat - jak jsem psal hnedka na začátku s MVS jsem kamarád teprve pár hodin. Když mám tlačítko, richtextbox a normalni textbox, no a chtěl bych, aby se mě po každým kliknutí vepsal text, který je v textboxu do richtextboxu -> kliknu jednou napíše se mě to tam, přepíšu text kliknu znovu a pod to se napíše druhé slovo, opět přepíšu text kliknu znovu a pod to se napíše třetí slovo .... chápu to jen pro první kliknutí to by mělo byt asi takhle: RichTextBox1.Text = TextBox1.Text & vbCrLf & |
||
Zarkan Profil * |
#16 · Zasláno: 10. 5. 2011, 23:04:52
Mike8748:
U Toho ComboBoxu mám vlastně v tom seznamu dvě pevně daný položky a další přídávam teda takhle: ComboBox1.Items.Add(TextBox9.Text) no a u toho ComboBoxu mám kód viz třetí příspěvek, s tím že to pak pokračuje ještě Case 2 TextBox1.Text = TextBox2.Text. No a de mě o to, že ten case 2 až vlastně case nekonečno už není pevně zadaný slovo, ale že ho zadávám až pomocí textboxu2. No a chci se zeptat jestli by místo toho Case 2 nešlo napsat třeba case 2-nekonečno což asi ne, ale třeba 2-999 nebo to dát do závorek či uvozovek … nebo prostě musím pod tu case 2 napsat Case 3 TextBox1.Text = TextBox2.Text a pod to zase Case 4 TextBox1.Text = TextBox2.Text a pod to zase Case 5 ... |
||
Louka Profil |
#17 · Zasláno: 10. 5. 2011, 23:12:23 · Upravil/a: Louka
Zarkan:
„ebo prostě musím pod tu case 2 napsat Case 3 TextBox1.Text = TextBox2.Text a pod to zase Case 4 TextBox1.Text = TextBox2.Text a pod to zase Case 5 ...“ není něco jako default: TextBox1.Text = TextBox2.Text; A ten tvůj problém s přidáváním slov... neznám syntaxi VB, ale jestli chceš prostě připisovat do RichTextBoxu, tak jsem to dělal RichTextBox1.Text += hodnota; RichTextBox1.Text += TextBox1.Text+"\n"; EDIT už jsem moc dlouho vzhůru, oprava - chyběl tam .Text |
||
Zarkan Profil * |
#18 · Zasláno: 10. 5. 2011, 23:29:28
Louka:
Já ji právě taky moc neznám :D takže proto tady takhle dneska blbnu - jako chápu HTML a i dá se říct že i PHP, ale prostě mám úkol to děl takhle a tím pádem vůbec nevím. Jinak díky s tím přidávání - taky mě to mohlo napadnout, že se to nemá jen rovnat, ale že to k tomu ještě musím přičíst – to je tak jednoduchý, když si to člověk uvědomí, teda spíš když ho k tomu někdo dokope :D – díky moc |
||
Zarkan Profil * |
#19 · Zasláno: 11. 5. 2011, 17:53:20
[#16] Zarkan
Můžu se ještě jednou zeptat pokud někdo neví jak bych mohl tento kód nahradit: Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click Select Case ComboBox1.SelectedIndex Case 0 TextBox1.Text = "jedna" Case 1 TextBox1.Text = "dve" Case 2 TextBox1.Text = TextBox2.Text Case 3 TextBox1.Text = TextBox2.Text Case 4 TextBox1.Text = TextBox2.Text Case 5 TextBox1.Text = TextBox2.Text Case 6 TextBox1.Text = TextBox2.Text Case 7 TextBox1.Text = TextBox2.Text Case 8 TextBox1.Text = TextBox2.Text Case 9 TextBox1.Text = TextBox2.Text End Select End Sub Prostě jak nahradit, abych tam mohl napsat třeba jen Case 2-9 nebo něco v tomto smyslu a zabralo to proste jen 2 řádky a ne 16 jak to mám teďka. Nebo kdybych tam neměl 9, ale prostě nějaký velký číslo třeba číslo n. |
||
Chamurappi Profil |
#20 · Zasláno: 11. 5. 2011, 18:07:45
Reaguji na Zarkana:
Proč se zase ptáš na takovou základní věc lidí? To opravdu nejsi schopen najít si žádný příklad? Výsledky hledání „vb select case“ v Googlu: 1 • Select...Case Statement (Visual Basic) 2 • Select Case Statement in Excel VBA Macro Code. Alternative to ... 3 • DevGuru VBScript Statement: Select Case 4 • Visual Basic Tutorial Lesson 8: Select Case....End select Control ... 5 • VBScript Tutorial - Select Case 6 • VBScript Conditional Statements 7 • Visual Basic .NET for Beginners - Select Case Statements 8 • VBA Select Case |
||
Zarkan Profil * |
#21 · Zasláno: 11. 5. 2011, 18:52:00
Chamurappi:
Tak pardon, že tomu nerozumí, ale od toho to fórum je nebo ne? Jinak každopádně děkuji :) |
||
Chamurappi Profil |
#22 · Zasláno: 11. 5. 2011, 18:55:46
Reaguji na Zarkana:
Není. Smyslem tohoto fóra je poradenství v oblasti tvorby webových stránek, ne tlumočení učebnice Visual Basicu. Neznalost programovacích jazyků či nástrojů je omluvitelná, naprostá neschopnost si najít základní informace už nikoliv. |
||
Zarkan Profil * |
#23 · Zasláno: 11. 5. 2011, 19:59:53
[#14] Louka
Nevím jestli to dělám dobře mám tam tohle: ComboBox1.Items.Add(RichTextBox2.Text) RichTextBox2.Text += TextBox11.Text & vbCrLf RichTextBox2.SaveFile("pokus.doc") Normálně v textbox11 napíšu text a kliknutí na tlačítko, čímž se to zobrazí do RichTextBox2 a zároveň i uloží do pokus.doc kterej je uložen ve složce projektu (to vše v pohodě) a zároveň i přidá i nakonec rolovacího seznamu – do ComboBox1 ale tady už to nějak blbne a navíc po zavření programu to tam nezůstane. |
||
Zarkan Profil * |
#24 · Zasláno: 11. 5. 2011, 22:42:10
[#23] Zarkan
Už jsem na to přišel teďka řeším trošku jiný problém - když mám textboxu, kde mám pod sebou n řádku textu, tak jak to mám převést do combotextu, ale ne jako další jednu položku, ale právě n položek. |
||
Časová prodleva: 13 let
|
0