検索結果

教員採用試験に出そうな自由英作文の課題を解いてみました。突っ込み所満載だと思うので時間のある方のみで結構ですのでご教授下さい。 問:高等学校の英語の授業で3Rs (Reduce, Reuse, Recycle )を取り上げた単元を導入する際に生徒に聞かせる英語を、具体例を挙げて100語程度で書け。 I will briefly explain about 3Rs.　3Rs means Reduce,Reuse and Recycle. Reuse means ”Reuse your things repeatedly as possible as you can.”For example,in this school, we use papers at least two times. In other words we never fail to through the papers away without using both sides of the papers. Reduce means ”Reduce the trash:we keep using our things as long as we can." In my case, I have been using my iPhone case for five years though it has aged well. Recycle means "One is born different things again." For example, some T-shirts are made from some plastic bottles.In other words some T-shirts are born some plastic bottles again. Ｗe are going to learn 3Rs from now on.

付き合って約1年半、許しを得て同棲して3か月ほど経ちました。指輪も購入、式場も仮予約をし、後は婚約の挨拶と入籍の段階です。 しかし、前から気になっていた彼女の嫌な部分を、今まで嫌だと指摘してきましたが、今も相変わらずで嫌になってきてしまいました。これがマリッジブルーがきっかけなのかどうかわからず、プライベートでも相談したのですが、結局このモヤモヤの正体が何なのかわからないです。 寝る前、目をつぶると、別れる段取りや別れた後の生活、自由になった生活が想像されます。しかし、目を開くと、寂しい思いと同時に、なんとかならないものかと抵抗したい自分がいます。しかし、今までも頑張って続けてきたけれど、度々こういうことになるのだから良くないのかもしれないなという思いが巡ってきて、「やはり別れた方がいいのか.....」という思いになります。最近はこれをずっと繰り返しています。 一体どうしたらいいのでしょう？一緒にいて安心できたり、安らげる気持ちがあまりないのですが、合わないのでしょうか？そういう部分で相手を選ぶべきですか？

OKwaveから、「あなたの質問に回答がつきません　カテゴリーを変えたら」・・・というようなメッセージが届きました。そこで以前の質問を削除しようとしたのですが、質問履歴欄で「設定」のボタンを押すと 　「質問削除」 　「マルチメディアに追加」 が二段で出てきて、「質問削除」のほうをクリックしても何も変わらず、削除もできません。 どなたか教えていただけますか? 　ちなみに知りたいのは、眼鏡印の「ウォッチ」と、旗印の「フロッグ」の機能の解説でした。 宜しくお願いします。 m(vv)m

憲法前文、９条とか言っても、読んでない人が多いですよね 日本は戦争という手段を永久に放棄するという憲法を持つ世界でも貴重な国なのですが その割には流行るアニメは戦闘ものが多く　平和を訴えようものなら変人扱い 悪人扱いです。 日本は平和を望んでいても近隣とは上手く行ってない　寧ろ馬鹿にしています 日本の平和主義は本物でしょうか？若い人は平和主義をどう思ってるのでしょうか？

健康食品や、ダイエット食品などの　チラシや、ウェブサイトなどで、 愛用者の声、お客様の声　が、必ず掲載されていますが、 顔写真入りで、「やせました！」みたいな感じで　堂々と顔をさらしています。 私が、客の立場だったら、全国に、顔をさらされるのは、抵抗があります。 メーカー側に、得があっても、客の立場からして、お客様の声に顔写真を 乗せるメリットなんて、何もないはず　なのに、なぜ、掲載されることを 了承したのか、不可解です。 愛用者の声、お客様の声　の　顔写真の人物は、本当にホンモノなんでしょうか？ それとも、モデルとか、役者さん　なんでしょうか？

お世話になります。 VBは素人で、自分なりにネットでいろいろ調べて、下記の物を作ってみたのですが、 うまくいかず、とても悩んでおります。 知ってる方、どなたか教えて頂けませんか？ よろしくお願いいたします。ｍ(_ _)ｍ ------------------------------------------------------------------ 目的： (1)テーブルのフィルド名を、各CSVの一行目に出力したい。 (2)テーブルのフィルドは30項目ぐらいあるため、下記のように個別出力ではなく、 　　一括で出力できるようにしたいです。 (3)すべての項目には、”　”で囲み、カンマで区切りをしたいです。 ------------------------------------------------------------------ Option Compare Database Option Explicit Private objDB As DAO.Database Private objExcel As Object 'EXCELオブジェクト Private objWorkBook As Object 'WORKBOOKオブジェクト Private objSheet As Object 'SHEETオブジェクト Public Sub CSVsyuturyoku() Dim db As DAO.Database Dim rs1 As DAO.Recordset Dim rs2 As DAO.Recordset Dim flag As Boolean Set db = CurrentDb Set rs1 = db.OpenRecordset("SELECT DISTINCT 氏名 FROM 出荷データ") Do Until rs1.EOF Set rs2 = db.OpenRecordset("SELECT * FROM 出荷データ" _ & " WHERE Nz(氏名) = '" & rs1!氏名 & "'") flag = True Open CurrentProject.Path & "\ファイル" & rs1!氏名 & ".csv" _ For Output As #1 Do Until rs2.EOF 'Print #1, Nz(rs2!商品名) Print #1, rs2!商品コード & "," & rs2!商品名 & "," & rs2!単価 ' ↑フィルド項目数が多すぎたため、全部書ききらず。。。 rs2.MoveNext Loop Close #1 rs1.MoveNext Loop rs1.Close: Set rs1 = Nothing If flag Then rs2.Close: Set rs2 = Nothing db.Close: Set db = Nothing ' 終了の表示 MsgBox "ファイル出力が完了しました。" End Sub

