Visual Basic - funcion toString

Hola a tod@s,
Tengo que crearme 200 tablas iguales y claro no quiero hacerlo a mano, por eso me quiero generar un programailla en visual que me lo haga. Pero tengo un problema al ponerle el nombre a las tablas:
he pensado hacer el for de la siguiente forma:

For i = 1 To 201
Dim cmd As OdbcCommand = conexionBD.CreateCommand()
'Dim nombreTabla As String = random.Next(1, 201).ToString
Dim nombreTabla As String = i.ToString()
Dim sql As String = "CREATE TABLE " & nombreTabla & " (idCamara int(1),diaHora datetime, entradas int(4), salidas int(4))"

Pero no me lo convierte a string y me da error, como lo podria solucionar?'

Prueba, en tu última línea, con esto:

Dim sql As String = "CREATE TABLE [" & nombreTabla & "] (idCamara int(1),diaHora datetime, entradas int(4), salidas int(4))"

Los nombres de tablas no se validan cuando comienzan con un caracter numérico, sin embargo, el uso de corchetes forza su validación.
Como nota adicional, sólo lo he probado en sql server 2005.

Espero que te sirva.

Saludos.

Gracias pero no ha habido suerte!!!No funciona!!
A alguien se le ocurre alguna otra forma de hacerlo!