找回密码
 立即注册

QQ登录

只需一步,快速开始

gengwh
论坛元老   /  发表于:2013-6-21 09:27:00
11#
回复 9楼iceman的帖子

运行环境是vs2010,inputman 7,fpspread for winform7.
回复 使用道具 举报
iceman
社区贡献组   /  发表于:2013-6-21 09:56:00
12#
回复 11楼gengwh的帖子

好的,我在调试后给你反馈。
回复 使用道具 举报
iceman
社区贡献组   /  发表于:2013-6-21 10:33:00
13#
回复 12楼iceman的帖子

请修改代码如下:

  1. Private Sub FpSpread_EditChange(ByVal sender As System.Object, ByVal e As FarPoint.Win.Spread.EditorNotifyEventArgs) Handles FpSpread.EditChange
  2.         If spdGaihan.ActiveColumnIndex = 1 Then
  3.             FpSpread.EditModeReplace = False
  4.             spdGaihan.Cells(spdGaihan.ActiveRowIndex, spdGaihan.ActiveColumnIndex).Text = Post_No_Edit(spdGaihan.Cells(spdGaihan.ActiveRowIndex, spdGaihan.ActiveColumnIndex).Text)
  5.             If spdGaihan.Cells(spdGaihan.ActiveRowIndex, spdGaihan.ActiveColumnIndex).Text.Length = 5 Then
  6.                 Dim editor As GrapeCity.Win.Spread.InputMan.CellType.GcTextBoxEditingControl = TryCast(e.EditingControl, GrapeCity.Win.Spread.InputMan.CellType.GcTextBoxEditingControl)
  7.                 editor.SelectionStart = 5
  8.             End If

  9.         End If
  10.     End Sub
复制代码
回复 使用道具 举报
gengwh
论坛元老   /  发表于:2013-6-21 12:45:00
14#
回复 13楼iceman的帖子

太谢谢了!ICEman!
回复 使用道具 举报
iceman
社区贡献组   /  发表于:2013-6-21 17:47:00
15#
回复 14楼gengwh的帖子

客气 客气
回复 使用道具 举报
12
您需要登录后才可以回帖 登录 | 立即注册
返回顶部