VBA Get vlookup result into 3 textbox through different rng from one lookupvalue

Dear Master's

I quite New to Forum, I need solution by vba on userform textboxes, i framed userform1 with 4 textbox (textbox1 is lookup value)
result into 3 textboxes from 3 different range

I have set of range data in 3 sheets(Previous,Present,Forecast Sheet) i want vlookup values of column 2 As price of beverage in accurate sheet depends upon name of beverage..
9 Martini Extra Dry 1919 is contains in Previousdaysheet
9 Martini Extra Dry 2285 is contains in presentdaysheet
9 Martini Extra Dry 2650 is contains in forecastdaysheet

if Lookup value is enter is Martini Extra Dry in Textbox1. get result into 1,2,3 textboxes LIke 1919,2285,2650.

End with close the form ...

find the att:-