検索結果

トマト缶詰はビスフェノールA（BPA）がトマトの酸の影響で缶の中で溶けて体に有害な影響をもたらすと聞いたのですが、缶のトマトジュースも同じですか？ 赤ちゃんがトマトジュース大好きでいつも飲んでいるのですが…

ある日、急にOUTLOOK2013で受信ができなくなり、（送信は正常）エラー(0x80042110)使用しているPOP3サーバーは矛盾した情報を提供しています。STATコマンドによって返されたメッセージの数がUIDLまたはLISTコマンドによって返されたアイテムの数と一致しません。の表示が出る。設定は以前と変化なし。Yahooメールにて代替しているが、使いずらい。対処方法を教えて下さい。 ※OKWAVEより補足：「NEC 121ware ： メール」についての質問です

boot failedが表示され起動しない ※OKWAVEより補足：「NEC 121ware ：Android」についての質問です

サイトにアクセスできない、ネッと診断では応答しませんと ※OKWAVEより補足：「富士通FMV」についての質問です。

現在、Visual Basicにてコードを作成中です。（初心者です。） 現時点での出来ること 5列目の2～10行目に何か入力されれば その隣のセルに「お疲れ様です」と入力される（ここまではコード出来てます。） 例：Ｂ５セルに何か入力があればＣ5セルに「お疲れ様です」と入力される。 　　Ｃ5セルに何か入力あればＤ5セルに「お疲れ様です」と入力される・・・ といった内容です。 そのあとやりたい事（ここからコード出来ません） Ｂ５セルに何か入力があればＣ5セルに「お疲れ様です」と入力された後 Ｃ5～10行目を縦に結合し、文字を縦書きにする。 Ｃ５セルに何か入力があればＤ5セルに「お疲れ様です」と入力された後 Ｄ5～10行目を縦に結合し、文字を縦書きにする・・・ といった内容です。 一応コード下記に載せます。 Sub macro1() Dim a As Variant Dim i As Long Set a = Worksheets("sheet1") For i = 10 To 2 Step -1 If Len(a.Cells(5, i).Value) > 0 Then 'もし、5列目の2～10行目に何か入力されれば a.Cells(5, i).Offset(0, 1).Value = "お疲れ様です" Exit For End If Next i End Sub すいませんがコード記載よろしくお願いいたします。 回答よろしくお願いします。

■製品名/バージョン（例：筆まめVer.28） →デジカメdeムービーシアターズ7 ■パソコンのOS（例：Windows10） →Windows7 ■質問内容 操作ガイドに従ってソフトインストールが正常に完了し、起動させた所、通常ユーザー登録（アカウント作成画面）に移行するようになっていますが、インターネットに接続して下さい、再試行、とのポップアップが表示され起動出来ない。無線有線共に、試みましたが、インターネット接続はされいる状態です。付属のディスクでリカバリーし、再インストールを行いましたが症状は変わりません。尚、ユーザーアカウントは作成済みです。 お詳しい方、是非教えてください。よろしくお願いします。 ※OKWAVEより補足：「ソースネクスト株式会社の製品・サービス」についての質問です。

毎日夜19時頃から朝3時頃まで Wi-Fi LANの2.4G （xxxx-xxxx-bg）の方だけ接続ができなくなります。 電源をつけ直したりしてもダメです。 無線LANの一覧には出てきますが、接続ができません。 5Gの方を使ってますが、対応していないデバイスもあり、困っています。 ルーターはHUAWEI　HG8045 繋がらない時は緑点滅しているのですが、 点滅の回数が、遅くなっている気がします。 宜しくお願いいたします ※OKWAVEより補足：「So-netの各種設定」についての質問です。

今年のダイヤ改正でのぞみが5分に一本、今や東海道新幹線は3分間隔とか？ 以前先頭車両の先頭座席に座ったとき何か落ち着きませんでした 超高速鉄道だから事故になれば前も後ろもない、と言われればそうかも知れませんが 大体鉄道事故での死者は先頭車両が多いと思います 昔から超高速で走る新幹線にむしろ恐怖を抱いておりました。 事故は絶対起こらない仕組みとかいいますが、私は絶対起こると思います 新幹線事故は想像を絶する規模になるでしょう、その時「専門家」は、あまりに無謀な過密ダイヤを指摘するでしょう・・。 3分に一本なんて　無茶すぎると思うのですが 皆さん新幹線安全神話信じますか？

