テスト (569ﾚｽ)
上下前次1-新

---

194: 2016/06/16(木)05:50 ID:eYYSreG4(1)調 AA×


[240|320|480|600|100%|JPG|べ|ﾚｽ栞|ﾚｽ消]
194: [sage] 2016/06/16(木) 05:50:34.48 ID:eYYSreG4 Private Declare Function GetActiveWindow Lib "user32" () As Long Private Declare Function MessageBox Lib "user32" Alias "MessageBoxW" _ 　　(ByVal hWnd As Long, ByVal lpText As Long, ByVal lpCaption As Long, ByVal wType As Long) As Long 'Unicode文字対応のMsgBox関数（簡易版） Function MsgBoxW( _ 　　prompt As String, _ 　　Optional buttons As VbMsgBoxStyle = vbOKOnly, _ 　　Optional title As String _ ) As VbMsgBoxResult 　　MsgBoxW = MessageBox(GetActiveWindow, StrPtr(prompt), StrPtr(title), buttons) End Function Sub Main() 　　Call MsgBoxW(ChrW(&H2611) & "checkbox", vbExclamation, ChrW(&H260E) & "タイトル") End Sub http://mevius.5ch.net/test/read.cgi/tech/1402617355/194
文字対応の関数簡易版 タイトル

---

上下前次1-新書関写板覧索設栞歴

---

あと 375 ﾚｽあります
ｽﾚ情報 赤ﾚｽ抽出 画像ﾚｽ抽出 歴の未読ｽﾚ AAｻﾑﾈｲﾙ

---

ぬこの手 ぬこTOP 0.024s