自作関数について

解決


  2004-10-30 02:10:19  No: 117278

一枚のフォームモジュールと一枚の標準モジュールがあります。フォームにはテキストボックスがあります。フォームのオブジェクト名Form1を引数で渡し標準モジュール内の関数でフォームのテキスト内に“こんにちは”と表示させるとします。
Private Sub Form_Load()
    Module1.Saitou ("Form1")
End Sub

Public Function Saitou(a As String)
    a.Text1.Text = "こんにちわ"
End Function

エラーになるのはなぜなのでしょう。申し訳ありません。VBのかなりの初心者です


葉月  2004-10-30 02:13:11  No: 117279

フォームを渡すのだから
フォームで受け取りましょう・・・

Public Function Saitou(a As Form)

以上


  2004-10-30 02:33:33  No: 117280

すいません。やってみます


※返信する前に利用規約をご確認ください。




  


  このエントリーをはてなブックマークに追加