VERSION 5.00 Begin VB.Form form_add_selection Caption = "Add New Selection" ClientHeight = 1710 ClientLeft = 60 ClientTop = 345 ClientWidth = 5235 LinkTopic = "Form2" ScaleHeight = 1710 ScaleWidth = 5235 StartUpPosition = 3 'Windows Default Begin VB.CommandButton cmd_submit_selection Caption = "Submit selection" Height = 495 Left = 3720 TabIndex = 3 Top = 960 Width = 1335 End Begin VB.TextBox txt_sel_opval Height = 375 Left = 3720 TabIndex = 2 Top = 360 Width = 1335 End Begin VB.ListBox lst_operators Height = 840 Left = 2640 TabIndex = 1 Top = 360 Width = 735 End Begin VB.ListBox list_select_var Height = 840 Left = 120 TabIndex = 0 Top = 360 Width = 2295 End End Attribute VB_Name = "form_add_selection" Attribute VB_GlobalNameSpace = False Attribute VB_Creatable = False Attribute VB_PredeclaredId = True Attribute VB_Exposed = False Option Explicit Option Base 1 Sub Form_Load() Dim x As Variant For Each x In var_coll list_select_var.AddItem (x) Next End Sub