DevTrain Forum - AW: Fehlermeldung beim Klicken auf "Antwort"

Forum: VB.NET | Thema: AW: Fehlermeldung beim Klicken auf "Antwort" | Von: Thomas Duell ( 24.08.2006 08:04)

		Hallo Tom,

nachfolgend ein paar Quellcodefragmente die hoffentlich das "Geheimnis" des Fehlers lüften!! ;-)

Form1:
        Dim neuertext As New Textneu
        Dim i As Integer
        neuertext = New Textneu
        neuertext.rtext = rtCheckText.Lines
        ...
        ...
        ...
        Dim Aenderung As New Textneu(rtCheckText)
        neuertext.Show()

2.Formular (Textneu):

#Region " Vom Windows Form Designer generierter Code "

    Dim _rtb As RichTextBox

    Public Sub New()
        MyBase.New()

        ' Dieser Aufruf ist für den Windows Form-Designer erforderlich.
        InitializeComponent()

    ' Initialisierungen nach dem Aufruf InitializeComponent() hinzufügen

    End Sub

    Public Sub New(ByRef rtb As RichTextBox)
        MyBase.New()

        ' Dieser Aufruf ist für den Windows Form-Designer erforderlich.
        InitializeComponent()

     ' Initialisierungen nach dem Aufruf InitializeComponent() hinzufügen
        _rtb = rtb
    End Sub

Änderungswusch im 2. Formular:

        If ok = True Then
            rtAlterText.Text = rtNeuerText.Text
            'Try
            _rtb.Lines(10) = rtNeuerText.Text
            'Catch ex As Exception

            'End Try

        Else
            MsgBox("!!! Textzeile zu lang !!!")
            ChoiceChanged()
        End If

TD
	

Betreff Von Datum

AW: AW: Fehlermeldung beim Klicken auf "Antwort"

Ich tippe mal das ein Objekt den Wert nothing hat. Wenn es _rtb.Lines(10) wäre würde eine System.IndexOutOfRangeException Meldung kommen. Kann es sein daß _rtb den Wert nothing hat? Das könntest...

Thomas Golla 24.08.2006 09:57

AW: AW: AW: Fehlermeldung beim Klicken auf "Antwort"

Hallo Tom, du hast völlig recht, der Fehler tritt in der Zeile: _rtb.Lines(10) = rtNeuerText.Text auf, und der Wert scheint immer Nothing zu sein!! (Habe es geprüft) Aber warum ist das der...

Thomas Duell 24.08.2006 11:00

AW: AW: AW: AW: Fehlermeldung beim Klicken auf...

Hallo Thomas, prüfe bitte welchen Wert rtCheckText vor der Zeile "Dim Aenderung As New Textneu(rtCheckText)" hat und welchen Wert rtb in Public Sub New(ByRef rtb As...

Thomas Golla 24.08.2006 12:23

AW: AW: AW: AW: AW: Fehlermeldung beim Klicken...

Hallo, rtCheckText = o.k. rtb = nothing _rtb = nothing Gruß

Thomas Duell 24.08.2006 14:57

AW: AW: AW: AW: AW: AW: Fehlermeldung beim...

Also, nach "Public Sub New(ByRef rtb As RichTextBox)" ist rtb = nothing obwohl bei "Dim Aenderung As New Textneu(rtCheckText)" der Wert von rtCheckText i.O. ist? Wenn ja, dann habe ich absolut...

Thomas Golla 25.08.2006 08:32

AW: AW: AW: AW: AW: AW: AW:...

Hallo Tom, ich versteh es auch absolut nicht mehr!! Um das Forum nicht mit einem Beitrag "vollzumüllen" breche ich hier ab. Habe bereits als alternative dieses Fenster in das Hauptformular...

Thomas Duell 25.08.2006 10:36

AW: AW: AW: AW: AW: AW: AW: AW:...

Kannst du dein Proggy irgendwo zum download anbieten damit ich da mal reinschnuppern kann? Oder sende es an thomas.golla at bitsgmbh.de. In der Mittagspause kann ich dann mal drüberschauen *g* 

Thomas Golla 25.08.2006 10:51

AW: AW: AW: AW: AW: AW: AW: AW:...

Hallo nochmal, man kann mehrere Zeilen "gleichzeitig" in einer RichTextBox ändern und zwar mittels eines StringArrays. Dim strArray() As String ' Fünf Zeilen in die RTB...

Thomas Golla 25.08.2006 11:19

Antworten Vorsicht bei der Eingabe: Die Zeichen ' oder -- sind nicht erlaubt!