OKWAVEは、
あらゆる悩みや疑問を解決できるQ&Aサービスです

バドミントンで打つ前に、肘をたたんで、シャトルをよく見つめ、構えを動かさずに、一瞬止めた方がよいですかよろしくお願いします

スーパーの弁当やレトルト食品やお菓子などの原材料に こういう危険な食品や食品添加物が含まれています。 ↓ 【食品】 ・たんぱく加水分解物：塩酸を加えると発がん性が疑われる「クロロプロパノール類」が発生する。 ・酵母エキス：たんぱく加水分解物とおなじく塩酸によって発がん性物質が生成される。 【食品添加物】 ・乳化剤：大豆由来や植物レシチンは安全だが、それ以外は発がん性がある可能性もある。 ・加工デンプン：ヒドロキシプロピルデンプンやヒドロキシプロピル化リン酸架橋デンプンに発がん性が疑われる。 ・発色剤(亜硝酸Ｎａ)：肉や魚のアミンと結合するとニトロソアミンという発がん性物質になる。 ・カラメル色素：１～４まであり、３や４は製造過程でアンモニウム化合物を加えるため、発がん性物質である「4-MEI」が出る。 ・ソルビン酸Ｋ：発がん性がある。 ・タール色素：元はコールタールという人間に発がん性があるもの。化粧品などに使われる赤２２７や赤２３０は特に発がん性が強いとネットの情報で知ってしまった。 ・イーストフード：発がん性が疑われる「臭素酸カリウム」が使われていることも。 ・調味料(アミノ酸等)：アミノ酸の主成分のグルタミン酸Naを加熱すると発がん性の化学物質が出る。 ・増粘剤(アルギン酸エステル)：製造過程でプロピレンオキサイドという極めて毒性が強く、変異原性陽性で、動物実験で発がん性が認められている化学薬品が多く使われている。 ・甘味料(アスパムテーム)：発がん性区分２Ｂ（人に対して発がん性がある可能性がある） これらは全てネットで危険性を調べた結果なんですが もうね、ネットの情報だけでも「発がん性」に関係するものが多すぎて 今、挙げたものだけでも発がん性があるものがあまりにも多すぎてキリがありません。 つい最近、父親からのお土産で海老煎餅や海老ラーメンをもらったのですが やはり、発がん性が疑われている 「加工デンプン」や「アルギン酸エステル」や「たんぱく加水分解物」や「タール色素」など 普通に添加されているため、もう食べずに他の人にあげるか 代わりに食べてくれる人がいないならもう廃棄しようと思ってます。 ガンにだけは絶対になりたくないのでね。 という事で最近はお菓子やレトルト食品も 「パントリー＆ラッキー」などの無添加にこだわるスーパーマーケットでしか買っていません。 パントリーならラーメンやラーメンのスープもうま味調味料も添加物もオール無添加なので。 そして外食を行く頻度も減らし、最近は自炊が多いです。 特に外食はガストやサイゼリヤなどのファミレスは びっくりするくらい添加物使っているため行かないようにしてます。 （そういや、ガストでステーキ頼もうとしたら「下拵えに調味液に漬けている」と書いてあったので調味液が添加物だったら嫌なのでドリンクだけ飲んで今後はもうファミレスは２度と行かないと決めた） そしてダシやウスターソース、醤油なども 全部、自然食品の店で無添加か無添加＋オーガニック(有機)の物だけを買っています。 私みたいに無添加の食品知ってる人ならまだしも 危険性を知らない人はうっかり大手企業の添加物だらけのものを 毎日３６５日食べ続けているってわけですよね？ 果たしてそれってガンに関係しないのでしょうか？ 回答お待ちしています。 ネットで「添加物は毒だ！」とか「うま味調味料は毒だ！」とか ネガティブな情報を散々見せられてきたので あんま「体に悪い」とかネガティブな事は絶対に絶対に絶対に書かないでください。 （もう今更、発がん性が無いとか安全とか言われても今までのネットの情報を見てきたら絶対に信用なんか出来ないし、今後も自炊か無添加の食品のみ買い続けるけど）

下記の内容で質問があります。回答をいただけると助かります。よろしくお願いします！ ▼ご利用の製品 ・ご利用の端末タイプ・OS（例：タブレット・ノートパソコン・モバイルなど） ＝＝＝ご記入ください＝＝＝ iPhone15 ・製品名・型番（例：HCS-WFS01など） ＝＝＝ご記入ください＝＝＝ PMWA23AZEROG2BK EC-MA01SV ・発生時期（※ご使用できた時期がない場合はその旨、記載ください） ＝＝＝ご記入ください＝＝＝ ▼お困りごとの詳細、自分が使っている機器の状況や、表示される内容をお書きください。（例：電源が入らない・使用方法を知りたい・設定方法を知りたい） ≪※表示されている画像やスクリーンショットを添付すると伝わりやすくなります！≫ ＝＝＝ご記入ください＝＝＝ エレコム製のZEROSHOCKケースPMWA23AZEROG2BKを装着して、エレコム製のQi2ワイヤレス充電器EC-MA01SVで充電できますか？ ※OKWAVEより補足：「エレコム株式会社の製品」についての質問です。

