如何将C＃转换为VB.NET代码 [英] How do I convert C# to VB.NET code

问题描述

我在C＃中有以下if语句，我需要帮助将其转换为VB.Net。

  //  标准地址 
  if （objXmlStandardAddressNode！ =  null ）
 {
 Msc.Integration.Mncis.Library.v4.StandardAddress objStandardAddress; 
 objStandardAddress =  new  CheckNameAddress（）。getStandardAddress（objXmlStandardAddressNode， ref  aobjXmlNamespaceManager， ref  aobjBroker， ref  aobjXMLInputSoapEnvelopeDoc， ref  aobjConsumer）; 
 objParty.Addresses.Add（objStandardAddress）; 
} 

我的尝试：



我从代码转换器尝试了这个，但它无法正常工作。我得到语法错误（'TODO和周围+

 ' 标准地址 
 如果 不 objXmlStandardAddressNode   没什么 然后 
  Dim  objStandardAddress  As  Msc.Integration.Mncis.Library.v4.StandardAddress 
（'  TODO：警告!!!! NULL EXPRESSION DETECTED ...  
 + getStandardAddress（objXmlStandardAddressNode，aobjXmlNamespaceManager， aobjBroker，aobjXMLInputSoapEnvelopeDoc，aobjConsumer））
 objParty.Addresses.Add（objStandardAddress）
 结束 如果 

解决方案

我对你正在使用的库一无所知，但这样的事情应该可以解决问题：

 如果 objXmlStandardAddressNode  IsNot   Nothing  然后 
  Dim  objStandardAddress  As  Msc.Integration.Mncis.Library.v4.StandardAddress 
 objStandardAddress =（ New  CheckNameAddress）.GetStandardAddress （objXmlStandardAddressNode，aobjXmlNamespaceManager，aobjBroker，aobjXMLInputSoapEnvelopeDoc，aobjConsumer）
 objParty.Addresses.Add（objStandardAddress）
  End  如果 

I have the following if statement in C#, I need help convert it to VB.Net.

// standard address
if (objXmlStandardAddressNode != null)
{
  Msc.Integration.Mncis.Library.v4.StandardAddress objStandardAddress;
  objStandardAddress = new CheckNameAddress().getStandardAddress(objXmlStandardAddressNode, ref aobjXmlNamespaceManager, ref aobjBroker, ref aobjXMLInputSoapEnvelopeDoc, ref aobjConsumer);
  objParty.Addresses.Add(objStandardAddress);
}

What I have tried:

I tried this from code converter but it is not working. I get syntax error around ('TODO and around +

'Standard address
If Not objXmlStandardAddressNode Is Nothing Then
                Dim objStandardAddress As Msc.Integration.Mncis.Library.v4.StandardAddress
                    ('TODO: Warning!!!! NULL EXPRESSION DETECTED...
                     + getStandardAddress(objXmlStandardAddressNode, aobjXmlNamespaceManager, aobjBroker, aobjXMLInputSoapEnvelopeDoc, aobjConsumer))
                    objParty.Addresses.Add(objStandardAddress)
End If

解决方案

I don't know anything about the library you're using, but something like this should do the trick:

If objXmlStandardAddressNode IsNot Nothing Then
    Dim objStandardAddress As Msc.Integration.Mncis.Library.v4.StandardAddress
    objStandardAddress = (New CheckNameAddress).GetStandardAddress(objXmlStandardAddressNode, aobjXmlNamespaceManager, aobjBroker, aobjXMLInputSoapEnvelopeDoc, aobjConsumer)
  objParty.Addresses.Add(objStandardAddress)
End If

这篇关于如何将C＃转换为VB.NET代码的文章就介绍到这了，希望我们推荐的答案对大家有所帮助，也希望大家多多支持IT屋！