VB Migration Partner

KNOWLEDGE BASE - Language


Previous | Index | Next 

[PRB] The vbDefaultButton4 constant might not be converted correctly

VB6 supports the vbDefaultButton4 enumerated constants, which has the value 768 (or hex 300). VB.NET message boxes don’t support four buttons, therefore VB Migration Partner converts this constant as MsgBoxStyle.DefaultButton1 (whose value is 0). In the majority of cases this transformation works perfectly.

There are rare cases, however, when the conversion causes an issue. For example, assume that you are reading a value from an external source – for example, a file or an external COM object, and that your code contains this statement:

        Dim value As VbMsgBoxStyle
        value = ReadValueFromFile()
        If value = vbDefaultButton4 Then DoSomething

which is translated as follows:

        Dim value As MsgBoxStyle = ReadValueFromFile()
        If value = MsgBoxStyle.DefaultButton1 Then DoSomething

Under VB6 this code invokes the DoSomething method if the value read from file is equal to 768, whereas under VB.NET the method is invoked when the read value is zero.

The solution to this problem is quite simple: just add a PreProcess pragma that modifies all occurrences of vbDefaultButton4 into its numeric value:

        '## project:PreProcess "\b(VBMsgBoxStyle\.)?vbDefaultButton4", "&H300", True
Previous | Index | Next 




Follow Francesco Balena on VB6 migration’s group on

LinkedIn





Read Microsoft Corp’s official case study of a VB6 conversion using VB Migration Partner.




Code Architects and its partners offers remote and onsite migration services.

More details




Subscribe to our free newsletter for useful VB6 migration tips and techniques.

newsletter



To learn more about your VB6 applications, run VB6 Analyzer on your source code and send us the generated text file. You will receive a detailed report about your VB6 applications and how VB Migration Partner can help you to quickly and effectively migrate it to .NET.

Get free advice



A fully-working, time-limited Trial Edition of VB Migration Partner allows you to test it against your actual code

Get the Trial




The price of VB Migration Partner depends on the size of the VB6 application, the type of license, and other factors

Request a quote




Migrating a VB6 application in 10 easy steps

Comparing VB Migration Partner with Upgrade Wizard

Migration tools: Feature Comparison Table

All whitepapers