タイトル : Re^5: VB6.0で作成したEXEから起動したパワーポイント上のレ点を監視したい 投稿日 : 2012/10/12(Fri) 04:10 投稿者 : 魔界の仮面弁士
> VB6.0の場合、Form(?)を使って、 Form オブジェクトではなく、Controls コレクションでは? > Foreachで調べることが For Each ステートメントのことだとすれば: Dim sh As PowerPoint.Shape For Each sh In ActivePresentation.SlideShowWindow.View.Slide.Shapes If sh.Type = msoOLEControlObject Then If TypeOf sh.OLEFormat.Object Is MSForms.CheckBox Then Dim chk As MSForms.CheckBox Set chk = sh.OLEFormat.Object MsgBox sh.Name & "の Value は " & chk.Value & " です。", vbInformation, sh.OLEFormat.ProgID End If End If Next |