条件文の乱立で質問させてください
下記のようなプログラムを作ったのですが、見た目もわかりにくく
変数も条件文も大変多くなってしまい、おそらく負荷もかかっているではないかと考えています
N1〜N8まで８個同じプログラムの繰り返しとなり、
それを最後にL・M・Sでそれぞれ８個を合計する必要があるのですが、
If N1 = 0 Then
SN1 = 0: MN1 = 0: LN1 = 0
ElseIf N1 = 1 Then
SN1 = 1: MN1 = 0: LN1 = 0
ElseIf N1 = 2 Then
SN1 = 1: MN1 = 1: LN1 = 0
Else
SN1 = 1: MN1 = 1: LN1 = 1
End If
'これをN1からN8まで
きれいにまとめるためにヒントもしくは例文教えてもらえたらと思います。
よろしくおねがいします。