先日サッカーJリーグの観戦チケットを初めてネットで購入し、その時にQRコードでできるように購入しました。スタジアムに入る直前にQRコードを発行したらいいのですか？また、ワンタッチID会員じゃなくても大丈夫なのでしょうか？

USB印刷サポートはUSB3.0で正しく動作しません。と表示され、本体のボタンほぼ全部が同時点滅しています。 どうすれば良いですか？ ※OKWAVEより補足：「EPSON社製品」についての質問です。

電車、バスの席をゆずる行為 都内の山手線など 電車、バスでお年寄り、妊婦、子供、身体障害者、怪我してる人がいたら必ず席をゆずるべきか悩んでいます。 ちなみに自分は20代男です。 １、自分が優先席に座っていたらゆずらなければならず、その他の席にいた場合は知らないふりしてても大丈夫だと思いますか？ ２、席をゆずらなければ、やはり常識ないなって感じで他の人に白い目でみられますか？

電気製品についている色々なマークの意味がわかるwebサイトはないでしょうか？ UL,CE,GS,PSEなどは簡単に見つけることができましたが、 　・Kを丸で囲んだようなマーク 　・VCI 　・ゴミ箱にＸ（バツ）をついたもの 　・丸の中に　レ（チェックマーク） 等が、 どの様な意味をもつのか、それらのマークはその製品について義務なのかなどを調べたいです。 又、製品の安全性や信頼性を示す為に、このようなマークをラベルなどに盛り込み、製品に貼りたいのですが、マークを使用する為にはどうしたらよいのか？ 又ラベルのアートワークを作る際、ロゴは、どこから入手したら良いのか等、 何も分かりません。 どなたか知識をお持ちの方お願いします。

白黒で印刷するので、カラーインクは使用したくないのですが？　ブラックインクだけで印刷はできないですか？ ※OKWaveより補足：「EPSON社製品」についての質問です。

全国的に障害発生してますか？？？ もーーー 何とかしてよーー

機種：HP　ProBookPro　5220m OS：windows　XP　Pro 内蔵のHDDを取外し、SSDと換装した後でPCを起動させたところ、 画面には起動時のロゴも出なくなり、再起動を繰り返すだけになってしまいました。 症状が悪化する前にと、最初についていたHDDに戻し、 ビス留めと配線の抜けを確認し元に戻しましたが、 上記と同様に再起動を繰り返し、画面には何も表示されなくなりました。 HDDに衝撃を与えておらず、配線の抜けや静電気も発生していないので、 何が原因なのかわからない状況です。 古いなりに使いやすいPCで、なんとか復活させたいので、 パソコン熟練者からのアドバイスをお願い致します。 よろしくお願い致します。

PCに詳しくないので質問させて頂きます。 vistaのPCが壊れてWindows8のPCを新規に購入しました。 そこでvistaの保存データを8に移したくて、新しいPCに増設するようなかんじで移設接続し起動させましたがこのHDDを認識しません。 これって、認識しなくて当たり前のことなのでしょうか？ いい方法があれば、教えてください。 初歩的な疑問なのかもしれませんが困っています。どうかよいアドバイス頂けると嬉しく思います。 どうぞよろしくお願い致します。

JR運転士が熱中症による体調不良で、鉄道の運行に支障が出たのを機に、今まで停車中の水分補給はOKではあったが毎回その旨の（どこで何のために等）報告書提出を義務付けていたのを、止めた。 とのニュース記事を読みました これで、運転士の方々はいちいち報告書を書かずに済み、熱中症予防のために自由に水分補給が出来るようになったみたいです。 ところで、今まではナゼわざわざいちいち水飲んだらその旨の報告書を義務付けていたのでしょうか?

　こんにちは　よろしくお願いします。 当方ESPRIMO WF1/M 2013秋モデルWindows8.1を使用中です。 ここ1か月ほど特にダウンロード、インスツール等していませんが （メールはします）毎日Cドライブの空き容量が3G程減るのです、 ウイルスにでも感染しているのでしょうか（ウイルス対策はカスペルスキーです。）どの様な対策が有るでしょうか、教えて下さい。 ※OKWaveより補足：「富士通FMV」についての質問です。

