如何在VB 6中执行类似于以下C代码的操作？
#ifdef _DEBUG_
// do things
#else
// do other things
#end if
它与您习惯的其他语言几乎相同。语法如下所示：
#If DEBUG = 1 Then
' Do something
#Else
' Do something else
#End If
如果您只记得语法与VB 6中的其他流控制语句完全相同，那么很容易记住，除了编译时条件以井号(#)开头。
诀窍实际上是定义DEBUG(或其他)常量，因为我很确定默认情况下没有定义。有两种标准方法：
>使用#Const关键字在每个源文件的顶部定义常量。以这种方式建立的定义在整个源模块中都有效。它看起来像：
#Const DEBUG = 1
>在项目属性中设置常量。这将定义一个在整个项目中有效的常量(可能是您想要的“调试”模式指示器)。
为此，请在“项目属性”对话框的“生成”选项卡上的“条件编译常量”文本框中输入以下内容：
DEBUG = 1
您可以在此对话框中定义多个常量，方法是用冒号(:)分隔每个常量：
DEBUG = 1 : VERSION2 = 1
请记住，任何未定义的常量都假定为0。