tagCANDY CGI VBレスキュー(花ちゃん)の Visual Basic 6.0用 掲示板
VBレスキュー(花ちゃん)の Visual Basic 6.0用 掲示板
[ツリー表示へ]  [ワード検索]  [Home]

タイトル Re^3: VB6.0で作成したEXEから起動したパワーポイント上のレ点を監視したい
投稿日: 2012/10/02(Tue) 13:28
投稿者魔界の仮面弁士
> VBAではどうすれば、Indexの設定ができるのかわかりませんでした。

コントロール配列は使えないので、自前で配列等に入れておくか、
もしくはコントロールの名前を使って検索するようにします。

Private Sub GoForward()
    Dim n As Integer
    Dim chk As MSForms.CheckBox
    Dim controlName As String
    
    Dim checkedCount As Integer
    checkedCount = 0
    
    For I = 1 To 3
        'コントロールの名前で検索(見つからないとエラー)
        controlName = "CheckBox" & CStr(I)
        Set chk = CallByName(Me, controlName, VbGet)
        If CBool(chk.Value) Then
            checkedCount = checkedCount + 1
        End If
    Next
    
    If checkedCount = 3 Then
        ActivePresentation.SlideShowWindow.View.Next
    End If
End Sub

- 関連一覧ツリー をクリックするとツリー全体を一括表示します)

古いスレッドにレスはつけられません。