Visual Basic

Imports System.Data.OleDb

Module Module1

    Sub Main()
        Const kConnectionString = _
"Provider=MSDAORA.1;User ID=myUser; Password=myPass;Data Source=myServer;"
        Dim conn As OleDbConnection
        Dim cmd As OleDbCommand
        Dim strSql As String

        Try
            conn = New OleDbConnection(kConnectionString)
            conn.Open()
            strSql = "Create Table test1(field1 varchar(10))"
            cmd = New OleDbCommand(strSql, conn)
            cmd.ExecuteNonQuery()
            Console.WriteLine("Statement executed.")

        Catch ex As Exception
            Console.WriteLine(ex.Message)

        Finally
            cmd.Dispose()
            conn.Dispose()

        End Try

        Console.WriteLine("Press Enter...")
        Dim strWait As String = Console.ReadLine()

    End Sub

End Module

    result = number ^ exponent
 
    value = 10 ^ x

Dir("E:\", FileAttribute.Volume)