[リストへもどる]   [VBレスキュー(花ちゃん)]
一括表示

投稿時間:2006/09/08(Fri) 15:38
投稿者名:きじょう
Eメール:
URL :
タイトル:
共通のコードについて
先日は返答いただきましてありがとうございました。

VB6SP6で開発しています。
業務用のプログラムを開発しております。

印刷などのフォームで 
画面の表示とかボタンクリックなど同じ仕様にしているのですけど
修正あればそれぞれのフォームにサブルーチンコードをコピペしています。
昔習った言語には ライブラリにあるサブルーチンコードのタグを記入するだけでよかったのですが
VBにはそのような機能はないのでしょうか?
要はプロセスだけ それぞれのフォームでコードして
その他画面処理操作などイベントなどは一つにしたいとゆうことです。
 
VBでの経験はあまりありません。よろしくお願いします。

投稿時間:2006/09/11(Mon) 15:43
投稿者名:花ちゃん
Eメール:
URL :
タイトル:
Re: 共通のコードについて
ActiveX DLL のようなものでしょうか? それとも標準モジュールの事かな?

http://hanatyan.sakura.ne.jp/vbhlp/DLLFile.htm

投稿時間:2006/09/11(Mon) 20:59
投稿者名:neptune
Eメール:
URL :
タイトル:
Re: 共通のコードについて
それとも標準モジュール?の方の一番簡単な例
formを2つと標準モジュールを1つ用意
form1にはコマンドボタン2つ。form2にはコマンドボタン1つ
'////////////form1モジュール////
Option Explicit
Private Sub Command1_Click()
    CallTest "Form1_Command"
End Sub

Private Sub Command2_Click()
    Form2.Show vbModeless
End Sub

'////////////form2モジュール////
Option Explicit
Private Sub Command1_Click()
    CallTest "Form2_Command"
End Sub

'////////////Module1///////////
Option Explicit

Public Sub CallTest(pPrompt As String)
    MsgBox pPrompt
End Sub

後、クラス化という手もあります。

投稿時間:2006/09/12(Tue) 17:23
投稿者名:きじょう
Eメール:
URL :
タイトル:
Re: 共通のコードについて
花ちゃんさん neputuneさん どうもありがとうございました。
標準モジュールや引数使いまくりで何とか形になりました。
こんどはクラス化やActivXも勉強してみます。
ありがとうございました。