VB6中SSCheck.Value的输出是多少？

Question

我有第三方控制SSCheck，我发现最近在我的项目中没有支持。也许它的DLL或OCX已损坏或被删除。我没有得到这个问题的确切原因。现在我的问题是：

我可以使用哪种内置控件替换SSCheck控件？也许答案是CheckBox。如果CheckBox是答案，那么请建议我SSCheck.Value的输出，以便我可以相应地调整代码。

Answer 1

SSCheck控件是一个复选框，用于替换或增强VB6工具箱中的标准CheckBox控件。它作为Sheridan SSControls的一部分提供为threed32.ocx，即no longer supported。我认为这就是你遇到问题的原因。

您认为最佳解决方案只是使用标准控件替换应用程序中的这些第三方控件，这是正确的。特别是在SSCheck的情况下，它应该是一个非常简单，几乎可以直接替换的。

Value控件的SSCheck属性是Boolean类型，这意味着它将“True”或“False”作为其检查状态的指示符。但是，标准Value控件的CheckBox属性采用以下Integer值之一：

  

0（vbUnchecked）
  1（vbChecked）
  2（vbGrayed）

你可以在代码中的运行时设置（在这种情况下，你可能更喜欢使用提供的VB常量），或者在属性窗口的设计时设置。

因此，您唯一需要做的就是确保在代码中的任何位置更改SSCheck.Value以使用Integer（或其中一个预定义的代码）常量）值，而不是Boolean值。例如，而不是：

SSCheck1.Value = True
SSCheck2.Value = False

你会得到这个：

RegularCheck1.Value = vbChecked
RegularCheck2.Value = vbUnchecked

您会注意到标准复选框控件在选中时看起来与SSCheck略有不同。 SSCheck将检查抽取为X，与使用实际复选标记的标准Windows控件不同：