N88 basicプログラムにおいて鉱物のノルム計算ができるようにしたいのですが、プログラムを打ち込んだのですが、うまく動きません。どなたかわかる方がいればご教授頂きたく願います。 かなり長くなりますが、ぜひともお願い致します。 下記、打ち込んだプログラムとなります。 長いので、質問を分けて入力します。 10 ' 20 '***** normative calculation program for clay minerals ***** by T,Igarashi,1983 30 ' 40 OPTION BASE 1 50 CONSOLE 0,25,0,1 60 WIDTH 40,25 70 ' 80 ' 90 DIM A$(22),DMY$(22),AA$(22),B1$(31),M$(8),L$(8) 100 DIM A(8,22),A1(22),A2(22),B(31),B0(8,31),C9(31),TOTAL(2,8) 110 GOSUB *INIT.1 120 ON ERROR GOTO 5000 130 GOSUB *ENTER 140 FOR QQ=1 TO NN 150 GOSUB *INIT.2 160 IF KORF=1 THEN GOSUB *FILE ELSE GOSUB *KEYBOARD 170 GOSUB *STORE 180 GOSUB *CALC 190 GOSUB *OUTPUT 200 NEXT QQ 210 GOSUB *PRINTOUT 220 GOTO 130 230 ' 240 ' 250 ' 260 *INIT.1 270 RESTORE 290 280 FOR I=1 TO 22 : READ AA$(I) : READ A2(I) : NEXT 290 DATA SIO2,60.085,TiO2,79.899,Al2O3,101.961,Fe2O3,159.692,FeO,71.846,MnO,70.937,MgO,40.304,CaO,56.079,Na2O,61.979,K2O,94.195 300 DATA P2O5,141.943,Cl,35.453,SO3,80.57,S,32.6,Cr2O3,151.989,ZrO2,123.218,F,18.99,CO2,44.9,H2O+,18,H2O-,1,Ig.LOSS,1,Others,1 310 RESTORE 330 320 FOR I=1 TO 31 : READ B1$(I) : NEXT 330 DATA Q,C,ad,mi,ab,an,ka,se,ch,gi,mo,pp,dp,al,Z,hl,th,cc,mg,sd,li,mt,he,cm,pr,il,ru,ap,fr,en,ot 340 C9(1)=A2(1) : C9(2)=A2(3) : C9(3)=A2(1)+A2(3) : C9(4)=A2(10)+A2(3)+A2(1)*6 : C9(5)=A2(9)+A2(3)+A2(1)*6 : C9(6)=A2(8)+A2(3)+A2(1)*2 : C9(7)=A2(3)+A2(1)*2+A2(19)*2 350 C9(8)=A2(10)+A2(3)*3+A2(1)*6+A2(19)*2 : C9(9)=A2(7)*5+A2(3)+A2(1)*3+A2(19)*4 : C9(10)=A2(3)+A2(19)*3 : C9(11)=A2(9)*33+A2(3)+A2(7)+A2(1)*4+A2(19)*4 : C9(12)=A2(3)+A2(1)*4+A2(19) 360 C9(13)=A2(3)+A2(19) : C9(14)=A2(10)+A2(3)*3+A2(13)*4+A2(19)*6 : C9(15)=A2(1)+A2(16) : C9(16)=(A2(9)-16)/2+A2(12) : C9(17)=A2(9)+A2(13) : C9(18)=A2(8)+A2(18) : C9(19)=A2(7)+A2(18) : C9(20)=A2(5)+A2(18) 370 C9(21)=A2(4)+A2(19) : C9(22)=A2(4)+A2(5) : C9(23)=A2(4) : C9(24)=A2(5)+A2(15) : C9(25)=A2(5)-16+A2(14)*2 : C9(26)=A2(2)+A2(5) : C9(27)=A2(2) : C9(28)=A2(8)*10+A2(11)*3+A2(19) 380 C9(29)=A2(8)-A2(17)*2 : C9(30)=A2(1)+A2(7) : C9(31)=1 : DD=0 390 FOR I=1 TO 31 : B(I)=0 : NEXT 400 RETURN 410 ' 420 ' 430 ' 440 *ENTER 450 C=0 : KORF=0 : SCREEN 3,3 : CLS 3 : SCREEN 3,0 : LINE(0,0)-(639,199),6,BF : COLOR 2 460 LOCATE 0,5 : PRINT "How many samples (Max 8 samples)";: INPUT NN 470 IF NN>8 THEN CLS 1 : GOTO 460 480 IF NN=0 THEN GOTO *PROEND 490 COLOR 2 : LOCATE 0,8 : PRINT "Input data from Keyboard or File or End : K/F/E" 500 Y$=INKEY$ 510 IF Y$="" THEN 490 520 IF Y$="e" OR Y$="E" THEN GOTO *PROEND 530 IF Y$="k" OR Y$="K" THEN KORF=0 : RETURN 540 IF Y$<>"f" AND Y$<>"F" THEN 490 550 KORF=1 560 RETURN 570 ' 580 ' 590 ' 600 *INIT.2 610 CLS 1 620 FOR I=1 TO 22 : A(QQ,I)=0 : NEXT I 630 FOR I=1 TO 31 : B(I)=0 : B0(QQ,I)=0 : NEXT I 640 RETURN 650 ' 660 ' 670 ' 680 *FILE 690 OPEN "data.1" AS #1 700 FIELD #1,40 AS MINERAL$,40 AS L1$ 710 FOR I=1 TO 22 : FIELD #1,(I-1)*4+80 AS DMY$(I),4 AS A$(I) : NEXT 720 MAX=LOF(1) : IF MAX=0 THEN RETURN 440 730 LOCATE 1,2 : PRINT MAX;"records are filing." 740 IF DD=1 THEN 800 750 LOCATE 2,5 : PRINT "You need list (Y/N)?": Y$=INKEY$ 760 IF Y$"" THEN 750 770 IF Y$="N" OR Y$="n" OR Y$="ミ" THEN 800 780 IF Y$="Y" OR Y$="y" OR Y$="ン" THEN GOSUB *NAME.LIST : GOTO 800 790 GOTO 750 800 LOCATE 2,10 : INPUT "Record No.";N 810 IF N>MAX THEN CLS 1 : GOTO 730 820 GET #1,N 830 M$=MINERAL$ : L$=L1$ 840 FOR I=1 TO 11 : A(QQ,I)=CVS(A$(I)) : A(QQ,I+11)=CVS(A$(I+11)) : NEXT 850 CLOSE #1 : DD=1 860 LOCATE 2,15 : PRINT "Correct data : Y/N"; : Y$=INKEY$ 870 IF Y$="" THEN 860 880 IF Y$="Y" OR Y$="y" THEN C=1 : GOTO 1120 890 IF Y$="N" OR Y$="n" THEN RETURN 180 900 GOTO 860 910 ' 920 ' 930 ' 940 *NAME.LIST 950 LPRINT 960 LPRINT CHR$(27) ; "V0960" ;CHR$(&H8) 970 LPRINT "Sample Name" ; TAB(40); "Locality" 980 LPRINT CHR$(27);"V0960";CHR$(&H8) 990 FOR II=1 TO MAX 1000 GET #1, II 1010 M$=MINERAL$ : L$=L1$ 1020 LPRINT M$; TAB(40); L$ 1030 NEXT 1040 LPRINT CHR$(27) ; "V0960";CHR$(&H8) 1050 LPRINT CHR$(12) 1060 RETURN 1070 ' 1080 ' 1090 ' 1100 *KEYBOARD 1110 M$="" : L$="" : FOR I=1 TO 22 : A(QQ,I)=0 : NEXT I

最近、メディアでも多くの方が乳がんになったとニュースになっていますが、 私の友人でも乳がんになった人がいます。 でも、健康にとても気お付けていて、食事も添加物など気にしていたと 思います。 乳がんが食べ物だけが要因ではないと思いますが、 何に気を付けたらいいのか、よくわからなくなっています。 検診は乳がんは２年に一回にしていました。 マンモグラフィも被ばくと聞いたので。 でも、毎年検診をしていても進行していた人もいます。 有機野菜、発酵食品、豆乳。それにこだわっていた人も、 ガンにはなります。 不健康な生活より、健康な生活がいいのかもですが、 女性では乳がん、 男性では前立腺がん。 ホルモンが関係しているところ・・。 食べ物以外に気を付けることなど、 個人的見解を含めてご意見お聞かせください。