为何指针总在最前面?

付谦

在窗体中建了一个文本框,每输一个汉字,指针总跑到前输字的最前面,再想输入,必须先在最后点击一下,很麻烦,不知在何处设置,每输一字,指针在其后.谢谢!

roych

已屏蔽，并禁止IP一周。请LZ附上附件以便进行研讨。

付谦

回复 付谦 的帖子

请版主将无聊广告删除,

付谦

回复 付谦 的帖子

点击"党员管理系统"窗体,在输入条件的文本框中输入英文或汉字,问题就出现

zhuyiwen

Private Sub whrite_Change()
Dim tj As String                                              '定义一个变量来传递用户输入的条件
tj = Me.whrite.Text                                           '给变量赋值
Dim Myfilter As String                                        '筛选条件表达式

Myfilter = "性别 like '*" & tj & "*'"
                                '姓名字段
Myfilter = Myfilter & "or 姓名 like '*" & tj & "*'"
If txt当前名称 = "7.积极分子" Then
  Myfilter = Myfilter & "or 单位代码 like '" & tj & "*'"
Else
  Myfilter = Myfilter & "or 支部代码 like '" & tj & "*'"
End If
Me.子窗体.Form.Filter = Myfilter
Me.子窗体.Form.FilterOn = True                               '应用筛选
Me.子窗体.Requery                                            '更新子窗体
If IsNull(Me.whrite) Then
Else
    whrite.SelStart = Len(whrite)
End If
End Sub

付谦

回复 zhuyiwen 的帖子

感谢你的帮助!