投稿者 魔界の仮面弁士  (社会人) 投稿日時 2021/2/6 12:27:06
> SendMessageの引数の2番目と3番目がよくわからなくて困っています。

TBM_SETPOS メッセージ (&H405&) ですね。
WPARAM には ByVal 1& (再描画する) を渡し、
LPARAM を スライダー値を表す Long 値にします。


> FormA.exeのSlider(スライダーバー)をFormB.exeから操作したいのです。

FormA と FormB が共に自作なら、プロセス間通信のために
DDE を使うという選択肢もあります。

以下サンプル。On Error 処理は省いています。

=== FormA.exe ===
プロジェクト名 = "ProjectA"
メインフォーム … Name や Caption は任意
  LinkMode: 1 - ソース
  LinkTopic: "HideponForm"
TextBox コントロール … Visible は True でも False でも良い
  Name: SliderLinkText

Private Sub SliderLinkText_Change()
    Slider1.Value = CLng(SliderLabelText.Text)
End Sub


=== FormB.exe ===
Private Sub Form_Load()
    TextBox1.Text = "5"    'Slider に渡したい値 
    Text1.LinkTopic = "ProjectA|HideponForm"
    Text1.LinkItem = "SliderLinkText"
End Sub
Private Sub Command1_Click()
    '現在の Text1.Text の値を FormA.exe に送り込む 
    Text1.LinkMode = vbLinkManual
    Text1.LinkPoke
    Text1.LinkMode = vbLinkNone
End Sub