Imports System.Drawing Imports System.Drawing.Drawing2D PublicClass form1Class form1 PrivateSub Button1_Click()Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click CallMe.GradientFill1(Pic1) CallMe.GradientFill2(Pic2) CallMe.GradientFill3(Pic3) CallMe.GradientFill4(Pic4) End Sub