| |
>Sub Cap(ByVal Test As String)
>If Test = "0" Then
> Form1.トグルボタン1.Caption = "休み"
>End If
>End Sub
このコードであれば、トグルボタン３を押そうが、トグルボタン１２を押そうが、
常にトグルボタン1の Caption が変わることになります。
これは、希望の動きではありませんよね。
トグルボタン３を押した場合に、トグルボタン３の Caption を変えるには、
Cap サブプロシージャに対して「Caption を変えるのはトグルボタン３だよ」という情報を渡してやる必要があります。
この情報を渡すために使うのが、サブプロシージャや関数の引数です。
具体的には、そうした情報を Cap サブプロシージャの引数として渡すことになります。
どんな情報を渡すかということですが、
Caption を変えるトグルボタン・コントロールの名前を渡すということがまず考えられます。
この場合、引数のデータ型は String 型になります。
他方、当該トグルボタン・コントロール自体を渡すという方法もあります。
この場合、オブジェクト変数ならぬ、オブジェクト引数とでもいうものになります。
データ型は、Object 型とか、Contorl 型とかにもできますが、
できるだけ絞った方がいいので、ToggleButton 型というデータ型があれば、これがいいと思います。
後者の方が、引数のデータ量を節約できますし、
コントロールの名前に基づいてコントロールを取得するという過程を省略できるので、
有利です。
|
|
かるびの
- 16/6/3(金) 0:09 -
![[未読]](./data/access/image/read_icon.gif){kind=icon}
