withを使用してコントロールを指定

解決

英国風カリー 2007-12-27 23:53:31 No: 138501

accessでは下記のような記述でコントロールを変えられたのですが、
visual basic 2005 ではmeの部分に波線が出てしまいます。
別の方法で同じようなことはできませんか?

Dim i As Integer

For i = 1 To 8

    With Me("textbox" & i)   '←ここの部分
         msgbox(.Value)
    End With

next i

特攻隊長まるるう 2007-12-28 00:11:24 No: 138502

大吉末吉 2007-12-28 01:28:33 No: 138503

とりあえず、エラーになるのは、

---------------------------------------------------
AccessのFormは、『Controlsプロパティ』が、「既定のプロパティ」として設定されていたので
『Controls』の記述を省略できた。

＃つまり、
＃> Me("textbox" & i)
＃は、本当は
＃> Me.Controls("textbox" & i)
＃となるはずのを、省略している。

しかし、VB2005のFormは「既定のプロパティ」では無いので省略できない。
---------------------------------------------------

と言う事で、省略しないで、

> With Me.Controls("textbox" & i)
とすれば、動作しそうですけど・・・

＃後、VB2005のTextBoxには「Valueプロパティ」はありませんから、
＃ここも修正しないと・・・

英国風カリー 2007-12-28 19:50:19 No: 138504

＞大吉末吉さん

ありがとうございます。
正常に動作しました。
textboxはValueじゃなくてtextでしたね。
こちらのほうもありがとうございます。