リッチエディットで縦書きが出来ない

[C1000]

題の通り、リッチエディットで縦書きを行おうとしましたが、できません。何が原因なのでしょうか。リッチエディットのバージョンは3.0で、OSはＷｉｎＸｐＨｏｍｅです。

コード: 全て選択

Sub MainWnd_IDM_VERTICAL_MenuClick()
	SendMessage(hEdit,EM_SETOPTIONS,ECOOP_OR,ECO_VERTICAL)
	SetFocus(hEdit)
End Sub

[イグトランス]

ずっと縦書きのままで使用するのなら，立地エディとボックスを作るときにスタイルES_VERTICALを指定してはどうでしょうか？

[C1000]

ES_VERTICALスタイルを指定しましたが、縁が盛り上がっているようになるだけで、縦書きにはなりませんでした。