문자열에서 슬라이드를 호출하는 함수 만들기 string.label1.caption

Question

모든 것을 자동으로 처리하는 함수를 만들려고합니다.

여기 내 현재 코드입니다 :

Public Sub IncrementValueBeta(SlideDescription As String, SlideNumber As Integer, SlideName As String) 
    ChangeSlide (SlideNumber) 
    MsgBox ("Test: " + SlideDescription) 
    AddClicks = SlideName.ClickedTimes.Caption + 1 
    SlideName.ClickedTimes.Caption = AddClicks 
End Sub 

이 값에 번호를 추가 할 것입니다하지만 난 if SlideName = "Slide1" 1000 번 할 필요없이 짧은 코드를 만들려고 노력하고있어, 그것은 거대한 질문입니다.

여기서는 사용자가 "SlideName"과 같이 입력하려고합니다. "Slide1" 그리고 코드에서 Slide3.ClickedTimes.Caption = AddClicks처럼 사용할 것입니다. 슬라이드가 25 번의 클릭이라면 이미 26 개가 될 것입니다.하지만 내가 할 경우에만 Slide3이 아닙니다. Slidename은 제가 할 수있는 방법입니까? 어떻게 해야할지 모르겠다면, 도와 주시겠습니까?해야만하면 If bah = "bah" thenelseif bah = "bah" then 번 1000 번해야합니다.

아무도 도와 줄 수 있습니까?

Answer 1

Slides("Slide3").ClickedTimes.Caption = AddClicks은 어떤 역할을합니까? 이 경우 "Slide3" (상수)를 "SlideName"(변수)으로 바꿀 수 있고 문제가 해결되기 때문입니다.