Access VBA質問箱 IV

当質問箱は、有志のボランティア精神のおかげで成り立っています。
問題が解決したら、必ずお礼をしましょうね。
本サイトの基本方針をまとめました。こちらをご一読ください。

投稿種別の選択が必要です。ご注意ください。
迷惑投稿防止のため、URLの入力を制限しています。ご了承ください。


	新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム

2874 / 9994

←次へ　｜　前へ→


	【10385】Re:他のボックス結果をコマンドボタンに。

小僧 - 08/5/14(水) 9:51 -


	引用なし

	パスワード

▼heavenlycastle2003 さん、hatena さん：
こんにちは。

>よろしければ、エラーになった箇所の探し方

>>下記の該当箇所が黄色く変わります。
>>>　　　　Call MakeCalender(Me.テキスト0, Me.コンボ0)

エラーになった箇所はそのまま、
黄色に反転した場所ですよね。

エラーの原因はご提示されている情報そのもの、

>>実行しました。が、実行時エラー13
>>　　　　　　　　　型が一致しません。　が表示され、

「型」が一致していない、との事です。

>>> Sub MakeCalender(CurrentYear As Long, CurrentMonth As Long)

MakeCalender というプロシジャを呼び出す際には2つの引数を必要としています。
・CurrentYear：長整数型
・CurrentMonth：長整数型

> Call MakeCalender(Me.テキスト0, Me.コンボ0)

テキスト0、コンボ0の値が数値以外ですと、
「型」は一致しない事になりますが大丈夫でしょうか。

※前回の回答の際、2008年5月のカレンダーを作るサンプルをでしたので
　CurrentYaer、CurrentMonthという変数名を使っております。
　
　お望みに様にテキストボックス、コンボボックスで
　自由に年月を選ばせるという事ですので、
　heavenlycastle2003さん以外がこのコードを見ても理解し易いように
　適当な変数名に変えた方が良いと思われますよ。

366 hits

▼

【10376】他のボックス結果をコマンドボタンに。 heavenlycastle2003 08/5/13(火) 8:49