Skocz do zawartości
Bartek4175

losowanie oraz odczyt textbox

Rekomendowane odpowiedzi

Witam!

 

1. A więc mam 10 textboxów i wypełniając je dane zapisują się w pliku w poszegulnych linijkach:

1 textbox w 1 linijce itp...

 

chce zrobic aby po kliknięciu przyciusku samo dodawalo dane do poszeszególnego textboxa

 

2. Chce zrobić losowanie z textboxa mam 10 textboxów i losuje jeden z nich

Odnośnik do komentarza

Dołącz do nas za darmo i naucz się zarabiać!

  • Dostęp do darmowych poradników pokazujących krok po kroku jak zarabiać w Internecie
  • Sposoby zarabiania niepublikowane nigdzie indziej
  • Aktywna społeczność, która pomoże Ci rozwiązać problemy i doradzi
  • Profesjonalne treści na temat SEO, social media, afiliacji, kryptowalut i wiele więcej!

 

 

1.Wczytywanie danych do textboxów:

textBox1.Text = File.ReadAllLines("plik.txt")[0]textBox2.Text = File.ReadAllLines("plik.txt")[1]

I analogicznie resztę + do tego biblioteka IO.

 

2. Poczytaj o random i możesz to zrobić na dwa sposoby ifem albo switchem.

Proponuję najpierw poszukać informacji na ten temat w google a jeżeli naprawdę nie dasz rady to Ci to napiszę.

  • Super 1
Odnośnik do komentarza

1.Wczytywanie danych do textboxów:

textBox1.Text = File.ReadAllLines("plik.txt")[0]textBox2.Text = File.ReadAllLines("plik.txt")[1]

I analogicznie resztę + do tego biblioteka IO.

 

2. Poczytaj o random i możesz to zrobić na dwa sposoby ifem albo switchem.

Proponuję najpierw poszukać informacji na ten temat w google a jeżeli naprawdę nie dasz rady to Ci to napiszę.

mam kod"

        textBox1.Text = File.ReadAllLines("C:\MargoBOT\wiadomosci.txt")[1]        textBox2.Text = File.ReadAllLines("C:\MargoBOT\wiadomosci.txt")[2]        textBox3.Text = File.ReadAllLines("C:\MargoBOT\wiadomosci.txt")[3]        textBox4.Text = File.ReadAllLines("C:\MargoBOT\wiadomosci.txt")[4]        textBox5.Text = File.ReadAllLines("C:\MargoBOT\wiadomosci.txt")[5]        textBox6.Text = File.ReadAllLines("C:\MargoBOT\wiadomosci.txt")[6]        textBox7.Text = File.ReadAllLines("C:\MargoBOT\wiadomosci.txt")[7]        textBox8.Text = File.ReadAllLines("C:\MargoBOT\wiadomosci.txt")[8]        textBox9.Text = File.ReadAllLines("C:\MargoBOT\wiadomosci.txt")[9]        textBox10.Text = File.ReadAllLines("C:\MargoBOT\wiadomosci.txt")[10] 

i wywala błąd:http://prntscr.com/4dqtnm

Odnośnik do komentarza

Przepraszam, mój błąd zamiast nawiasów "[]" daj "()"

I jeżeli chcesz wziąć pierwszą linijkę z pliku to musi być w tych nawiasach "0", tak już się przyjęło w programowaniu.

ok dziala tylko:

mam kod:

  Private Sub FlatButton1_Click_1(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles FlatButton1.Click        Dim di As DirectoryInfo = Directory.CreateDirectory("C:\MargoBOT")        Dim FILE_NAME As String = "C:\MargoBOT\wiadomosci.txt"        Dim objWriter As New System.IO.StreamWriter(FILE_NAME, True)        objWriter.WriteLine(TextBox1.Text)        objWriter.WriteLine(TextBox2.Text)        objWriter.WriteLine(TextBox3.Text)        objWriter.WriteLine(TextBox4.Text)        objWriter.WriteLine(TextBox5.Text)        objWriter.WriteLine(TextBox6.Text)        objWriter.WriteLine(TextBox7.Text)        objWriter.WriteLine(TextBox8.Text)        objWriter.WriteLine(TextBox9.Text)        objWriter.WriteLine(TextBox10.Text)        objWriter.Close()    End Sub

niby dziala ale gdy zapisze cos innego to zapisuje to nie wiem jakiej linijki

Odnośnik do komentarza

Jeśli chcesz dodać odpowiedź, zaloguj się lub zarejestruj nowe konto

Jedynie zarejestrowani użytkownicy mogą komentować zawartość tej strony.

Zarejestruj nowe konto

Załóż nowe konto. To bardzo proste!

Zarejestruj się

Zaloguj się

Posiadasz już konto? Zaloguj się poniżej.

Zaloguj się


×
×
  • Dodaj nową pozycję...

Powiadomienie o plikach cookie

Ta strona korzysta z ciasteczek aby świadczyć usługi na najwyższym poziomie. Dalsze korzystanie z witryny oznacza zgodę na ich wykorzystanie. Polityka prywatności .