Dim ConnString As String = "Provider=Microsoft.Jet.OLEDB.4.0;" _
& "Data Source=C:\nomeDataBase.mdb;" Dim cn As New OleDbConnection(ConnString)


Randomize()
n = CInt(Int((15 * Rnd()) + 1))

If cn.State = ConnectionState.Open Then

Dim sql As String = "SELECT * FROM nomeTabella WHERE contatore >= ?"

Dim cmd As New OleDbCommand(sql, cn)

cmd.Parameters.Add("au_id", n)


per ora funziona la casuale contatore, ma oltre a nomeTabella ho anche nomeTabella1 e nomeTabella2 come posso fare per selezionarne una a caso lasciando anche la casualità del contatore?