検索結果

(1) I don't have time or money. 「私には時間もお金もない。」 (2) I haven't seen him and don't know him at all. 「私は彼に会った事もないし、彼を全く知りません。」 (1)は目的語を or でつないでいます。 (2)は二つの文を and でつないでいます。 否定文で使われるandは部分否定になるので、orを使って全否定を表すということを学びましたが、それは(1)のように目的語をつなぐ場合のことで、(2)のように文と文をつなぐ場合には当てはまらないということなのでしょうか？ また、(2)の文は I haven't seen him nor do I know him at all. としても同じ意味になりますか？ よろしくお願いします。

アセトアルデヒドの発がん性について教えてください。 「60kgの人が酒1合を処理するには飲酒後約4時間です。酒粕を生で食べる場合、1合相当のアルコール量する。」 「唯一、無害化酵素を持たないで、ガン化しやすいのは「食道」。」で「アセトアルデヒドが胃の中で気化して、睡眠中に食道を通って口から外へ出る過程で食道を傷つけたり、酒粕を飲食して口を磨かないで寝たりすると、口中の常在菌がエネルギー源としてアルコールを溜め込んで、徐々にアセトアルデヒドに分解するので、それが唾と一緒に食道へ流れ、食道を傷める。長時間、少しずつアセトアルデヒドが体内にあり続けるので、食道ガンの発症率は、そうでない人の414倍。日本人の3％。」 だと以前質問した時に教えて頂いたのですが、これは本当ですか？ もしアルコールに弱く、肝臓で分解できない人なら、気化したアセトアルデヒドによって食道がんになる可能性が高いのでしょうか？ 信憑性を教えて下さい。

　次のようなテーブル（T_連番）が元となったクエリ（Q_連番）があります。 テーブル：T_連番 　氏名 　あああ　あああ 　いいい　いいい 　ううう　ううう 　えええ　えええ 　いうえ　いうえ 　あかさ　あかさ 　えおか　えおか クエリ：Q_連番 　氏名 　あああ　あああ 　いいい　いいい 　ううう　ううう 　えええ　えええ 　いうえ　いうえ 　あかさ　あかさ 　えおか　えおか 　Q_連番では、T_連番をそのままフィールドに入れていますので、 同じ並びで表示となります。この同じ並びとなったものに、下記のように自動で連番を ふりたいと考えています。 クエリ：Q_連番 　氏名　　　　　　　　連番 　あああ　あああ　　　1 　いいい　いいい　　　2 　ううう　ううう　　　3 　えええ　えええ　　　4 　いうえ　いうえ　　　5 　あかさ　あかさ　　　6 　えおか　えおか　　　7 　インターネットで色々検索しましたが分かりませんでしたので、ご教示をお願いいたします。

良い方法がありますか？ 二年前中古で外車を買いました。300万です。 妻である私が欲しく旦那もまぁいいんじゃないという感じで決めました。しかし事あるごとに車の事で文句を言われています。 購入したのは現金一括でローンや貯金を取り崩した訳ではありません。共働きで年収は900～1000位はあります。といってもメインは主人なので私は少ないのですがフルで働いているので社会保険を払うくらいの収入です。 子供は中学生、高校生と4月からは大学生の3人です。私は1人目の出産で専業主婦になり約10年専業主婦、その後仕事を始め現在10年目です。 家のローンも完済し預貯金は4000万程であります 子供は3人とも大学進学予定しておりコツコツと貯めている最中です。 そんな中ですが、私が少しはいい車に乗ってみたいと思い始め、(それまでは17年前に買った日産でした)購入の検討をしました。元来ケチで貯金体質の、私にとってかなりの贅沢品だと少し後ろめたい気持ちもあったのですが専業主婦から20年、特に贅沢もせず服はリサイクル、化粧品もドラッグストアで、買えるチープな物。靴も、バックも20代から大事に使い続け、派手に遊ぶわけでもなく子育てと、家計の支えと頑張ってきました。 私がこの10年で得た収入はざっくり1800万ほどありそのうち1300万は既に貯蓄しています。 家計管理は私がしていますが主人もうちの収支はある程度把握しており今回の購入にあたっても二人で相談しながら決めたのですが… 文句とは家のお金で勝手に買った、お前は家のお金を自由に使えていいよな、俺なんか小遣いでゴルフ行くくらいしか自由に、できないとかなんとか。ネチネチくどくど。 車は現在3台あります。子供が、通学で使うことはわかっていましたので近い将来3台必要だね、と話していました。時期としてはすこし早かったのですが免許取ったり大学の入学準備やらでその時期はだいぶ掛かりますし余裕がある時に買えて私的にはベストだと思っていました。 主人は去年遺産相続をし(幾らかは教えてもらっていないのでわかりませんが恐らく3000万ほどあるはず)元々ある2台のうち1台は買い替えました。 家計からは一切出していないし遺産については私の口出しするところではないので特に問題ではないのですが、その事を引き合いに出して俺は自分の金で買ったのにお前は、家の金で買った。と そんな事言われても私が働いたお金は全て家計に入れているし私のこれまでの収入からみても300万の車は買えないものではない、と何度説明しても喧嘩の時には、必ず車の事を持ち出してきます。 そう事言わないで欲しいと言ったらこれからも、言い続けるよ。って。好きな車を運転したいという気持ちすらもわかってもらえず、手放そうと思いました。値はつかないしせっかく買ったのに、維持出来るのにと、悔しいですが気持ちよく所有出来ないなら手放してしまおうかと考え中です。 まだ主人を説得する方法はあるのでしょうか？ それとも諦めて手放してしまったほうがよいのでしょうか？

