Cantidad de tablas de una base de datos SQL

SELECT COUNT(*) AS cantidad_tablas FROM sys.tables

Cantidad de tablas de una base de datos SQL

SELECT COUNT(*) FROM sys.tables

Cambiar tipo de dato de una columna SQL

ejemplo:

ALTER TABLE nombre_tabla ALTER COLUMN columna_de_tabla CHAR(600)

Borrar carpetas directorio actual

Dim path As String = Directory.GetCurrentDirectory
        Dim di As New DirectoryInfo(path)

        'Borra carpetas
        For Each dir_ As DirectoryInfo In di.GetDirectories

            Try
                dir_.Delete(True)
            Catch ex As Exception
                MessageBox.Show(ex.ToString())
            End Try
        Next

Verificar parte decimal de un número

'Limpia la parte decimal del número
    Private Sub Button4_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button4.Click
        Dim z As String = "0,9990"
        Dim x As String = z.Split(",")(1)
        Dim y As Double = x / Math.Pow(10, z.Split(",")(1).Length)
        Dim n As String = y.ToString("0." + New String("#", 10))
        MessageBox.Show(n.Split(",")(1))
    End Sub

Mostrar el archivo de solución en el Explorador de soluciones

Tools--->Options--->Projects and Solutions--->General--->Always show solution


fuente: https://blogs.msdn.microsoft.com/zainnab/2010/03/26/hide-or-show-the-solution-file-in-solution-explorer/