Public Class frmAppliances Private Sub frmAppliances_Load(sender As Object, e As EventArgs) Handles MyBase.Load lstApp.Items.Add(New Product("Electric fan", 500.0)