卒論が公開されているサイトってどこかありますでしょうか。ご教授していただけると幸いです。

マックス・ヴェーバーの思想に興味を持ちました。 しかし、自分でマックス・ヴェーバーの書籍を探してみましたが、 どれも私には難しすぎる内容でした。 政治学や哲学の完全初心者である私でも読める簡単なものはないでしょうか？

MACbookair に最近変えて、 excel を使用しているのですが、 添付写真のように、作成した、BOOKが 上書き保存（更新？）アイコンしかなく、 名前をつけて保存とかできなくなりました。 バージョンなどなどよくわからないのですが？ 散々いじったのですが、よくわからず、 どなたか名前をつけて保存をする方法を教えていただけますでしょうか？ ググっても同様の質問が見つけられませんでした。 お願いします。

パソコン（ワープロ）が普及する以前には、どこの国の小説家も仕事部屋に、気に入らない原稿を丸めて捨てる紙くず箱があったでしょうか？ 日本の小説家は手書きで原稿を書いて、西洋の小説家はタイプライターで原稿を書きましたが、どちらも書いて気に入らない原稿は丸めて部屋に置いた紙くず箱に捨てたのでしょうか？ きっと大量に気に入らない原稿を丸めて捨てたのでしょうか？ パソコン（ワープロ）が普及すると、あまり紙くずは出なくなったでしょうか？それとも紙くずが出るでしょうか？

鉛筆とかですと消しゴムで簡単に消える ボールペンを消すにはどのような方法が 便利ですか、修正ペンや修正テープや塗り 塗料など、ちなみに公的機関の書類などは 用紙が決まっていて間違えたとするなら、 どのように修正するのが正しいのでしょうか 宜しくお願いします。

新しい仕事を始めるときマニュアルがあるところとないところがあります。仕事はマニュアル通りやっても上手くいかないことが多いです。1どうして仕事はマニュアル通りにやるのでしょうか？2仕事にはマニュアルがどうして必要でしょうか？3もし、仕事にマニュアルがない場合直接仕事を聞きながらメモを取っても覚えられません。仕事を見て覚えられません。仕事にマニュアルがない場合どのように仕事が上手くいくのでしょうか？

以前投稿されていたもので、やってみたのですが、うまくいかなかったので質問いたします。 E3～E42までのセルの情報をB3へまとめたいのです。 また、E3～E42のうちなにも書かれていないセルは、まとめないようにしたいです。空白になっているセルは、最後に記載されているセル以降空白になる状況となります。 今後の運用面を考え、この手法をとりたいのですが、よい方法はありますでしょうか。 　　A列　B列　・・・　E列 ３　　　 111　　　 　 111 　　　 　222 　　　　 333 　　　　 444 ４　　　　 　　　　　 222 ５　　　　　　 　　　 333 ６　　　　　　　 　　 444 ７ ８ ９ 質問の説明が足りないようでしたら、ご指摘ください。 よろしくお願いします。

今、大学4年生なのですが、単位のことで相談があります。 私の大学には、卒業論文があります。字数は、4万字です。社会学部です。公立です。 そこで、卒業論文の単位がもらえなかった場合は、留年決定なのでしょうか？ 何か、救済措置があるのでしょうか？ 卒論指導教官とは、ゼミ生の中でも中が良好なほうです。先生は、東京大学法学部大学院卒業だそうです。

漫画の初版について。 今漫画を１００冊程所持していますが、私はアニメからはまることが多く、漫画に手を出しても初版じゃないことが多いです。よく初版マニアの人は初版以外は価値がない。初版を持っていると人より早くその作品を知った優越感に浸れる。書店に初版がなかったらオークションや古本やで初版を購入する。と言う方々がいます。確かに私も出来るなら全て初版で集めたいです。やはり価値があるような気がしますし、絶版本の初版なら尚更気分が良くなるのも分かります。しかし、過去の作品が好きになった場合、初版の漫画や小説を手に入れるのはほぼ不可能だと思います。だからと言って買わずにいるというのも頑固すぎる気もしますし。これから出る新刊は初版で集めることも可能ですが、過去の作品までオークションなどを利用して初版で購入しようとするとお金をかかります。どうしたら好きな漫画を全て初版で手に入れることが出来るのでしょう？初版を手に入れるということは、読むまでは内容が分からないので何が面白い作品なのかも分かりません。片っ端から調べて気になった漫画や小説を購入するのも大変ですし。やはり初版にこだわるのはデメリットが多すぎるのでしょうか？

