.NET (Core and Framework)

Private Sub updateinvoicepaymentstat()
       conn.ConnectionString = "Server = '" & Servername & "';  " _
                                    & "Database = '" & DBName & "'; " _
                                    & "user id = '" & sqlUName & "'; " _
                                    & "password = '" & sqlPwd & "'"

       conn.Open()
       For x As Integer = 0 To dgvinvoicedetails.Rows.Count - 1
           Dim sqlcommand As String = "UPDATE purchaseinvoice SET partialpay=@bal where docentry ='" & dgvinvoicedetails.Rows(x).Cells(0).Value & "'"
           Dim command As New SqlCommand(sqlcommand, conn)
           command.Parameters.AddWithValue("@bal", txtoutbal.Text)
           command.ExecuteNonQuery()
           command.Parameters.Clear()
       Next x
       conn.Close()
       clear()

   End Sub

Hi Programmers,

Have you ever practiced coding online to prepare a technical interview or to groom your skills? If yes, how well it was? Which websites have you used? And, how effective they were? If possible, share the challenges you have faced?

Dim text2 As String = ""
Dim num As Integer = 1
Dim num2 As Integer
Dim num3 As Integer
Do
    ' The following expression was wrapped in a unchecked-expression
    Dim value As Integer = CInt(Math.Round(Math.Floor(CDbl((10.0F * VBMath.Rnd())))))
    text2 += Conversions.ToString(value)
    num += 1
    num2 = num
    num3 = 8
Loop While num2 <= num3