That's an interesting idea Gargoyle. Thanks. But before I do that, I need to ask for some help with my code again.
I removed the section displaying what printers are already set up and which is the default.
I figure the user should already know that info. But now I'm having trouble showing my 'Choose Printer' text box.
I looked at the kixforms on line help and saw that I could add multiline and scroll bar elements to my properties.
But obviously I'm not doing it right. Can someone please provide some direction?

Code:
  
;region Script Settings
;kix32.exe
;
;%TEMP%
;C:\Documents and Settings\Jeremy Schubert\My Documents\AdminScriptEditor
;
;True
;
;True
;
;False
;True
;True
;False
;
;
;True
;
;
;1.0.0.1
;
;
;
;
;
;
;
;endregion

; **************** Variable Settings ************** 
Break On 
$System = CreateObject("Kixtart.System") 
If Not $System
   $nul= MessageBox("KiXforms Not Initiated. This Script Will Now Close.","Error",16)
   Quit()
EndIf

$Form = $System.Form() 
$Form.Text = "St. Matthew School Computer Network - Admin Side Printer Install" 
$Form.Width = 600 
$Form.Height = 600 
$Form.BackColor = $Form.RGB(255,255,0) 

$panel = $form.Controls.Panel() 
$panel.Dock = "top" ;resize for your needs 
$panel.BackgroundImage = "\\s096-a0290-01\sch030$\printers\matthew.jpg" 

$PrinterChoices = $Form.Controls.Button()
$PrinterChoices.Height = 450
$PrinterChoices.Left = 10
$PrinterChoices.Multiline = True
$PrinterChoices.Text = "Please enter a printer selection" + Chr(13) + Chr(10) + 
"Enter 1 to setup the Library Printer" + Chr(13) + Chr(10) + 
"Enter 2 to setup the Library Printer as your default printer" + Chr(13) + Chr(10) + 
"Enter 3 to setup the Computer Lab Printer" + Chr(13) + Chr(10) + 
"Enter 4 to setup the Computer Lab Printer as your default printer" + Chr(13) + Chr(10) + 
"Enter 5 to setup the Office computer","Printer Choice" 
$PrinterChoices.Top = 25
$PrinterChoices.Width 400

$Exit = $Form.Controls.Button() 
$Exit.Cancel = "True" 
$Exit.Default = "True" 
$Exit.Height = 31 
$Exit.Left = 10 
$Exit.Text = "Click Here To Close This Window" 
$Exit.Top = 495 
$Exit.Width = 531 
$Exit.OnClick = "ExitButton()" 

$Form.Center 

$Form.Show 

;x is the variable that represents the user's choice of printer

Dim $X
Get $x

SelectAPrinter()

While $Form.Visible 
  $ = Execute($Form.DoEvents()) 
Loop 
Exit 1 

Function SelectAPrinter()

	Select
		Case x=1
			AddPrinter("10.48.18.1","Lexmark T640","\\s096-a290-01\sch030$\printers\t640.inf","Library Printer",0)
		Case x=2 
			AddPrinter("10.48.18.1","Lexmark T640","\\s096-a290-01\sch030$\printers\t640.inf","Library Printer",1)
		Case x=3
			AddPrinter("10.48.18.2","Lexmark T640","\\s096-a290-01\sch030$\printers\t640.inf","Computer Lab Printer",0)
		Case x=4 
			AddPrinter("10.48.18.2","Lexmark T640","\\s096-a290-01\sch030$\printers\t640.inf","Computer Lab Printer",1)
		Case x=5
			AddPrinter("10.48.18.3","Lexmark T640","\\s096-a290-01\sch030$\printers\t640.inf","Library Printer",1)
	EndSelect
	
EndFunction



[Long lines removed by NTDOC]

Edited by NTDOC (2006-10-01 04:30 AM)