御所には何人くらいの人が居たのですか。 また、どんな役目の人々が居たのですか。 警固の兵が多数いた、幕末の騒然とした時代を除いて、平時の組織と人数を教えてください。 よろしくお願いします。

Tom can't swim as well as Mike. トムは、マイクほど上手に泳げないと言う意味ですが、 マイクと同様にトムは泳げない、とはとれないものですか？

レシピに ほんだし 小さじ山盛り1(4g) 酒 大さじ2 みりん 大さじ2 しょうゆ 大さじ2 と書いてある場合 麺つゆで代用する場合 大匙どのくらい必要ですか?

こんにちは。 Dictionaryオブジェクトについて、ご教示いただきたく質問させていただきます。 あるCSVデータにおいて、A列に入力されている番号で重複をなくし、重複する番号については、B列(売上額)C列(利益額)それぞれの値を合計してSheet2に表示させるコード(test1)を書きました。データの行数が3万5千行ほどあるため、処理が終わるのに3分程かかります。 今後もデータは増えていくので、処理終了までの時間をもう少し短縮したく、自分なりに調べてみたところ、Dictionaryオブジェクトというものを知り、使用例を参考にしながら見よう見まねでコード(test2)を書いて試してみたところ、処理終了まで数秒となり、かなり短縮されました。 エラーも出ることなく処理できるものの、Dictionaryオブジェクトに対する理解がイマイチでして、コードの書き方等、問題ないかを知りたく質問させていただいた次第です。 よろしくお願いいたします。 ------------------------------------------------------------------------------ Sub test1() Dim i As Long Dim lastRow As Long Dim ws As Worksheet Application.ScreenUpdating = False '不要データ削除 Rows("1:3").Select Selection.Delete Shift:=xlUp Range("B:Q,S:W,Y:AF").Select Selection.Delete Shift:=xlToLeft Range("A1").Select 'シート名変更・挿入 ActiveSheet.Name = "CSV" Sheets.Add After:=ActiveSheet ActiveSheet.Name = "売利集計" Set ws = Worksheets("売利集計") wS.Cells.ClearContents ws.Range("B1").Value = Worksheets("CSV").Range("B1") ws.Range("C1").Value = Worksheets("CSV").Range("C1") With Worksheets("CSV") .Range("A:A").AdvancedFilter Action:=xlFilterCopy, CopyToRange:=ws.Range("A1"), unique:=True lastRow = ws.Cells(Rows.Count, "A").End(xlUp).Row With Range(ws.Cells(2, "B"), ws.Cells(lastRow, "B")) .Formula = "=SUMIF(CSV!A:A,A2,CSV!B:B)" .Value = .Value End With With Range(ws.Cells(2, "C"), ws.Cells(lastRow, "C")) .Formula = "=SUMIF(CSV!A:A,A2,CSV!C:C)" .Value = .Value End With End With Application.ScreenUpdating = True Set ws = Nothing MsgBox "売利集計完了しました。" End Sub Sub test2() Dim i As Long Dim lastRow As Long Dim ws As Worksheet Dim c As Range Dim dicS As Object Dim dicP As Object Application.ScreenUpdating = False '不要データ削除 Rows("1:3").Select Selection.Delete Shift:=xlUp Range("B:Q,S:W,Y:AF").Select Selection.Delete Shift:=xlToLeft Range("A1").Select 'シート名変更・挿入 ActiveSheet.Name = "CSV" Sheets.Add After:=ActiveSheet ActiveSheet.Name = "売利集計" '番号別集計 Set ws = Worksheets("売利集計") Set dicS = CreateObject("Scripting.Dictionary") Set dicP = CreateObject("Scripting.Dictionary") With Sheets("CSV") For Each c In .Range("A2", .Range("A" & .Rows.Count).End(xlUp)) dicS(c.Value) = dicS(c.Value) + Val(c.Offset(, 1).Value) dicP(c.Value) = dicP(c.Value) + Val(c.Offset(, 2).Value) Next With Worksheets("売利集計") .Columns("A:C").ClearContents .Range("A1").Resize(, 3).Value = Worksheets("CSV").Range("A1").Resize(, 3).Value .Range("A2").Resize(dicS.Count).Value = WorksheetFunction.Transpose(dicS.keys) .Range("B2").Resize(dicS.Count).Value = WorksheetFunction.Transpose(dicS.Items) .Range("C2").Resize(dicP.Count).Value = WorksheetFunction.Transpose(dicP.Items) End With End With Set dicS = Nothing Set dicP = Nothing MsgBox "売利集計完了しました。" End Sub

