|
Registrieren
LoginInformationen über newline |
|||||
|---|---|---|---|---|---|
 Newbie braucht Hilfe beim Einlesen von Dateien |
|||||
| Verfasst am: 17.03.2011, 15:56 Aufrufe: 600 Close() 'Wir erstellen ein Array aus allen Zeilen, indem wir den String an jeder neuen Zeile splitten Dim loadarray As Array = Var1.Split(New String() {System.Environment.NewLine}, StringSplitOptions.RemoveEmptyEntries) Dim temp As String 'Jetzt müssen wir jede Zeile durchgehen: For Each temp In loadarray 'Eine Schleife, die je ... |
|||||
| Newbie braucht Hilfe beim Einlesen von Dateien |
|||||
| Verfasst am: 17.03.2011, 13:24 Aufrufe: 600 Close() Jetzt müssen wir nach deinen Zeilen suchen: 'Wir erstellen ein Array aus allen Zeilen, indem wir den String an jeder neuen Zeile splitten Dim loadarray As Array = Var1.Split(New String() {System.Environment.NewLine}, StringSplitOptions.RemoveEmptyEntries) 'Jetzt müssen wir jede Zeile durchgehen: Dim temp As String For Each ... |
|||||
| konsolen anwendung in eine forms anwendung bringen |
|||||
| Verfasst am: 28.09.2010, 17:12 Aufrufe: 621 ToArray Dim IP_Only_arr(__IPs.Count - 1) As String Dim zaehler As Integer = 0 For Each result As NetworkScanner.PingResult In __IPs IP_Only_arr(zaehler) = result.IP zaehler += 1 Next Dim clip As String = Join(IP_Only_arr, Environment.NewLine) My.Computer.Clipboard.SetText(clip ... |
|||||
| Absturz ohne Fehler (Im Debugmodus) |
|||||
| Verfasst am: 19.11.2009, 17:16 Aufrufe: 942 Text)<br><br> Dim strLinks As ArrayList = GetLinks(strSource)<br> For i As Integer = 0 To strLinks.Count - 1<br> txtLinks.Text &= strLinks(i) & Environment.NewLine<br> Next<br><br> Dim strMails As ArrayList = GetMails(strSource)<br> For i As Integer = 0 To strMails.Count - 1<br> ... |
|||||
| Post von Bildkoordinaten |
|||||
| Verfasst am: 14.11.2009, 20:06 Aufrufe: 583 y=456")<br />WebBrowser1.Navigate("http://bla.de/xy.php", "", bytArguments, "Content-Type: application/x-www-form-urlencoded" + Environment.NewLine)Dieser code geht jedoch nicht. dann habe ich versucht, die seite auf zu rufen und dann das RaiseEvent("onclick") zu benutzen. Dim theElementCollection As HtmlElementCollec ... |
|||||
| Enter mit Streamwriter schreiben? |
|||||
| Verfasst am: 09.09.2008, 19:40 Aufrufe: 996 Ich find Environment.NewLine besser. |
|||||
| text ins prog einbauen |
|||||
| Verfasst am: 26.08.2008, 21:55 Aufrufe: 1323 close ' accs.txt wird wieder geschlossen dim strdaten as string = split(strbuffer, environment.newline) ' es wird jede zeile von strbuffer in strdaten geschrieben dim straccount(0,1) as string ' hier wir dein account array deklariert for i as int32 = 0 to strdaten.getupperbound(0) ' von 0 bis zeilen-von-strbuffer if strdaten(i).startswith("u") then ' wenn die aktuelle zeile mit u anfängt denn: redim prserve straccoun ... |
|||||
| text ins prog einbauen |
|||||
| Verfasst am: 26.08.2008, 17:57 Aufrufe: 1323 (sollniss;7458)Frei ausm Kopf:Visual Basic: oh:confused:... bisschen kompliziert ... habe gradmal vbNewLine_vbCrLfIF & elseselect case&variablen...usw kennengelernt ...könntest du vielleicht noch mit hochkomma ( ' ) erklären was da von sich geht .. bzw was die begriffe bedeuten  wäre sehr nett  (habs mir um einiges einfacher vorgestellt was haltet ihr für besser, was benützt ihr mehr?Select Case oder die IF an ... |
|||||
| text ins prog einbauen |
|||||
| Verfasst am: 25.08.2008, 21:24 Aufrufe: 1323 Frei ausm Kopf:Visual Basic: [code]dim str as new streamreader("c:accs.txt")dim strbuffer as string = str.readtoendstr.closedim strdaten as string = split(strbuffer, environment.newline)dim straccount(0,1) as stringfor i as int32 = 0 to strdaten.getupperbound(0)if strdaten(i).startswith("u") then redim prserve straccount(i,0)straccount(i,0) = strdaten(i).substring(5)elseif strdaten(i).startswith("p") thenredim prserv ... |
|||||
| ich glaub, ich hab nen Bug... |
|||||
| Verfasst am: 03.07.2008, 20:37 Aufrufe: 818 |
|||||
| VB6 Funktionen in VB.NET |
|||||
| Verfasst am: 19.05.2008, 15:28 Aufrufe: 1433 |
|||||