Na sua tabela de Orçamento vc deve ter um codigo, chave primaria...
vou supor que o nome do campo seja CODIGO.
Nao sei se se aplica ao seu caso, mas via de regra o que voce tem que fazer é:
INSERT INTO Pedidos SELECT * FROM Orçamentos WHERE Codigo = @Codigo
no VB substitue @Codigo pelo codigo do orçamento...
isso vai funcionar se as duas tabelas tiverem exatamente os mesmos campos... se for diferente voce vai precisar colocar o nome dos campos no lugar de *