【老若】VB.net質問ｽﾚ【男女】
■ このスレッドは過去ログ倉庫に格納されています
0001デフォルトの名無しさん
NGNGと憤慨しているｱﾅﾀ!
の為に立ててみました。
VB.net初心者～VB.net神
まで自由に書き込んでﾁｮ。
0666デフォルトの名無しさん
NGNG話はそれからです。
0667デフォルトの名無しさん
NGNG送信者は自分で代用できるので問題ありません。
続きの話をお願いします。
0669デフォルトの名無しさん
NGNGラベルに表示するにはどうすりゃいいのでしょう。
あ、絵を使えってのは無しですよ。
そういう仕様なんです。それと、ラベル１枚だけで
実行時に５×５枚表示するのは
どうしたらいいんでしょう。
0670デフォルトの名無しさん
NGNGそれだけの情報じゃ全然わからない。
何がやりたいのか？どうしたいのか？
というのは、
＞あ、絵を使えってのは無しですよ。
こんな事言ってるし。常套手段を使わないということは
何か他に狙いがあるのか。
絵を使わないのならキャラクタを表示するしかないのだが、
まさかその方法がわからないと言ってるんじゃないだろうね。
0671デフォルトの名無しさん
NGNG今それで悩んでいます。
誰か対処法をお願いします。
0672デフォルトの名無しさん
NGNGありません。ないものの対処法もありません。
0673デフォルトの名無しさん
NGNGmicrosoft.public.jp.dotnet.vsnetでそんなことをいってた
tomotomoとかいうのがいたな。
0674デフォルトの名無しさん
NGNGGraphicsオブジェクト取得して描きたいように書けやｺﾞﾗ。
0675デフォルトの名無しさん
NGNG0676最凶VB厨房
NGNGリソースのプロパティ→ビルドアクション 埋め込まれたリソース
Dim CurrentAssembly As System.Reflection.Assembly = System.Reflection.Assembly.GetExecutingAssembly()
PictureBox1.BackgroundImage = Image.FromStream(CurrentAssembly.GetManifestResourceStream("Saikyo.0000003897.jpg"))
0677675
NGNGありがとうございます。
早速使ってみたいと思います。
0678デフォルトの名無しさん
NGNG0679デフォルトの名無しさん
NGNGクライアントに.NET Freamworkがインストールされていれば
.NETで作ったカスタムコントロールが動くはずだが、やり方が
わかりません、私も知りたいので誰か教えて。
0680デフォルトの名無しさん
NGNG「連動」っていうのが具体的にどういう挙動を指してるのかは不明だけど、
ActiveXコンポーネントの作成はVB.NETじゃできないかと・・・
ってか、なぜに.NETでActiveXコンポーネントの作成を？
0681678
NGNG回答ありがとうございます。
開発環境がどーしても.NETじゃなきゃアカンつうことと、当方VBしか使ったことがないので
（C、JAVA系全滅）VBでできんものかなぁ、と。
とりあえずなんとかできないかがんがってみます。
0682デフォルトの名無しさん
NGNG0683デフォルトの名無しさん
NGNGVB.Net でもできますよね。
public static Complex operator +(Complex c1, Complex c2)
( C# MSDNより )
よくあるサンプルですけど、これをVBで書くとどうなりますでしょう
Public Shared operator+ ( c1 As Complex , c2 As Complex ) As Complex
ってなぐあいだどだめっぽいんです。
0684最凶VB厨房
NGNGhttp://www.users.gr.jp/ml/archive/CS/368.asp
http://pc3.2ch.net/test/read.cgi/tech/1021218036/148
http://pc3.2ch.net/test/read.cgi/tech/1021218036/150
決定的な記述が見つからんかった･･･。まだまだ甘いですね。ﾌﾟﾌﾟｯ>>俺
0685デフォルトの名無しさん
NGNG> VB.Net でもできますよね。
http://www.microsoft.com/japan/msdn/library/ja/vbls7/html/vblrfVBSpec11.asp
オーバーロードに関する記述が無いよ？
0686デフォルトの名無しさん
NGNG0687デフォルトの名無しさん
NGNG演算子のオーバーロードはC#独自の機能で、CLIの機能ではないよ。
IL的に見れば、ただの specialname 属性の付いた1メソッドにすぎないからね。
それをC#が勝手に特別扱いしてるだけ。
0689683
NGNGだめなら、だめで、他のコーディングで対応します。
#MSDNにも演算子のオーバーロードはできませんぐらい書いてくれたらいいのに。。。
0690デフォルトの名無しさん
NGNGドキュメントに言語仕様が掲載されているのに何言ってんだか。
0691デフォルトの名無しさん
NGNGスタートアップをMainにして、
Application.Run()でアプリ開始、
Application.Exit()でアプリ終了するようにすればよろし。
0692デフォルトの名無しさん
NGNG0693デフォルトの名無しさん
NGNGPrintScreenでキャプチャする
0694692
NGNGすいませんが、どのようなコードを記述すればよいのでしょうか？
PrintDocument1_PrintPageに、書き込めばいいのでしょうか？
よろしくお願いいたします。
0695デフォルトの名無しさん
NGNG0696デフォルトの名無しさん
NGNGブールは今は流行らない省略形を好むC厨読みです。
0697最凶VB厨房
NGNGありがとさん。
ﾌﾑﾌﾑφ...ﾒﾓﾒﾓ
specialname･･･
http://www.microsoft.com/japan/msdn/library/default.asp?url=/japan/msdn/library/ja/cpref/html/frlrfSystemReflectionTypeAttributesClassTopic.asp?frame=true
>>692
漏れのスキルじゃわからんﾁﾝ。
このコードが参考になるやもしれん。。。ならんかも知れん。鬱氏
http://www.dotnet247.com/247reference/msgs/26/133191.aspx
0698695
NGNG最新の読み方は何なんですか？
0699デフォルトの名無しさん
NGNGで、何かしらのグラフィックをパネルクリックをトリガにパネル上に書こうと思ったのですが
Private Sub Panel1_Paint(～
End Sub
Private Sub Panel1_Click(～ ) Handles Panel1.Click
End Sub
を出してから途方にくれているのですが、
その次にどのように考えたら良いのでしょうか？
0700最凶VB厨房
NGNGGraphicsオブジェクトを作成する。
その後は、
ms-help://MS.VSCC/MS.MSDNVS.1041/cpguide/html/cpcondrawingeditingimages.htm
ここらへん見て適当にやる。
0701デフォルトの名無しさん
NGNGブーリアン
ブールでも普通に通じるよ。ブール値を扱うのがブーリアンだし。
ちなみにブールは数学者の名前だ。
ttp://www.interq.or.jp/jazz/iijima/primer/comment/bool.html
0702デフォルトの名無しさん
NGNGﾚｽありがとう。今の状況。
サンプルに習いPanel1_Paint中に
Dim g As Graphics = e.Graphics
g.DrawString("Hello World!", Control.DefaultFont, Brushes.PapayaWhip, e.ClipRectangle.Left + 10, e.ClipRectangle.Top + 10)
を入れてます。
で、Form1のコンストラクタに
AddHandler Panel1.Click, AddressOf Me.Panel1_Click
の一文を入れたら良い感じ。ただ、一番にOnPaintが発生しているらしいので、生成時に既に書かれてしまっている。
ここをクリアできれば使えそうだが。。
0704699
NGNGあれ、読み返してみて馬鹿な事書いてる。Paintと関係ないじゃん。
忘れてください。
またやり直して報告しにきます。
0705最凶VB厨房
NGNGe.Graphics.DrawLine(New Pen(Color.Black), 0, 0, 100, 100)
ってな感じで使えるぜ。
0706699
NGNGそうなんです。
Paintをハンドルした先なら、Graphicオブジェクトが使えて
Clickをハンドルした先でClickイベントが捕まえられる。
どうにか、二つを一緒にしたClick→Paintという形態がとれないかと思っています。
目的としては学習および利用方法の取得メインなので、出来ればこの二つのハンドラを崩さない形で。
0707最凶VB厨房
NGNGhttp://www.atmarkit.co.jp/fdotnet/vb6tonet/index/index.html
にある
http://www.atmarkit.co.jp/fdotnet/vb6tonet/vb6tonet25/vb6tonet25_01.html
↑を見るがよろし。両方見るがよろし。
0708最凶VB厨房
NGNG0709699
NGNGClickのハンドラに
Dim g As Graphics = Graphics.FromHwnd(Me.Panel1.Handle)
g.DrawString("Hello World!", Control.DefaultFont, Brushes.PapayaWhip, Cursor.Position.X() - Me.Location.X - Me.Panel1.Location.X, Cursor.Position.Y() - Me.Location.Y - Me.Panel1.Location.Y)
を入れると、ちょっと座標が追従してなくおかしいけど、まぁ、大体合ったことは合った。
さて本来ならこれでいいのかもしれないですが、目的が達成されていないのでこれから>707のリンク先を見てきます。
0710699
NGNGハンドル追加しようにもシグニチャが違うと怒られる。。どっちもpanel1のイベントなのに(´･ω･‘)ｼｮﾎﾞｰﾝ
原因分からず。
とりあえずOnPaintはシステムで管理するタイミング専用と。
0711デフォルトの名無しさん
NGNG6にあったAfterColEditのようなイベントは無くなったのでしょうか？
0712デフォルトの名無しさん
NGNGそれだと、自分のウィンドウが他のウィンドウで隠れたら、
描画内容が消えないか？
PrivateなBitmapクラスの変数を用意しておく。
ClickイベントではBitmapオブジェクトを作って、
そこから得た、Graphicsオブジェクトに絵を描く。
BitmapオブジェクトがNothingでなければ、
PaintイベントではBitmapオブジェクトを描画する。
ってな具合でOKかな。
0713699
NGNGレスありがとう。
それが出来ればまともなアプリの振る舞いになりそう。
そこで、二つ聞きたいんだけど。(悩みながらやっているので、その後自己解決したら報告します)
Bitmapオブジェクトに対して書くのは、明示的にPanel1に書いて、Bitmapにも書くって事?
現状、Bitmapに対して書くことができないんだけど、どのような解決方法があるの?
0714712
NGNGちょっと抜けてたので補足。
ClickイベントでBitmapオブジェクトに描いて、
＃Bitmapオブジェクトに描くというのは、
＃Bitmapオブジェクトを生成して、さらに、Graphics.FromImageで
＃Graphicsオブジェクトを取得し、そこに描画するということ。
その後、Invalidateメソッドで再描画するように指示する。
そうすればPaintイベントが発火されるので、
その中では、e.Graphics.DrawImageを使ってこのBitmapを描画する。
0715699
NGNGFormのコンストラクタに
bmppanel = New Bitmap(Panel1.Width, Panel1.Height, Graphics.FromHwnd(Me.Panel1.Handle))
Paintのハンドラに
Dim g As Graphics = Graphics.FromImage(bmppanel)
If Not (bmppanel Is Nothing) Then
g.DrawImage(bmppanel, 0, 0)
End If
Clickのハンドラに
Dim g As Graphics = Graphics.FromImage(bmppanel)
g.DrawString("Hello World!", Control.DefaultFont, Brushes.PapayaWhip, Cursor.Position.X() - Me.Location.X - Me.Panel1.Location.X, Cursor.Position.Y() - Me.Location.Y - Me.Panel1.Location.Y)
としたら、全く描画がされなくなったけど、何かおしいところにいっているような気がする。
NETなんだろのサンプルもこんな感じだったし。
0716699
NGNGすいません読んでなかった。
715は712を読んでの結果です。
試してから出直してきます。
0717699
NGNGありが㌧。おかげさまで再描画対応なフォームが出来ました。
715の状態からPaintハンドラのGraphicオブジェクト宣言を
Dim g As Graphics = e.Graphics
に。またClickハンドラの最後に
Me.Panel1.Invalidate(True)
を追加するだけで出来ました。アドバイスのままですけど、改めてコードとして報告。
改めて、最凶VB厨房さんと、712さんに感謝。
あと、タイトルバー左上角からフォームの左上隅Sizeの取得方法わかる方いますか?ここのオフセットがどうしても取れない。。
0718デフォルトの名無しさん
NGNGcalc.exeを起動して、それが閉じられたらもう一回起動する、というようなプログラムはできないものでしょうか。
Shell関数の辺りを調べてみましたが、ダメでした。
よろしくお願いします。
0719デフォルトの名無しさん
NGNGSystem.Windows.Forms.SystemInformation で地道に計算。
0720デフォルトの名無しさん
NGNGできるかどうかは試してないが、
Processクラスあたりでなんかないかな。
0721デフォルトの名無しさん
NGNGvb6のように、真下にある物も表示させる方法はあるのかな。
0722デフォルトの名無しさん
NGNGもー８時間くらい試行錯誤してます… どなたかヒントだけでもプリーズ！
～～ VB6版（正常に動く
Private Type TestInfo
dataType As Long
dataSize As Long
scale As Double
act As Long
mot As Long
frm As Long
End Type
Private Declare Function GetInfo Lib "getinfo.dll" Alias "_GetInfo@8" (ByVal lpInFileName As String, lpInfo As TestInfo) As Integer
Dim iReturn As Integer
Dim info As TestInfo
iReturn = GetInfo(strFileName, info)
0723デフォルトの名無しさん
NGNG0724デフォルトの名無しさん
NGNG～～ エラーの表示
'System.NullReferenceException' のハンドルされていない例外が RaClient.exe で発生しました。
追加情報 : オブジェクト参照がオブジェクト インスタンスに設定されていません。
0726デフォルトの名無しさん
NGNGVB6の時はLoadPictureを使用して、
PictureBox.PaintPicture LoadPictute("画像.jpg"), 0, 0, 100, 100,0,0
って出来たんだけど、
VB.NETではどうやるんですか？
http://www.microsoft.com/japan/msdn/library/default.asp?url=/japan/msdn/library/ja/cpref/html/frlrfsystemdrawinggraphicsclassdrawimagetopic5.asp
の
Public Sub DrawImageRect(e As PaintEventArgs)
' Create image.
Dim newImage As Image = Image.FromFile("SampImag.jpg") ←これはわかります
' Create rectangle for displaying image.
Dim destRect As New Rectangle(100, 100, 450, 150)
' Draw image to screen.
e.Graphics.DrawImage(newImage, destRect)
End Sub
をやってみても、どこにも画像が表示されないし…。よくわかりません
よろしくお願いします。
0727世直し一揆
NGNG●とにかく気が小さい(神経質、臆病、二言目には「世間」）
●他人に異常に干渉する（しかも好戦的・ファイト満々でキモイ）
●自尊心が異常に強く、自分が馬鹿にされると怒るくせに平気で他人を馬鹿にしようとする
（ただし、相手を表面的・形式的にしか判断できず(早合点・誤解の名人)、実際にはたいてい、内面的・実質的に負けている）
●「常識、常識」と口うるさいが、実はA型の常識はピントがズレまくっている（日本の常識は世界の非常識）
●権力、強者（警察、暴走族…ｅｔｃ）に弱く、弱者には威張り散らす（強い者に弱く、弱い者には強い）
●あら探しだけは名人級（例え10の長所があってもほめることをせず、たった１つの短所を見つけてはけなす）
●基本的に悲観主義でマイナス思考に支配されているため、性格がうっとうしい（根暗）
●一人では何もできない（群れでしか行動できないヘタレ）
●少数派の異質、異文化を排斥する(差別主義者）
●集団によるいじめのパイオニア＆天才(陰湿＆陰険）
●悪口、陰口が大好き（Ａ型が３人寄れば他人の悪口、裏表が激しい）
●他人からどう見られているか、体裁をいつも気にしている（「世間体命」、「～みたい」とよく言う）
●自分の感情をうまく表現できず、コミュニケーション能力に乏しい（同じことを何度も言う、知障）
●表面上意気投合しているようでも、腹は各自バラバラで融通が利かず、頑固(本当は個性・アク強い）
●人を信じられず、疑い深い（自分自身裏表が激しいため、他人に対してもそう思う）
●自ら好んでストイックな生活をし、ストレスを溜めておきながら、他人に猛烈に嫉妬する（不合理な馬鹿）
●執念深く、粘着でしつこい（「一生恨みます」タイプ）
●自分に甘く他人に厳しい（自分のことは棚に上げてまず他人を責める。しかも冷酷）
●男は、女々しいあるいは女の腐ったみたいな考えのやつが多い
0728699
NGNG教えられるような身空じゃ無いんだけど、
Paintハンドラで、そのDrawImageRectメソッド呼び出してますか?
他にも方法があるけど有効なPaintEventArgsを得るにはPaintハンドラ内から呼び出すのがいちばん簡単。
>719
レスありがとう。
このメンバ(プロパティ)ほとんどStaticなんだね.。
該当する物を見当つけてﾋｰｺﾗ探している所です。
VB6と違ってインスタンス化しないクラスがあるので(VB6でもあったっけ?)、そういうときはウォッチ式が使いにくい。
あるクラスのプロパティの値だけ一覧でぱっと分かる方法って無いのかな。
0729726
NGNG申し訳ないんですが、簡単なコード教えてもらえませんか？
0730デフォルトの名無しさん
NGNG728もいってるけど、あやしーのは e as PaintEventArgs だね。
ちゃんと描画したいオブジェクトのGraphicsオブジェクト持ってきてる？
確かCreateGraphicsかなんかで作れたはず。
0731デフォルトの名無しさん
NGNG>>430あたりからのレスとか、>>539付近とかまずは見てみ。
0732デフォルトの名無しさん
NGNGDatasetをDatagridに貼り付ける際に
現在拙者はDoLoopを使ってAddしてます。
なんか自分は根本的に間違ってると思えるぐらい
激しく重いです。
DatagridのDataSourceに貼り付けようとしてみたんですが
クラス名が表示されたりしてうまいこといきません。
どうすれば効率的に貼り付けられるでしょうか。
どなたかよろしゅうお願いします。
0733726
NGNGうーん、、わからんですたい
考えてみると
＞Public Sub DrawImageRect(e As PaintEventArgs)
これがわからない
＞' Create image.
＞Dim newImage As Image = Image.FromFile("SampImag.jpg")
newImageにSampImag.jpgってのが格納されて
＞' Create rectangle for displaying image.
＞Dim destRect As New Rectangle(100, 100, 450, 150)
座標100,100、サイズ450,150がdestRectに入って
' Draw image to screen.
e.Graphics.DrawImage(newImage, destRect)
で、eが描画・・・ﾊｧ？
End Sub
ってことなんですよ
もう、わけわからないわけで。。。なんでこんなに大変なんだ.Netは・・・
0734デフォルトの名無しさん
NGNG質問の主旨がよくわかんないけど、データアダプタのFillメソッドを使う。
ttp://www.microsoft.com/japan/msdn/library/ja/Vbcon/html/
vbwlkwalkthroughdisplayingdatafromsingletableinwindowsform.asp
を一回読んでみたら？（urlは連結してね)
外してたらｽﾏｿ
0735730
NGNGってゆーか、よく見たらPictureBoxじゃん。
ImageオブジェクトをPictureBoxのImageプロパティにいれりゃOKだった。
PictureBox1ってやつを配置した場合なら、
Dim newImage As Image = Image.FromFile("SampImag.jpg")
PictureBox1.Image = newImage
どーしてもDrawImageが使いたいんならこんな感じ。
Dim Grap As System.Drawing.Graphics
Dim newImage As Image = Image.FromFile("SampImag.jpg")
Dim destRect As New Rectangle(100, 100, 450, 150)
Grap = PictureBox1.CreateGraphics
Grap.DrawImage(newImage, destRect)
0736726
NGNG>>735
あー出来ました。
どうしても、DrawImageが使いたかったので助かりました。
あとはCreateGraphicsを理解できればなんとかなるかな。
ありがとうございました。
そういや、コントロール配列ってなくなったんですねー。
Tagを使って変な感じで代替できてますが、なんか不便。。。
0737デフォルトの名無しさん
NGNG0738デフォルトの名無しさん
NGNG基本はDatagrid.DataSourceにDataSetのDataTableを入れりゃOK。
つーか、どうやってDataset取得してんのか教えれ。
>736
Controlクラスレベルならできるよ。
とはいえ、デザイナが自動生成するところいじらんとできない(はず)。
動的にコントロールを配置するときに少し便利。まあ、少しだけど。
0739732
NGNGども。レス感謝です。７３２です。
OLEテータアダプタで抽出してfillでつっこんでます。
データ自体が来てるのは確認済みです。
＞基本はDatagrid.DataSourceにDataSetのDataTableを入れりゃOK
つまり
Datagrid.DataSource = DataSet.tables("テーブル名")
って感じでしょうか?
一月前までDAOしかつかってなかったんで何がなんやら・・・
スンマセンです。
0740デフォルトの名無しさん
NGNGまずは試してみろよ。
それでも駄目なら再質問しれ。
まあ、一応それでOKのはず。
テーブル名はFillで指定したヤツな。
0741デフォルトの名無しさん
NGNGVB.NETを購入したのですがコントロールにあるVideoSoftのVSFlexというOCX
は配布可能な物なのでしょうか？使って配布不可だったら悲しいので。
0742デフォルトの名無しさん
NGNGそれ、パッケージのOCXじゃねぇの？
葡萄都市いってみれ。
0743デフォルトの名無しさん
NGNGそのカラムを基準にソートをしたいのですが、どうやればいいのでしょうか？
IComparerの実装というのがよくわかりません。。。
0745DataFormウイザード変？？
NGNG更新ボタンをクリックすると、”UPDATEステートメントの構文エラーです。”のメッセージが出てしまう。
ウイザード通りにやっても駄目なのはバグ？？ mdbデータベースに問題あり？？
0746デフォルトの名無しさん
NGNGちょっと見てみたが、できるんかなコレ？
SortメソッドにColumn指定するのないし。
IComparerはソート順の規則…だと思う。
コレ実装しても、多分無理じゃないかな。
そもそも別カラムのデータが入ってかないからね。
0747デフォルトの名無しさん
NGNG書籍にまんま載ってた。
0748デフォルトの名無しさん
NGNG0749DataFormウイザード変？？
NGNGmdbデータベースのフィールド名にvalueがある場合、
更新ボタンをクリックすると、”UPDATEステートメントの構文エラーです。”のメッセージが出るようだ。
やっぱ、バグか？？
絞り込むのに、疲れ果てた爺さんみたいになっちまったよ。
0750デフォルトの名無しさん
NGNG<param>
<ringo>150</ringo>
<banana>80</banana>
<melon>55</melon>
．
．
．
</param>
のようなXMLファイルがあるとき、このparam要素配下の
諸要素（要素数は不明）の数字を
fluits(0)=150 fluits(1)=80 fluits(2)=55…のように
上から順に配列に格納するにはどうすれば良いでしょうか。
どなたか助言お願いします。
0751デフォルトの名無しさん
NGNG0752デフォルトの名無しさん
NGNG0753デフォルトの名無しさん
NGNG0754デフォルトの名無しさん
NGNGBGMを流す方法希望。
0755デフォルトの名無しさん
NGNGDirectSound
0756デフォルトの名無しさん
NGNGhttp://choco.2ch.net/test/read.cgi/intro/1040885146/l50
0757デフォルトの名無しさん
NGNGmciSendString関数
0758７５０
NGNGＤＯＭを利用するというのは何となく分かったんですが
VB.NETで使う方法が調べても出てこなくて困ってます。どなたかお願いします
0759最凶VB厨房
NGNGmyXmlDocument.Load("test.xml")
Dim arraylist As New ArrayList()
Dim Reader As New XmlNodeReader(myXmlDocument.SelectSingleNode("param"))
While Reader.Read()
If Reader.HasValue Then
Console.WriteLine(Reader.Value)
arraylist.Add(Reader.Value)
End If
End While
test.xmlの中身・・・。
<?xml version="1.0" encoding="Shift_JIS" ?>
<param>
<ringo>150</ringo>
<banana>80</banana>
<melon>55</melon>
</param>
(´-`).｡ｏＯ(XMLさっぱりわからないや・・・。)
0760最凶VB厨房
NGNG0761７５０
NGNGどうもありがとうございます。
しかし１，４行目のXmlDocumentとXmlNodeReaderで
型が定義されていませんというエラーが出るのですが，
どう対処すれば良いのでしょうか？
0762最凶VB厨房
NGNGを追加。どこに追加するかはわかってるよね？
0763７５０
NGNGできました、ありがとうございます。
勉強始めたばかりなもので、済みません。
0764まいっちんぐマチコ ◆2gicN.Bep6
NGNGMSHFlexGridをフォームに貼り付けて、
MSHFlexGrid1.Cols = 7
っていう、コードを書いたんです。そしたら
Form1.vb(67): 'Cols' は 'AxMSHierarchicalFlexGridLib.AxMSHFlexGrid' のメンバではありません。
って、言うんです。どうしたら怒られないですみますでしょうか？
0765デフォルトの名無しさん
NGNG単純にColsプロパティがないんだと思われ｡
ヘルプ嫁｡
■ このスレッドは過去ログ倉庫に格納されています