Here's one way, of many.
I made 9 dropdowns, each with items of ["YES", "NO", "N/A"]
each ones onchange had the following code
Switch(q1.Selected.Value,
"YES",Set(PointCount1,1);Set(TotalCount1,1),
"NO",Set(PointCount1,0);Set(TotalCount1,1),
"N/A",Set(PointCount1,0);Set(TotalCount1,0));
Set(RunningScore, Sum(PointCount1,PointCount2,PointCount3,PointCount4,PointCount5,PointCount6,PointCount7,PointCount8,PointCount9));
Set(RunnignQuestionCount, Sum(TotalCount1,TotalCount2,TotalCount3,TotalCount4,TotalCount5,TotalCount6,TotalCount7,TotalCount8,TotalCount9))
(except the 1 becomes 2 3 4 5 6 7 8 9 respectively for each subsequent dropdown so they each have and maintain their own individual counts)
next to them i have 3 labels, text of each is below
"Total Yes: "&RunningScore
"Total Questions: "&RunnignQuestionCount
"Score: "&RoundDown(RunningScore/RunnignQuestionCount*100,0)&"%"