これは三白眼ですか？

プーチン大統領は、なぜロシアで圧倒的に人気があるのですか?ロシアという家族みたいな国の親父なのですか?

僕は現在中3です。僕はロードバイクが欲しくて3分の一お金が足りなかったので、親に立て替えて欲しいと相談しました。成績が停滞（期末9位）しているので、6位で考えて5位以下だったら全額親負担で買ってくれるそうです。正直言って僕の偏差値は52くらいであまり頭が良くありません、学習内容を夏の期末テストまで全教科75以上取れるくらいまで定着させるのにどんな勉強法が良いか、各教科教えて欲しいです。なんかロードバイクとか馬鹿にされたので本気で見返したいです。

元海軍中将の福留繁氏の真珠湾攻撃を読んでいるのですが、1つ分からない事があります。それは、戦前、日本がレインボー第5作戦を知っていたなら真珠湾攻撃をやらなかったであろう、という一文です。一応、レインボー作戦に目を通しましたが、分かりませんでした。どのような意味なんでしょうか？

このコンテナのおもちゃは扉は開けますか？ https://ja.aliexpress.com/item/1005002002498614.html

はじめまして。 高校3年生の女です。 私は他校に付き合って3ヶ月ほどの同い年の彼氏がいます。 家が近いわけではないので会う頻度は月に1.2回くらいです。 手は1回繋いだことがありますが、ハグやキスはしたことがありません。お互いにかなりの奥手です。 私は深い大人なキスやそれ以降の行為をしたいとはまだそこまで思ってないですし、少し怖さを感じているのですが、ハグや軽いキスなど高校生カップルらしいイチャイチャはしたいなと思ってます。 そこで彼氏を次のデートで家に誘ってみようかなと思うのですが、色々と不安です。そこでいくつか質問があります。 (1)高校生男子は彼女から家に誘われたら、下心がある。そうゆう行為をするものだ。と認識してしまいますか？ (2)彼氏は彼女にイチャイチャを求められて嫌じゃないか？ (3)求めてきたくせに、行為まで及ばず軽いキスで終わってしまうのは萎えさせてしまいませんか？ (4)もしも下心を感じさせないお家への誘い方があれば教えて欲しいです。 知り合って1年以上経ちますが、付き合ってからもお互いそうゆう風な話はしたことないですし、相手から下心を感じるような言動や行動をされたことも無いので、イチャイチャするのは嫌いなんじゃないか、私からいくと引かれるんじゃないかと色々不安です。

宜しくお願い致します win10 access365 先日、ここでお尋ねした アクセスファイルのVBAコードからエクセルファイルを作成するための コードをお尋ねし、以下では L.xlsxが作成されて、 アクセスのテーブル　KJKTから　データ転送が 行われるというコードを教示頂きました しかしながら 同様の操作をするときに L.xlsxのデータが 上書きされずに 以前に作ったデータのまま 残ってしまってました そこで 以下のようなエクセルVBAを R.xlsmに作りました Ldataclear() です 毎回 このマクロを実行して いったんL.xlsxの データを当該シートから削除して まっさらにして そのうえで Exp123()を実行すれば 目的は叶うのですが 迂遠なような気もしました もっと簡単に 上書き保存のできる コードなど あるのでありましたら 御教示くださいませ 宜しくお願い致します Private Function Exp123() '変数宣言 Dim srchXls As String 'Excelエクスポート先のファイルパス srchXls = "C:\Users\USER\Desktop\ACCESS\L.xlsx" 'Excelファイルの出力 DoCmd.TransferSpreadsheet acExport, acSpreadsheetTypeExcel12Xml, "KJKT", srchXls, True, "output" 'Excelファイルをエクスポートした旨を通知する。 MsgBox "Excelをエクスポートしました。" End Function ---------------------- Public Function ExcelRmacro() Dim oApp As Object Set oApp = CreateObject("Excel.Application") oApp.Visible = True 'Only XL 97 supports UserControl Property On Error Resume Next oApp.UserControl = True 'ファイルを開く oApp.Workbooks.Open FileName:="C:\Users\USER\Desktop\ACCESS\R.xlsm" oApp.Application.Run ("'R.xlsm'!Ldataclear") End Function -------------------------------- Sub Ldataclear() ' FilePath = "C:\Users\USER\Desktop\ACCESS\L.xlsx" 'ここにファイルの場所ファイル名を記載 Set Wb = GetObject(FilePath) Set Ws = Wb.Worksheets("output") 'ここにシートを記載する Ws.Cells.Delete Wb.Save Application.CutCopyMode = False ActiveWorkbook.Save End Sub