ช่วยบอก โค๊ดการคิดเปอร์เซน VB 6.0 หน่อยครับ

คือ ครูสั่งงานให้เขียนโปรแกรมร้านอาหารครับ แล้วมีการคิดเปอร์เซนด้วย ซึ่งผมไม่รู้โค๊ดครับ ใครรู้ช่วยบอกหน่อยนะครับ
โจทย์ เช่น  ซื้อครบ 100 บาท ลด 5 เปอร์เซน
รายการซื้อมีดังนี้ A1 = 20 บาท ,A2 = 35 บาท ,A3 = 70 บาท ,A4 = 40 บาท ,A5 = 120 บาท

แบบนี้นะครับ  โปรแกรมที่ผมเขียน มีที่ให้ติก 2 ที่ คือ option1 และ option2    โดย option1 เป็นค่าธรรมดาไม่มีเปอร์เซน แต่ option2 มีคือ ลด 5%
ผมอยากรู้ว่า ถ้าผมติก option2 แล้วซื้อ A1,A2,A3,A4,A5 ผมต้องเขียนโค๊ดยังไงให้มันคิดเงินและพร้อมลด 5% โดยไปแสดงที่ Textbox1

ขอบคุณล่วงหน้านะครับ