くだすれVB6.0以前（超初心者向け）
■ このスレッドは過去ログ倉庫に格納されています
0001デフォルトの名無しさん
2006/12/08(金) 19:36:45他のスレッドでは書き込めない超低レベル、
もしくは質問者自身何が何だか分からない質問を勇気を持って書き込むスレッドです。
VB使いが優しくコメントを返しますが、
お礼はVBの布教はしなくてよいので、初心者の救済をお願いします。
0052デフォルトの名無しさん
2007/03/05(月) 10:48:36VBの内部はCOMによって実装されている部分が大半だから、CoCreateInstance()付近からAPI探していけ
0053デフォルトの名無しさん
2007/03/05(月) 10:51:15COMわかんね('A`
0054デフォルトの名無しさん
2007/03/05(月) 12:11:38あるバイナリファイルがあり、その先頭４バイトには数値が入っています。
この４バイトをプログラムから上書きしたいと考えています。
そこで以下のようなコードを書きました。
Open ".\hoge.bin" For Binary As #1
Write #1, value
Close #1
これを実行しますと、Writeのところでエラーが出てしまいます。
おそらく、初歩的な間違いのような予感がするのですが、
どのようにすれば良いがご存知であれば教えて頂けないでしょうか。
よろしくお願いします。
0055デフォルトの名無しさん
2007/03/05(月) 12:13:33> 上書きしたいと考えています。
何を？
何でもいいなら
open ".\hoge.bin" for binary as 1
put #1, 1, clng(rnd)
close 1
でおｋ
0057デフォルトの名無しさん
2007/03/05(月) 13:30:30VBの参照カウンタ型GCは、.NETのGCみたく参照が無くなっていつか消えるとかいうもの違って、
参照が消えた瞬間に消される。もちろん他に参照がコピーされていない前提であるが、例えば
Sub hoge
dim xx as OBJ
Set xx = New Obj
：
End Sub でスパッと消える
さらに、途中でNothingや他の参照をぶち込んでもその時点でスパッと消える
0058デフォルトの名無しさん
2007/03/05(月) 13:35:46そのあとNothingぶちこんだらカウンタが消えていくと思ってたが・・・
実際の所どうなんだ・・・？
>>57でFA?
0059デフォルトの名無しさん
2007/03/05(月) 13:37:43FA
プロセス越しの場合もＦＡ
0060デフォルトの名無しさん
2007/03/05(月) 14:15:10ありがとうございます
つまり、参照先のアドレスが変わるタイミングで消えるという事ですね
NOTHINGを指定する事とはVB的なぬるぽですね
つまり明示的に破棄できませんといった人はウソつきですか？
わかりません＞＜
0061デフォルトの名無しさん
2007/03/05(月) 14:32:30日本語でおｋ
0062デフォルトの名無しさん
2007/03/05(月) 17:11:24コレは酷いｗ
0063デフォルトの名無しさん
2007/03/05(月) 17:18:0862さん、すみません
どのあたりが酷いのでしょうか
よければ、私にもわかるように教えてください＞＜
0064デフォルトの名無しさん
2007/03/05(月) 17:30:59参照先のアドレスが変わるタイミングで消えるという事
何故この解釈になった？
0065デフォルトの名無しさん
2007/03/05(月) 17:32:24自分で確かめろカス
0066デフォルトの名無しさん
2007/03/05(月) 17:39:35ありがとうございます
>途中でNothingや他の参照をぶち込んでもその時点でスパッと消える
と書いてありました
参照型の変数には「物」がはいっているはけではなくて、メモリにある「物」をさす
アドレスが入っていると思います。
他の参照をぶち込むというのは、参照先を変えるという事では
ないのでしょうか。
>64-65さん、教えてください＞＜
0067デフォルトの名無しさん
2007/03/05(月) 17:42:17いいから自分の書いた文章読み直して出直して来いカス
0068デフォルトの名無しさん
2007/03/05(月) 17:58:55>>67
0069デフォルトの名無しさん
2007/03/05(月) 18:06:10そうですね＾＾
0070デフォルトの名無しさん
2007/03/05(月) 18:43:15MouseDownイベントについてなのですが、
フォーム上に存在するコンポーネントを無視して、フォームのどこを
クリックしてもMouseDownイベントを拾いたいと思っています。
Form_MouseDownイベントは、フォームのMouseDownイベントは拾えます
が、ボタンやラベルの上でクリックすると、フォームのMouseDownイベ
ントを拾うことができません。
どなたかご存知でしょうか？
ご存知であれば教えて頂きたいと思います。
よろしくお願いします。
0071デフォルトの名無しさん
2007/03/05(月) 19:07:58全てのコントロールのMouseDownイベントを拾ってゴリ押しすれば何とかなるんじゃない？
もしくはサブクラス化
それかフック
Spy++でも使ってみるよろし
007270
2007/03/05(月) 19:14:27やっぱりその手しかないですか…。
ウィンドウのほとんどをＡＰＩコントロールが占めており、そのＡＰＩコントロールの
ハンドルがＤＬＬに渡されていてＤＬＬ側で制御されているため、イベントを付けられ
ないんですよね…。
もうちょっと調べてみます。
ありがとうございます！
0073デフォルトの名無しさん
2007/03/06(火) 13:12:29試してないのでなんともいえないけど
VBControlExtender
を使えばいけそうな気もするが・・・
0074デフォルトの名無しさん
2007/03/06(火) 14:13:44VB超初心者です。プログラムの経験はCOBOLで17年ほどあります。
会社にNT4.0 VB6SP3で作られたシステムがあります
普通はフォームもモジュールも同一フォルダーに作成するみたいなんですが、
このシステムはフォームと標準モジュール（クラスも）別フォルダーになっています。
それで、仕様書等が無いために、ソースから追っかけてみていますが、VB自体
よくわかっていないので、悩んでいます。
メニュー画面はランチャーのような階層状のメニュープログラムがあります
そこでは、FORM_LOAD()は走っていますが、メニューの中の別プログラムに
移った場合、呼ばれるプログラムにはFORM_LOAD()自体ありません。
このようなプログラムの解析をする場合呼ばれたプログラムの動きを追っかけて
行きたいのですが、どうすればよいのでしょうか？
ちなみに、ファンクションキーのイベントなんかは書かれているようです。
どなたかご教授下さい
0075デフォルトの名無しさん
2007/03/06(火) 14:39:54>フォームと標準モジュール（クラスも）別フォルダー
これはvbpファイルで参照しているので、別フォルダーでも気にしなくておｋです。
>メニューの中の別プログラムに
はっきりとは判らないのですが、もしかしたら、Mainがあるプロジェクトから
DLLないしActiveXのexeのプロジェクトに遷移しているかもしれませんね。
遷移先の別プログラム(DLL もしくはActiveXＥｘｅ)もVBで書かれている場合、
そのプロジェクトをVSで立ち上げて一番最初に[実行]-[開始]をし、実行状態にします。
その後呼び元をF8キーでステップ実行していくと、別プロジェクトがDLL等の場合は
そのままステップ実行できます。
またブレークポイントを張ってそこで処理を止めることもできます。
はずしていたら、すみません。
0076デフォルトの名無しさん
2007/03/06(火) 14:54:51ありがとうございます。別のところにbasファイルがあって、そこにFORM_LOAD()
がありました。F8で追っかけてみたら、ありました。
これ、クラスとフォームは別々に開発してもＯＫなんですか？
なんども申し訳ありません。
よろしくお願いします。
0077デフォルトの名無しさん
2007/03/06(火) 15:53:52別々というのが、ファイルを保存している先が別々という
意味では、問題ないです。
ただ、そのクラスとフォームがどのように依存しているのかは
流石にわからないので、勝手に片方の関数を変えたりすると
もう片方に影響が出るかもしれないですね。
0078デフォルトの名無しさん
2007/03/06(火) 16:51:36つ最高にド低脳な発言してください in ム板(XV)
http://pc11.2ch.net/test/read.cgi/tech/1164376614/
0079デフォルトの名無しさん
2007/03/06(火) 17:06:52お前のようなカスの出てくるところじゃないんだよ。
0080デフォルトの名無しさん
2007/03/07(水) 18:08:38のですが、どのようなメソッドを使えばいいのか教えてください。
また、手動でCheckBoxのチェックを操作できないようにするには、
どの属性をどのように設定すればいいのかも教えてください。
以上、よろしくおながいします。
0081デフォルトの名無しさん
2007/03/07(水) 18:14:35> CheckBoxのチェックを入れたり、入れなかったりしたい
Valueプロパティを調べろ
（ちなみに、チェックを入れるのと、チェックを外すの、な）
> チェックを操作できないようにする
Enableプロパティを調べろ
"無効な色"になるのがイヤなら、縁無しのピクチャボックスにつっこんでピクチャボックスのEnableプロパティを変えてみろ
（もしくはClickイベントで強引にユーザ入力を、無かったかのように見せかける）
008280
2007/03/07(水) 23:40:46>> > チェックを操作できないようにする
>> Enableプロパティを調べろ
>> "無効な色"になるのがイヤなら、縁無しのピクチャボックスにつっこんでピクチャボックスのEnableプロパティを変えてみろ
>> （もしくはClickイベントで強引にユーザ入力を、無かったかのように見せかける）
ありがとうございます。その方法が無難なようです。
ところが
>> > CheckBoxのチェックを入れたり、入れなかったりしたい
>> Valueプロパティを調べろ
こちらのほうはValueプロパティというのは無いようですが…
私ももうちょい調べてみようと思います。
0083デフォルトの名無しさん
2007/03/07(水) 23:43:57もしかしてVB.NETか？
それならCheckedプロパティ
（VB.NETほとんど触って無いから、もっといい方法があるかもしれん）
008480
2007/03/07(水) 23:52:31ありがとうございます。VB.NETです。
そして最大の私の勘違いはメソッドの使い方でした。
てっきり
CheckBox1.Checked(True)
のような記述をするもんだと思い込んでましたが
CheckBox1.Checked = True
のような記述をするんですね！！
Cのプログラマが、にわかVBしてたもんで疑いもしませんでした。
これで今日は落ち着いて寝られます。
どうもありがとうございました。
0085デフォルトの名無しさん
2007/03/08(木) 12:57:18プロパティだぜ・・・・
突っ込んでよかったのかな･･？
0086デフォルトの名無しさん
2007/03/08(木) 13:19:37てっきりメソッドだと思った、と勘違いしてたんじゃないの？
0087デフォルトの名無しさん
2007/03/08(木) 14:53:22javaスクリプトでいう『document.ondblclick = sample;』
をvbスクリプトで同じことってできますか？
0088デフォルトの名無しさん
2007/03/08(木) 15:15:24できます。
参考までにIEだとこんなカンジでしょうか。
Set ie=CreateObject("InternetExplorer.Application")
Set ie.Document.body.ondblclick=sample
0089デフォルトの名無しさん
2007/03/08(木) 15:22:050090デフォルトの名無しさん
2007/03/08(木) 15:23:39本当だ！できました。
確かに"sample"では不十分な書き方でした。
それなのに丁寧に教えて下さってありがとうございました。＆ごめんなさい
0091デフォルトの名無しさん
2007/03/08(木) 23:30:41formに設定した画像を動かすにはどうすればいいのでしょうか
form事態ではなく画像だけ動かしたいのです
0092デフォルトの名無しさん
2007/03/08(木) 23:56:13なにぶんひどい素人なもので、空気的にできればこちらのスレで知恵をお貸し願えないものかと思っています。
IE上の以下のスクリプトを埋め込んだページから
"sample.xls"というエクセルファイルの"test1"というマクロを動かそうとしていますが、
うまくいきませんでした。
<SCRIPT LANGUAGE = "VBScript">
<!--
Sub CallXlMacro
Dim xlapp
Set xlApp = GetObject(, "Excel.Application")
Call xlApp.Run("sample.xls!test1")
Set xlapp = Nothing
End Sub
-->
</SCRIPT>
とりあえずCallXLMacroプロシージャを以下のようにしてみたところ、動作しましたので
プロシージャが呼び出されていることは確認できました。
Sub CallXlMacro
Msgbox "test"
End Sub
また、「Dim xlapp」〜「Set xlapp = Nothing」までを「test.vbs」として保存し、直接実行してみたところ、
test1マクロは呼び出されて動きました。（スクリプト使用時は、sample.xlsは必ず開いた状態で使用する前提でいます）
私の知識ではこれ以上進めなかったのですが、
問題はどの辺りにあるのかご教授願えませんでしょうか。
ちなみにtest1マクロそのものは、「Msgbox "testOK"」だけのものです。
よろしくお願いいたします。
0093デフォルトの名無しさん
2007/03/08(木) 23:58:230095デフォルトの名無しさん
2007/03/09(金) 00:43:22本当にくだらないと思っている事を人任せにするのか？（#＾ω＾ おっ？
それ以前にプログラムの話したいならコード晒せ
無ければコードかけるくらい詳細に調べて書け
あと>>1な
0096デフォルトの名無しさん
2007/03/09(金) 00:50:25Private pct As PictureBox
Private Sub Form_Load()
Dim i As Long
Set pct = Me.Controls.Add("VB.PictureBox", "pct")
With pct
Call .Move(0, 0, 32 * Screen.TwipsPerPixelX, 32 * Screen.TwipsPerPixelY)
.BackColor = 0
.ScaleMode = ScaleModeConstants.vbPixels
.AutoRedraw = True
End With
For i = 1 To 100
pct.PSet (Rnd * 32, Rnd * 32), Rnd * &HFFFFFF
Next
End Sub
Private Sub Form_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)
Call Me.PaintPicture(pct.Image, X, Y)
End Sub
# formに、設定した画像を動かすにはどうすればいいのでしょうか
# form事態ではなく画像だけ動かしたいのです
こんなソースコードだけど、動いてるか？
009791
2007/03/09(金) 18:04:22例えば
ボタンが押されたときにイメージを動かすのなら
Private Sub Command1_Click()
Image1.Move (Image1.Left), (Image1.Top + 100)
End Sub
でできるのですが、
フォームに背景として表示されている画像の動かし方が知りたいのですが、どんなに調べても見つけれなくて困っています
0098デフォルトの名無しさん
2007/03/09(金) 18:14:51発想の転換で、フォームよりでかいイメージをフォームに貼り付けといて
それを背景とし、そのピクチャを動かすとかじゃ実現できないかな？
0099デフォルトの名無しさん
2007/03/09(金) 20:43:00PaintPicture使いなさい
0100デフォルトの名無しさん
2007/03/09(金) 21:53:23> 背景として表示されている
Formが自発的に背景として表示してるわけじゃないだろ？
もう少し具体的に状況を説明した上で議論なり質問なりしてくださいな
0102デフォルトの名無しさん
2007/03/11(日) 19:57:32フォーカスをあやつる方法がわからないので教えてください
0103デフォルトの名無しさん
2007/03/11(日) 20:08:51フォーカスやイベント等はVBやるときにいつもネックになるね。
フォームのコードイベント内でセットフォーカスメソッドを使えばいいけど
コントロールが表示される前にはフォーカスの指定ができないので
先にフォームをShowするか、あらかじめtab順序を設定するか、かな。
'先にShowする場合。
Private Sub Form_Load()
Me.Show
Me.Text1.SetFocus
End Sub
0104デフォルトの名無しさん
2007/03/11(日) 20:09:26・TabIndexを一番若くしておくとか
・無駄に一つだけタイマーを配置して、次のようにしてみるとか
Option Explicit
Private WithEvents Tmr As Timer
Private WithEvents Btn1 As CommandButton
Private WithEvents Btn2 As CommandButton
Private Sub Form_Load()
Set Tmr = Me.Controls.Add("VB.Timer", "Tmr")
Set Btn1 = Me.Controls.Add("VB.CommandButton", "Btn1")
Set Btn2 = Me.Controls.Add("VB.CommandButton", "Btn2")
With Tmr: .Interval = 1: .Enabled = True: End With
With Btn1: .Move 0, 0, 1000, 1000: .Caption = "Button1": .Visible = True: End With
With Btn2: .Move 0, 1000, 1000, 1000: .Caption = "Button2": .Visible = True: End With
End Sub
Private Sub Tmr_Timer()
Tmr.Enabled = False
'Call Btn1.SetFocus 'Button1にフォーカス
Call Btn2.SetFocus 'Button2にフォーカス
End Sub
0106103
2007/03/11(日) 20:54:17tab順はお互い「やっぱりな」と思うよね。でもタイマーは意外だった。
悪い意味じゃなくて、ちょっと興味があった。
いつもはイベントドリブンのように使ってるの？それとも、思いつき？
0107デフォルトの名無しさん
2007/03/11(日) 20:59:31イベントとは呼び出し手続き上で、ワンショットなイベントを作りたいときによくやっている
イベントプロシージャの再帰呼び出しが怖いときなんか特に
0109デフォルトの名無しさん
2007/03/11(日) 21:07:02>>107
> イベントとは呼び出し手続き上で、
# 別の呼び出し手続き上で、
>>108
すまんね
0110デフォルトの名無しさん
2007/03/12(月) 09:17:26なんかいいサンプルないですか？
0111デフォルトの名無しさん
2007/03/12(月) 10:09:02でググったらそれらしいのがポツポツあるけど
0112デフォルトの名無しさん
2007/03/12(月) 11:00:56ＶＢ６です。スプレッドを使っています
スプレッドの行固定したいのと、行をダブルクリックしたときのイベントのとりかた教えてください
イベントとったあと、ダイアログも表示さしたいのですが。よろしくお願いします
0113デフォルトの名無しさん
2007/03/12(月) 22:21:31エクセルコンポーネントで読み込む
0114デフォルトの名無しさん
2007/03/12(月) 22:22:36ｍｊｄ？
0115デフォルトの名無しさん
2007/03/12(月) 22:55:14グレープシティのやつね。
手元に環境がないからわからないけど、インストールした
ディレクトリにサンプルソースが付いてなかったっけ？
0116デフォルトの名無しさん
2007/03/15(木) 20:07:35の* 256ってどういう意味なんですか？
0117デフォルトの名無しさん
2007/03/15(木) 20:44:44仮に
Dim Num As String * 1
とした場合はNumには1バイト以上文字が代入できません。
0118デフォルトの名無しさん
2007/03/15(木) 21:04:57文字長○
0119デフォルトの名無しさん
2007/03/15(木) 21:22:33え？バイトの意味解ってる？
8ビット分の記憶容量という意味だけど。
文字長って意味解ってる？？
0120デフォルトの名無しさん
2007/03/15(木) 21:28:17MsgBox LenB(Num)
0122デフォルトの名無しさん
2007/03/15(木) 21:35:51なんでお前のようなバカが一丁前に答えようとするかね？
VBでバイトが知りたきゃ、こうだろ・・・・。
Dim Num As String * 256
MsgBox LenB(StrConv(Num, vbFromUnicode))
0123デフォルトの名無しさん
2007/03/15(木) 21:43:29それは格納されている文字の容量であって
VBが確保した変数の容量ではない
0124デフォルトの名無しさん
2007/03/15(木) 22:00:30Unicodeって言葉知っている？
そしてそれ (UTF-16)が32ビットVBに採用されていることを知っている？
0125デフォルトの名無しさん
2007/03/15(木) 22:01:220126デフォルトの名無しさん
2007/03/15(木) 22:09:52ひらがなって２バイトだよね？*1にも"あ"が入るんだけど
0127デフォルトの名無しさん
2007/03/15(木) 22:23:11調べ方教えてくれてありがとう。
0128デフォルトの名無しさん
2007/03/15(木) 22:25:12だから、vbFromなんだろ。Ｆ、Ｒ、Ｏ、Ｍ。
>>126
VBがメモリを食いつぶさないように気をつかってるんだろ。
お前のような奴のために。
0129デフォルトの名無しさん
2007/03/15(木) 22:45:27バカめ。
Dim Num AS string * 1
'1を返す。
MsgBox LenB(StrConv(Num, vbFromUnicode))
Num = "あ"
'2を返す。
MsgBox LenB(StrConv(Num, vbFromUnicode))
VBがお前のようなバカのために
メモリを食いつぶさないように気をつかってるの。
なんでお前のようなバカが一丁前に答えようとするかね？
0130デフォルトの名無しさん
2007/03/15(木) 22:58:09この意味がさっぱり分からん。
Sting*1が収納する文字によって8bitだったり16bitだったり
するとでも言いたいのだろうか？
0131デフォルトの名無しさん
2007/03/15(木) 23:07:470132デフォルトの名無しさん
2007/03/15(木) 23:17:53*１は１文字制限っていう決め事を言ってるだけなんだから
ってことか？どんどんわからなくなるｗ
0133デフォルトの名無しさん
2007/03/15(木) 23:20:450134デフォルトの名無しさん
2007/03/16(金) 00:02:59は格納バイトを示すんではなく
格納文字数を示してるんだろ
0135デフォルトの名無しさん
2007/03/16(金) 00:17:54発端となったのは>>116。
String * 256の意味を聞いている以上、それにStrConvで変換を施した上でどうなるかは関係ない（別問題）。
256文字分の固定長文字列を意味すると答えれば十分かつそれ以上の意味は無い。
中にどんな文字列が格納されていようと固定長なのだから、
116のNumはString * 256だから常に256 * 2で512バイトのメモリを使う。
それを示すために120はLenB(Num)を持ち出したのだろう。
>>128でFromと書いているが、LenB(StrConv(Num, vbFromUnicode))では、
中身をマルチバイト文字列（日本語環境のWindowsではShift_JISことCP932）に変換する。
これでは本来のNumの大きさが見えない。単にNumの内容をマルチバイト文字列で表したときのバイト数に過ぎなくなる。
0136デフォルトの名無しさん
2007/03/16(金) 00:28:20まあ朽木は彫るべからず糞土の牆は塗るべからずって言うしな
耳の穴も口の穴も開いてるだけの木偶の坊には上出来の回答だよ
よくがんばった
0137デフォルトの名無しさん
2007/03/16(金) 01:05:02半角数字の１も文字の"あ"も１６ビットなの？
0138デフォルトの名無しさん
2007/03/16(金) 01:06:33そうだ
0139デフォルトの名無しさん
2007/03/16(金) 01:17:17文字は文字だ
文字コードを格納しているんじゃない、文字を格納しているんだ
昔を引きずるのもいいけど、ちゃんと前提条件示してからにしろよ
0140デフォルトの名無しさん
2007/03/16(金) 01:17:210141デフォルトの名無しさん
2007/03/16(金) 01:18:150142デフォルトの名無しさん
2007/03/16(金) 01:21:07それは正にStrConvでvbFromUnicodeをやった状態。
NT系のメモ帳は保存時に文字コードを選べるぞ。
Unicodeを選べばみんな1文字2バイト（とも限らないが）。
0143デフォルトの名無しさん
2007/03/16(金) 01:23:49少し眠ってもいいですよ＾＾；；；；；；
0144デフォルトの名無しさん
2007/03/16(金) 01:28:310145デフォルトの名無しさん
2007/03/16(金) 01:29:210146デフォルトの名無しさん
2007/03/16(金) 01:33:33若干スレ違いとは思いますが、質問させてください。
ページを読み込んだ後、2秒後に"testOK"を表示させる為に
Dim lngWait
TestSetTime()
Sub TestSetTime()
If lngWait < 2000 then
setTimeout "TestSetTime()", 1000
lngWait = lngWait + 1000
Else
Msgbox "testOK"
End if
End Sub
以上のようなスクリプトを書いて保存し
CreateElement("script")でつくったスクリプトタグの
srcに指定し、appendChildで挿入したところ、
ページ表示後、2秒後に"testOK"のメッセージを出すことができました。
次に、これを直接スクリプトタグに書いたページを読み込んだところ
1度目の 「lngWait = lngWait + 1000」までは動くのですが
TestSetTime()が再帰呼び出しされず、"testOK"が表示されません。
私の乏しい知識では理由がわからないのですが、
おわかりになる方、是非ご教授下さい。よろしくお願いします。
0147デフォルトの名無しさん
2007/03/16(金) 01:34:06Dim aaaa as String * 2
と宣言した場合
aaaa = "1234"
と格納した場合、メモリ上には
" 1 2 3 4"
バイナリじゃ
20 31 20 32 20 33 20 34
と格納されるんじゃないの？
0148147
2007/03/16(金) 01:35:00じゃなくて
00 31 00 32 00 33 00 34
かな
0149デフォルトの名無しさん
2007/03/16(金) 01:37:030150デフォルトの名無しさん
2007/03/16(金) 01:38:440151デフォルトの名無しさん
2007/03/16(金) 01:40:22内部表現を問題にするなら”本当の仕様書”を引っ張り上げないといけないから面倒
てか俺は知らない
で、俺の知ってる観測方法は byte() に代入か、StrPtr()で”文字列のポインタ”を拾ってそこからメモリを見る位だ
この適当な観測から>>148は腐ってることが分かった
■ このスレッドは過去ログ倉庫に格納されています