A stored procedure can do what you want. The stored procedure would look something like the following:

Create Procedure GetClient
@ClientNum int

AS
SELECT * FROM tb_Client WHERE ClientNumber = @ClientNum

To call this stored procedure from VB you can use the ado command object or straight SQL:

lsSQL = "Call GetClient " & ClientNum
recordset = adoconnection.execute(lsSQL)