大変申し訳ありません (ID:92309)

名前

ホームページ(ブログ、Twitterなど)のURL (省略可)

本文 すみません、このページをみたのですができませんでした。 文面だと、どこがどうわからないのか質問しにくいのでコードを書かせて下さい。 Private Sub File1_DblClick() Dim data As InputInfo If vbmp3_open(File1.FileName, data) = True Then Call vbmp3_play Exit Sub End If End Sub Private Sub Form_Load() Call vbmp3_init File1.Pattern = "*.mp3" End Sub 以上のコードで、変な部分があればご教授願います。