本日、本屋でたまたま目に付きました。 一瞬、キルゾーンのヘルガスト兵と錯覚してしまう様な（て言うよりもそのまんまだった）感じの表紙でした。 気になり調べてみたのですが、イマイチ情報不足です。 wikiも見てみたのですが、どのような漫画なのかは書いてありませんでした。 他のサイトも見てみたのですが、イマイチ分かりませんでした。 非常に興味のある作品なのですが、一冊がとてもお高いのです。 ですので後悔しない為にも是非とも購入前にどのような漫画か知っておきたいのです。 どなたか教えてください、ネタバレは抜きでお願いします・・

トライク(三輪)について 詳しい方お願いします。 トライクは普通免許で乗れるし二人乗りが出来るので購入を考えていますが、取扱い店も激少で情報が薄いです。 近くに販売しているところも無く、ネットを見ると運搬は何処かの運送会社止めと書いてありました。 そこからの輸送方法や費用、手続き関係も判らずどうしたものやらと・・・・ そもそも、中国製が多い様ですが品質的にはどうなのでしょう？ 完成品で１５０ＣＣ～２００ＣＣが総額１５万円～２５万円位で考えております。 実際に乗られている方がいましたらアドバイスをお願いします。

エクセルＶＢＡ　重複を表示したい2 以下ではたいへんお世話になりありがとうございました。 http://okwave.jp/qa/q5849885.html 上記に関連する質問をさせていただきます。 下記に提示したコードを修正して、以下のようなコードに変えたいと考えています。 「Ｂ列で重複したデータがあれば、そのすべてを左隣のデータと一緒に表示したい」 添付した図だと、 1小沢一郎 7〃 8〃 4鈴木一郎 6〃 以上のような感じです。 アドバイスよろしくお願いします。 Sub TEST() Dim myRange As Range Dim 同一flag As Boolean Dim MsgStr As String m_Rows = Range("b" & Rows.Count).End(xlUp).Row For Each myRange In Range("b2:b" & m_Rows) If WorksheetFunction.CountIf(Range("b2:b4000"), myRange) > 1 Then If 同一flag = False Then 同一flag = True If InStr(1, MsgStr, myRange) = 0 Then MsgStr = MsgStr & myRange.Offset(0, -1).Value & myRange & vbCrLf End If End If Next If 同一flag = True Then MsgBox "同姓同名あり" & Chr(13) & _ "確認してください" & Chr(13) & _ vbCrLf & MsgStr Else End If End Sub

電撃文庫MAGAZINEについてお聞きしたいのですが この本に掲載されている小説は、すでにある作品の外伝?のような ものが掲載されているんでしょうか？ そもそもこのような、小説が連載されている雑誌というもの がいまいち分かってなくて… それでもう一つお聞きしたいのですが ライトノベルは何かの雑誌（上に挙げたような）に掲載されてから小説で出版という形なのですか？ それともいきなり出版という形ですか？

21歳の息子について 質問します。男3人兄弟の長男で いろいろあって 現在 大学1年生です。毎日大学には 行きますがクラブ活動 アルバイトなど いっさいせず 毎日家と 学校の往復です。去年の8月から 教習所に通っていますが（自分ではなにもせず 親が言って通うようになりました）9月の末から大学が 始まると たちまち 学校が忙しいと 行って 現在休んでいます。大学は理系で 文系よりは忙しいと思いすが 土日は休みですし 午後からの授業のときも午前中は通えるとおもいます。そのことを 本人に言うと 授業が忙しくて 行く暇がないと言います。しかし 毎日 遅くとも7時までには帰ってくるし 夜中まで しょっちゅう 電話をしているようです。小遣いもないので 休みはいつも家にいています。普段は授業があり アルバイトはできない 冬休みは正月でみんな遊んでいるので 働けないといいます。 本人にどうして 何もしないのと 問い詰めますと レポートが忙しいとか 宿題が多いと言い すぐに 部屋に引きこもります。基本的に 1日の一つのことしか（学校に行く 教習所に行く）しないようです。 こちらが 見ていたら将来が 心配になり ついつい 口うるさく 言うと 息子本人がアルバイトしている家より 母親が 働いている家のほうが多いと とんでもない 文句を言われました（私は現在求職中）。 あまりの言われ方に 情けなくなりました。 このような 息子をみると心配になるやら 情けないやら どうすれば 良いと思いますか？