[VB.NET] Impossibile posizionarsi con precisione sui caratteri di un TextBox

[tony83]

Ciao scusate ho un problema:

molte textbox me le ritrovo fatte in una maniera tale che quando entro dentro che mi riporta il cursore al 1° carattere anzichè
modificare liberamente il contenuto della textbox! Vorrei sapere a proposito come riscolvere la questione e riportarlo alla normalità
senza distruggere tutte queste textbox per poi ricrearle!

GRazie ciao!

[alka]

Non si è capito un benemerito...

[tony83]

Non è porprio facile da spiegare!

Quando clicco sopra una textbox già riempita (parlo in esecuzione ovviamente!) invece che posizionarmi il cursore in mezzo alle parole delle textbox, me le evidenza e non mi lascia alcuna possibilità di muovermi con il cursore, in pratica mi porta il cursore all'ultimo carattere della parola e lo mantiene evidenziato!

[alka]

Originariamente inviato da tony83
Quando clicco sopra una textbox già riempita (parlo in esecuzione ovviamente!) invece che posizionarmi il cursore in mezzo alle parole delle textbox, me le evidenza e non mi lascia alcuna possibilità di muovermi con il cursore, in pratica mi porta il cursore all'ultimo carattere della parola e lo mantiene evidenziato!

Nemmeno se poi ti sposti con il cursore dopo aver fatto clic?

[tony83]

Originariamente inviato da alka
Nemmeno se poi ti sposti con il cursore dopo aver fatto clic?

si ovviamente ma è parecchio scomodo.. come è possibile?

[alka]

Originariamente inviato da tony83
si ovviamente ma è parecchio scomodo.. come è possibile?

Probabilmente hai definito qualche evento sulle caselle, altrimenti non si spiega come mai sul tuo PC quella famiglia di controlli si comporti sempre in quel modo.

[tony83]

Originariamente inviato da alka
Probabilmente hai definito qualche evento sulle caselle, altrimenti non si spiega come mai sul tuo PC quella famiglia di controlli si comporti sempre in quel modo.

ok come devo procedeere?

[oregon]

Ma scusa Tony, tu e il tuo programma non vi "parlate"?

Perche' non controlli il codice che c'e' negli eventi delle textbox e scopri qual e' il problema?

O, in alternativa, perche' non ci mostri tale codice?

In mancanza di questo codice, come ti possiamo mai aiutare?

[tony83]

Originariamente inviato da oregon
Ma scusa Tony, tu e il tuo programma non vi "parlate"?

Perche' non controlli il codice che c'e' negli eventi delle textbox e scopri qual e' il problema?

O, in alternativa, perche' non ci mostri tale codice?

In mancanza di questo codice, come ti possiamo mai aiutare?

Ok controllerò in caso vi farò sapere!!

Grazie ciao

[tony83]

ho controllato negli eventi delle textbox ma niente!!...

questo è il codice:

    Private str_sql As String

    Private Sub cmb_anni_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles cmb_anni.SelectedIndexChanged
        Call caricaListView()
    End Sub

    Private Sub tbc_spese_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles tbc_spese.SelectedIndexChanged
        If tbc_spese.SelectedIndex = 1 Then
            Me.Close()
            FormSpese.CustomerForm = Nothing
        End If
    End Sub

    Private Sub btt_nuova_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btt_nuova.Click
        If Trim(txtId_stabile.Text) = "" Then
            MessageBox.Show("Selezionare stabile.", "", MessageBoxButtons.OK, MessageBoxIcon.Exclamation)
            txtId_stabile.Focus()
            Exit Sub
        End If
        If FormNuovaSpesa.CustomerForm Is Nothing Then
            Dim frmNuovaSpesaChild As New frmNuovaSpesa()
            frmNuovaSpesaChild.MdiParent = Me.MdiParent
            frmNuovaSpesaChild.Show()
            FormNuovaSpesa.CustomerForm = frmNuovaSpesaChild
            FormNuovaSpesa.CustomerForm.int_idStabile = CInt(txtId_stabile.Text)
            Call recuperoIdSocieta()
        Else
            FormNuovaSpesa.CustomerForm.Show()
            FormNuovaSpesa.CustomerForm.int_idStabile = CInt(txtId_stabile.Text)
            Call recuperoIdSocieta()
        End If

    End Sub

    Private Sub frmSpese_Closed(ByVal sender As Object, ByVal e As System.EventArgs) Handles MyBase.Closed
        If Not FormNuovaSpesa.CustomerForm Is Nothing Then
            FormNuovaSpesa.CustomerForm.Close()
            FormNuovaSpesa.CustomerForm = Nothing
        End If
        Dim objFunzioni As New ClasseFunzioni.Funzioni()
        objFunzioni.SetList("", FormMenù.CustomerForm.ListView1)
        objFunzioni.CloseConnection()
        objFunzioni = Nothing
    End Sub

    Private Sub caricaListView()
        If cmb_anni.Text <> "" Then
            Dim objFunzioni As New ClasseFunzioni.Funzioni()
            objFunzioni.SetList("Spesa", lst_spese)
            Exit Sub
        End If
    End Sub

    Private Sub recuperoIdSocieta()
        str_sql = "SELECT [Societa].[id_societa] " & _
        "FROM (Societa INNER JOIN Complesso ON [Societa].[id_societa]=[Complesso].[id_societa]) " & _
        "INNER JOIN Stabile ON [Complesso].[id_complesso]=[Stabile].[id_complesso] " & _
        "WHERE ((([Stabile].[id_stabile])= " & txtId_stabile.Text & "));"
        Dr = obj_funzioniDb.fnzExecuteRead(str_sql)
        If Dr.Read Then
            FormNuovaSpesa.CustomerForm.int_idSocieta = Dr("id_societa")
        End If
        Dr.Close()
    End Sub

Questa occasione sembrerebbe verificarsi dopo il click sulla listview dove viene riportare il testo dalla lista alla text