[Help]How to shorten code into sectoins
I want to shorten my code in to region like segments, but the
#Region method doesn't work. Is there any other way to do that. My code has a lot of select case structures, and I want to make each one into a region. Here's an example:
Code:
' Primary Weapons
Select Case primary
' Assault Rifles
Case 1 And level >= 4
primaryBox.Image = My.Resources.m4a1_prev
Case 2 And level >= 4
primaryBox.Image = My.Resources.famas_prev
Case 3 And level >= 8
primaryBox.Image = My.Resources.scar_h_prev
Case 4 And level >= 20
primaryBox.Image = My.Resources.tar_21_prev
Case 5 And level >= 28
primaryBox.Image = My.Resources.fal_prev
Case 6 And level >= 40
primaryBox.Image = My.Resources.m16a4_prev
Case 7 And level >= 48
primaryBox.Image = My.Resources.acr_prev
Case 8 And level >= 60
primaryBox.Image = My.Resources.f2000_prev
Case 9 And level >= 70
primaryBox.Image = My.Resources.ak_47_prev
' Sniper Rifles
Case 10 And level >= 4
primaryBox.Image = My.Resources.intervention_prev
Case 11 And level >= 4
primaryBox.Image = My.Resources.barrett_50cal_prev
Case 12 And level >= 36
primaryBox.Image = My.Resources.wa2000_prev
Case 13 And level >= 56
primaryBox.Image = My.Resources.m21_ebr_prev
' LMG
Case 14 And level >= 4
primaryBox.Image = My.Resources.l86_lsw_prev
Case 15 And level >= 4
primaryBox.Image = My.Resources.rpd_prev
Case 16 And level >= 16
primaryBox.Image = My.Resources.mg4_prev
Case 17 And level >= 32
primaryBox.Image = My.Resources.aug_hbar_prev
Case 18 And level >= 52
primaryBox.Image = My.Resources.m240_prev
' SMG
Case 19 And level >= 4
primaryBox.Image = My.Resources.mp5k_prev
Case 20 And level >= 4
primaryBox.Image = My.Resources.ump45_prev
Case 21 And level >= 12
primaryBox.Image = My.Resources.vector_prev
Case 22 And level >= 24
primaryBox.Image = My.Resources.p90_prev
Case 23 And level >= 44
primaryBox.Image = My.Resources.mini_uzi_prev
End Select
There's about 4 more of things like that.