"TIME's editors were able to track the contenders' online influence when deciding who would be included in the poll - the results of which provide insight into how the world sees the biggest names in the news." ここにあるof whichのofの役割を詳しく教えてくださいm(__)m

25の女です。昔からそうなのですが、母は何かと私に張り合ってきます。 「お母さんが若い時はお前よりウエストが細かった」 「お母さんの若い頃はそんなに体重が重くなかった」 「あんたの持ってない○○を手に入れた」 「その年で彼氏もいないの？お母さんが若い頃はね」 などなど。はっきり言って、そんな下らないことで張り合ってどうするの？と思うような事までしつこく張り合ってきます。 これが噂の「女のマウンティング」というものでしょうか。 また、母は息子（私の弟）を物凄く溺愛しており、過干渉しているのですが「私ほど子供を平等に接している親はいない」とものすごい自信です。 私は過度な虐待は受けておりませんが、怪我をしない程度の暴力はよく受けていました。 実の娘への対抗心をもち母親は、何がしたいのでしょうか？ 母が欲しいものを全部私が奪う、と憎しみを込めて言われるのですが意味がわかりません。 溺愛する弟と猫が母を嫌っており、私に好意的なのが気に入らないそうですが、正直自業自得です。 私の名誉のために言っておくと、私は太っていません。 ずっと武道をしているため、体重は確かに少しありますが筋肉質だからです。 また、私も母も平凡な容姿です。女優さんのような美貌はありません。

http://www9.plala.or.jp/sgwr-t/c/sec16.html の下部に enum week { SUN, MON, TUE, WED, THU, FRI, SAT }; int main(void) { enum week w;　　 /* ⇒列挙型 week で変数 w を宣言 */ w = MON; /* ⇒変数 w に列挙定数 MON を代入 */ と書かれています。 列挙型 week で変数 w を宣言するのはどういうときに メリットがありますか？ 普通にunsigned char w と何が違うのでしょうか？

ＯＫＷＡＶＥって、ヤフー知恵袋より 真面目に質問に答えてくれる人が 多いのですが動作が重いので 使うのがいやになります。

Earlier in the day on their way to church they had spotted the man sleeping. （http://www.lifebuzz.com/wedding2/） この文は何故過去完了が使われているのでしょうか？過去形ではダメなのでしょうか？よろしくお願いします

1歳3ヶ月の子供がいます。 パパ、ママ、ばぁ、じぃ ばいばい、抱っこなど そんな感じの言葉は言います。 ただ気になることは、 とにかく落ち着きなく、動きまわることです。食事中も初めは座っていてもすぐ出たがります。わけわかんなく動くというより、いろんな、物をめがけて動き手に取り遊んですぐ違う物で遊んで、、と集中力に欠けます。 外では、眠いお腹すいたの時のグズリはかなり主張が激しいですが、それ以外では特にきになりません。 活発で元気な子。 たくさんいろんなものに興味があるだけ。そう思ってきましたが、やはり気になります。 落ち着いて遊んでいる子を見ると羨ましくおもいます。 こういった行動が 多動症なのですか？ 宜しくお願いします。

