ウィンドウプロパティでEditBox1の「複数行」・「改行を許可」にチェックは入っているでしょうか?まず、チェックが入っているか確認してみてください。
あと、この「lpByte」は何の目的で使っているのでしょうか?何も使っていない場合は、以下のようにできます。
コード:
Sub MainWnd_CmdBtn1_Click()
Dim buf As String
Dim CRLF As String
Dim a As Long
CRLF=Ex"\r\n"
a=10
buf="ABCD="+Str$(a)+CRLF
buf=buf+"EFG ="+Str$(a*2)
SetDlgItemText(hMainWnd,EditBox1,buf)
End Sub
あと、もう少しすっきりできます。
コード:
Sub MainWnd_CmdBtn1_Click()
Dim buf As String
Dim a As Long
a=10
buf="ABCD="+Str$(a)+Ex"\r\n"+"EFG ="+Str$(a*2)
SetDlgItemText(hMainWnd,EditBox1,buf)
End Sub
見やすさで考えると、上のコードは見にくいですけど…。