1

我有以下简单的命令：

me.textbox1.databindings.clear
me.textbox1.databindings.add("text",TicketsBindingSource,"TicketSubject")

该命令成功执行，我可以在文本框中看到标题，但是一旦我点击 textbox1 光标的位置，它总是移动到位置 0 而不是我点击的文本框区域。例如，我的文本框有以下文本："Hello World". 如果我在文本框中的字母 W 或任何地方单击鼠标，则单击光标将移动到 0 索引。例如。一开始，为了向左或向右移动我的光标，我必须用我的键盘箭头键来做到这一点。

有人知道我该如何解决这个问题吗？

public sub LoadTicket(byval TicketID as integer)

    Dim CmdString As SqlClient.SqlCommand = New SqlClient.SqlCommand("Select * from CRMTicketDetails where ID=" & TicketID, ConnestionString)

    TicketTA.SelectCommand = CmdString
    TicketDS.Clear()
    TicketTA.Fill(TicketDS, "MyTable")
    TicketsBindingSource.DataSource = TicketDS.Tables("MyTable")
    TicketBuilder.DataAdapter = TicketTA 

    me.textbox1.databindings.clear
    me.textbox1.databindings.add("text",TicketsBindingSource,"TicketSubject")

End Sub
4

1 回答 1

0

好的，我终于找到了我的问题，这很奇怪。我的表单具有以下设置

        With Form_
            .TopLevel = False
            .MdiParent = MainForm
            .Parent = MainForm.SplitContainer1.Panel2
            .FormBorderStyle = Windows.Forms.FormBorderStyle.FixedToolWindow
            .Dock = DockStyle.Fill
            .Show()
            .BringToFront()
        End With

解决问题的简短版本

form.borderstyle=none
于 2012-12-18T13:31:26.140 回答