Spread6的SelText属性的用法

收藏

你好，我想请教以下的问题。

Spread6的SelText属性如何使用，请提供一个例子代码。

以下是我做的代码例子，在替换的时候，只有加了DoEvents才能替换。
如果不要DoEvents那么这个属性似乎只是把光标放在了Cell里的文字的最后位置。
---------------------------------------------------
With Me.vaSpread1
.SetFocus
.SetActiveCell 2, 1
.Col = 2
.Row = 1
.EditMode = True

DoEvents

.SelStart = 3
.SelLength = 0
.SelText = "XX"
End With

---------------------------------------------------

czfolly · czfolly

补充一下，如果不加DoEvents这句话，这三个属性的作用是什么？

gw0506 · gw0506

你用的是什么版本的Spread 6，看着有点迷糊。
SelText是Spread for ActiveX的接口。
SetActiveCell 是WinForms的接口。

你用的是什么产品，什么平台上做开发？

czfolly · czfolly

本帖最后由 czfolly 于 2016-3-9 11:36 编辑

你好我用的是Spread for ActiveX VB6程序
附件是我做的VB6的例子

请参考

gw0506 · gw0506

抱歉，今天来了几个重要客户，给你回复晚了。
不需要前面那些代码，直接后半段就好了。

fpSpread1.SelStart = 2
fpSpread1.SelLength = 2
fpSpread1.SelText = "XX"
' Concatenate the word "Hello" to the currently selected text
fpSpread1.SelText = fpSpread1.SelText + "Hello"

复制代码

czfolly · czfolly

收到，我试一下谢谢

gw0506 · gw0506

不客气，有问题我们继续讨论。

czfolly · czfolly

你好，按照你指导的，只写了以下三句后，我点击按钮什么也没有反应，附件是我截取的图，麻烦你在帮我看看。谢谢

fpSpread1.SelStart = 2
fpSpread1.SelLength = 2
fpSpread1.SelText = "XX"
' Concatenate the word "Hello" to the currently selected text
fpSpread1.SelText = fpSpread1.SelText + "Hello"

czfolly · czfolly

追加问题：

我的这三句是写在按钮的事件里边的。 VB6+Active X Spread6

请问你的这三个属性是写在什么地方。也是按钮的事件吗？

如果可以的话，麻烦你把昨天VB6的哪个例子修改好，告诉我怎么操作，谢谢。

gw0506 · gw0506

你这个环境特殊，我们还在重建环境。
不过从你的代码看，建议你可以试一下先setfocuse，然后再执行后面的那些代码。

		自动登录	找回密码
密码			立即注册

[已处理] Spread6的SelText属性的用法

20 个回复

活字格认证