$comboboxes[$accountCount] = $main->AddCombobox(
	-name   	=> $accountName."ComboBox",
	-top    	=> $top,
	-left   	=> $left,
	-width   	=> 145,
	-height  	=> 150,
	-tabstop 	=> 1,
	-style 		=> WS_VISIBLE | 3 | WS_VSCROLL
);

foreach my $x (0..$accountCount){
	$SUB = $accounts[$x]."ComboBox_Change";
	*$SUB = sub { ComboBox $x };
}

##</code><code>##

		$uniqueWindow[$i] = $main->AddTextfield(
			-height			=> 200,
			-width			=> $w-30,
			-background	=> [255,255,255],
			-top				=> $top,
			-left				=> 10,
			-text				=> "",
			-name			=> $i."Textfield",
			-align				=> left,
			-readonly 		=> 1,
			-multiline		=> 1,
			-autovscroll 	=> 1,
			-vscroll			=> 1,
		);

	foreach my $j (0..$i-1) {
		$SUB = $j."Textfield_MaxText";
		print "-->Assigning sub function for $j\n";
		# Really?!  Do I have to do this?!
		switch ($j) {
			case 0	{*$SUB = sub { variableMaxText(0); };}
			case 1	{*$SUB = sub { variableMaxText(1); };}
			case 2	{*$SUB = sub { variableMaxText(2); };}
			case 3	{*$SUB = sub { variableMaxText(3); };}
			case 4	{*$SUB = sub { variableMaxText(4); };}
			case 5	{*$SUB = sub { variableMaxText(5); };}
			case 6	{*$SUB = sub { variableMaxText(6); };}
			case 7	{*$SUB = sub { variableMaxText(7); };}
			case 8	{*$SUB = sub { variableMaxText(8); };}
			case 9	{*$SUB = sub { variableMaxText(9); };}
			case 10	{*$SUB = sub { variableMaxText(10); };}
			case 11	{*$SUB = sub { variableMaxText(11); };}
		}
	}