翻訳及びlessの用法についてご教授お願いいたします。 １「君はその服を（定価の）200円安く買えるよ。」 ２「君は（入場料の料金より）入場券を入場料より200円安く買えるよ。 」 ３「1000円安い靴」 lessを用いた場合に表すならどのようにすればよいでしょうか？またここでのlessの用法はは代名詞になるのでしょうか？ You can buy this clothes at /for 200yen less than a regular price. You can get an admission ticket at/for the fee less than 200yen. このような表現は不自然だと考えるので翻訳及びless（than）の用法の解説をして頂ければ幸いです。

いつもお世話になっております。 サブで使っているノートの、lenovo　G550（たぶん）が急に重くなりました。 たしかCPUはｉ5で64bit、メモリは８GBに増設しています。 後付ソフトは確か、avast!、稀に起動するオフィス2013とドラクエ１０だけ。 メインPCで作業の傍ら、youtubeやhuluの動画を再生するくらいの使用です。 数ヶ月ほど前から起動はやたら遅くなりましたが、動作に問題はありませんでした。 しかしここ数日急に、動画を再生するだけでコマ送り状態です。 あらゆる動作が重いです。起動して数分でそうなります。 その時はブラウザのウインドウ化するだけで10秒以上待たされます。 ネットの遅延ではないことは確認しています。 ここでお聞きしたいのが、一般的でない、経験に基づいた直し方です。 以下の情報はすでに存じておりますので、他にもあればご教授頂きたいです。 ・CPU使用率を観てプロセスの停止 ・常駐、自動起動ソフトのアンインストール ・ウィルスの疑い ・ディスククリーンアップ、デフラグ、レジストリクリーナー ・ブラウザ履歴や一時ファイルの消去 ・ホコリと熱の対策 ・バックアップして初期化、復元など ・再起動や、バッテリー、コンセントをしばらく外す。 ・周辺機器のない状態で起動を試す ・ウィンドウズアップデートの失敗 藁にもすがる思い...とかではなく初期化をしなくても済む方法があれば 勉強にもなるし知りたいな、くらいです。 自分の時はこれで直った！など、特殊な例などがあればお願いします。

テレビドラマで、江戸時代が舞台の時代劇を観た印象ですけれど、女性が入浴するシーンをよく観た気がします。 ドラマで観たとおり、江戸時代の女性はよく入浴したのでしょうか。

整数NとN個の整数を受け取り，受け取ったN個の整数のうち最大のものを表示するプログラムを記述せよ． ただし，N>0とする． 入出力例 入力 ⇒ 出力 3 2 1 8 ⇒ 8 5 13 14 11 12 15 ⇒ 15 2 -1 -2 ⇒ -1 という問題です。「３つの数の中から～」という場合はそれぞれa,b,cとおいて比較できるのですが、この問題のような場合はどうすればいいですか。

キャノンのSX720HSを使用しています。野鳥を撮影するときに連写を使用すると、画像が荒くなるような気がするのですが、気のせいでしょうか？　また、野鳥を撮影している方はどのようなモードで撮影しているのでしょうか？　カメラについてはまったくの初心者です。詳しくお願いします。

Private Sub Worksheet_SelectionChangeのVBAでA列B列C列でワンクリックで文字が入力できるように設定致しました。 その後、A列からC列を範囲選択してDeleteするとデバック　「実行時エラー　 型が一致しません」と出てしまいます。業務上、そのセルのデータは一気に消したいので困っております。どなたか分かる方よろしくお願い致します。 Private Sub Worksheet_SelectionChange(ByVal Target As Range) Dim rng As Range, rng_1 As Range, rng_2 As Range Application.EnableEvents = False Set rng_1 = Range("H17:H100") Set rng_2 = Range("I17:I100") Set rng_3 = Range("J17:J100") Set rng_4 = Range("K17:K100") Application.EnableEvents = True Set rng = Intersect(Target, rng_1) If Not rng Is Nothing Then Cancel = True If Target.Value = "" Then Target.Value = "(1)" Else Target.Value = "(1)" End If Else Set rng = Intersect(Target, rng_2) If Not rng Is Nothing Then Cancel = True If Target.Value = "(2)" Then Target.Value = Empty Else Target.Value = "(2)" End If Else Set rng = Intersect(Target, rng_3) If Not rng Is Nothing Then Cancel = True If Target.Value = "(3)" Then Target.Value = Empty Else Target.Value = "(3)" End If Else Set rng = Intersect(Target, rng_4) If Not rng Is Nothing Then Cancel = True If Target.Value = "(4)" Then Target.Value = Empty Else Target.Value = "(4)" End If End If End If End If End If End Sub