Cambiar formato de fecha obtenida de SQL

Dim fechaservidor As String ='10/10/2017'

fechaservidor = DateTime.ParseExact(fechaservidor, "dd/MM/yyyy", CultureInfo.InvariantCulture).ToString("yyyy-MM-dd")

Asignar valor a una celda por el nombre del campo DataGridView

dgvboletas.Rows(e.RowIndex).Cells("Column5").Value = "0"

Ingresar una fecha y obtener el mes en palabras

Imports System.Globalization
Dim mes As String = New DateTime(2017, 2, 31).ToString("MMMM", CultureInfo.CreateSpecificCulture("es"))

Seleccionar el mes en palabras y obtener su número

Imports System.Globalization
Dim mes As String = DateTime.ParseExact("octubre", "MMMM", CultureInfo.CreateSpecificCulture("es")).Month.ToString.PadLeft(2, "0")

Select case meses

Select Case mes
            Case "Enero"
            Case "Febrero"
            Case "Marzo"
            Case "Abril"
            Case "Mayo"
            Case "Junio"
            Case "Julio"
            Case "Agosto"
            Case "Septiembre"
            Case "Octubre"
            Case "Noviembre"
            Case "Diciembre"
        End Select

Quitar ceros después del separador de miles

declare @example varchar(20) = '3923679.0000'
print substring(@example,0,charindex('.',@example))

substring(cast(t1.montoDTE as varchar(20)),0,CHARINDEX('.',cast(t1.montoDTE as varchar(20))))

Desactivar botón derecho mouse ComboBox

Private Sub cbmes_MouseDown(ByVal sender As System.Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles cbmes.MouseDown
        If e.Button = MouseButtons.Right Then
            cbmes.DroppedDown = True
        End If
    End Sub

Bloquear tecla Supr ComboBox

Private Sub cbmes_KeyDown(ByVal sender As System.Object, ByVal e As System.Windows.Forms.KeyEventArgs) Handles cbmes.KeyDown
        e.SuppressKeyPress = True
    End Sub

ComboBox no iniciar seleccionado

Seleccionar otro control...
TextBox.Select()

Recorrer combobox

For i As Integer = 0 To comboBox.Items.Count - 1
MessageBox.Show(comboBox.Items.Add(i))
Next