+-1 Dim sql As String = "DROP INDEX myIdx"
'+-2 Dim sql As String = "DROP INDEX myIdx from MyTable"
' Неправильный синтаксис около ключевого слова "from".

'+-3 Dim sql As String = "DROP INDEX MyTable(myIdx)"
' Необходимо указать имя таблицы и имя индекса для инструкции DROP INDEX.

'+-4 Dim sql As String = "DROP INDEX myIdx(MyTable)"
' Необходимо указать имя таблицы и имя индекса для инструкции DROP INDEX.
ExecuteSQLStmt(sql) '

If   существует myIdx2  Then
sql = "DROP INDEX myIdx2 ON MyTable"
ExecuteSQLStmt(sql)
End If

Dim s As String
s = "SELECT * FROM sys.indexes WHERE object_id = object_id('schema.tablename') AND NAME ='indexname')"
If Exists(s) Then
     ' Ошибка	32	"Exists" не объявлен. Может быть недоступен из-за своего 
     ' уровня защиты.
     ' Проверяет наличие именованного ключа в поставщике хранилища ключей 
     ' (KSP) по умолчанию.
     ' DROP INDEX indexname ON SCHEMA.tablename;
     sql = "DROP INDEX myIdx2 ON SCHEMA.MyTable"
     ExecuteSQLStmt(sql) ' процедуре передаётся строка
End If