.NET (Core and Framework)

Dim converter As New WS_Comuni

Dim converter As WS_Comuni
converter = New WS_Comuni

Dim converter As WS_Comuni = New WS_Comuni

Dim x As New Foo
Set x = Nothing
If Not(x Is Nothing) Then
    MsgBox "Boom!"
End If

'Becomes:

Dim x As Foo

If x Is Nothing Then Set x = New Foo
Set x = Nothing

If x Is Nothing Then Set x = New Foo
If Not (x Is Nothing) Then
    MsgBox "Boom!"
End If

Dave Kreskowiak wrote:

VB6 didn't support initialization during declaration.

Bastard Programmer from Hell
If you can't read my code, try converting it here[^]

window.open("Reports.aspx?arg1=value1&arg2=value2&arg3=value3", "popup", settings);

<a href="#" onclick="OpenPopupWindow()">S<pre>tatistic

function OpenPopupWindow(arg1, arg2) {

   var popupUrl = "Report.aspx?arg1=" + arg1 + "&arg2=" + arg2;
   window.open(popupUrl);
}

Public Sub ConvertToMHT(ByVal FileLocation As String)
  ActivePresentation.SaveAs FileLocation, ppSaveAsWebArchive
End Sub

For index As Integer = 0 To dv.Count - 1
    DataRowView rowView = dv(index)
    If Not IsDBNull(rowView("serial")) Then
        ' This next line is meaningless because you'll never see the textbox
        ' update on a per-row basis.  You'll only see the changes made by the
        ' last iteration of the enclosing For/Next loop.
        ' Also, why are you even bothering to try to convert DbNull to a String??
        txtSerial.Text = ...

        ' You should be moving this database Delete to it's own method.
        ' You should also be converting it to a parameterized query instead of
        ' using string concatenation to build the query.
        ' You also never execute to command, so nothing really happens here.
        ' The database connection string and connection open statements really
        ' should not be inside the For/Next loop.
    End If
Next