すべてのカテゴリ

２月は、どうしても“人の恋”が目に入りやすい季節です。SNSの幸せそうな投稿。街で見かけるカップル。誰かがもらったプレゼントの話。そんなものを見たいわけじゃないのに、知らないうちに胸がざわっとしてしまう。「みんなうまくいってるように見えるのに…」「なんで私は、こんなに不安なんだろう」そう思ってしまう日があっても大丈夫。その気持ちは、あなたが弱いからじゃありません。あなたの心が、まっすぐに恋をしている証なんです。✦⋆｡˚⋆𓂃♡𓈒𓏸 ｡⋆✦🕊 **比べてしまう日は、心が“幸せを求めている日”。**比べる気持ちが出てくると、人はつい自分を責めがちです。でも、比べてしまう心の奥にあるのは“羨ましさ”ではなく、「わたしも大切にされたい」というまっすぐな願い。その気持ちは、誰かを打ち負かしたい感情ではなく、愛されたい・つながりたいというとても純粋な想い。だからこそ、苦しくなるだけなんです。あなたの心は傷つきたくて揺れているのではなく、幸せを求めてまっすぐ動いているだけ。✦⋆｡˚⋆𓂃♡𓈒𓏸 ｡⋆✦🌙 **“私はだめだ” と決めつけそうな日は、評価よりも呼吸を思い出して。**比べてしまう日ほど、心がぎゅっと硬くなりやすい。そんなときに必要なのは、自分を奮い立たせる言葉ではなく、ひとつ深い呼吸。深く吸って、ゆっくり吐く。それだけで「私はだめだ」という思い込みからそっと距離がとれます。比べてしまうあなたは弱くない。むしろ、恋に誠実で、やわらかい心の持ち主なんです。✦⋆｡˚⋆𓂃♡𓈒𓏸 ｡⋆✦🌿 **恋は“比較の中”ではなく、“自分に戻れた瞬間”に動き出す。**誰かの恋ばかりが輝いて見える日は、自分が

助手「アナタ最近また新しいこと始めたんだって？」ワイ「はい。プログラミングです。」助手「それ前からやってなかったっけ？」ワイ「前はVBAと言うやつです。」助手「何それ？」ワイ「Excelで動かすプログラミング言語ですね。」助手「今回は何なの？」ワイ「VBです。」助手「ヴィクトリーバカ？」ワイ「ビジュアル・ベーシックと言う言語です。バカではないです。」助手「アナタの顔を見てたらつい。」ワイ「どう言う意味でしょうか。」助手「勝ち組のバカ。」ワイ「嬉しくない。」助手「で、VBAと何が違うのよ？」ワイ「分かりやすく言えば、Excelだけじゃなくパソコン全体で動かすプログラム言語ってところでしょうか。」助手「へぇ。なんで始めようと思ったの？」ワイ「なりゆきです。」助手「それってアナタの感想ですよね？」ワイ「それはひろゆき。」助手「本当になりゆきが理由なの？」ワイ「実際のところはExcelだけでは限界を感じたので。」助手「どう言うところが？」ワイ「作業の自動化とか便利ですけど他の人と共有できなかったり、同時に作業できないので。」助手「VBだとそれができるってことね。」ワイ「パソコン上で動作する業務アプリを作ることができますからね。」助手「便利そうじゃない。」ワイ「また私が楽になります。」助手「アナタ楽できると思うと一所懸命になるよね。」ワイ「楽するために努力という投資をしているのだから良いのではないでしょうか。」助手「確かに。」ワイ「仕事に文句言う前に自分をアップデートして環境を変化させる方が楽しいですし。」助手「アナタって思考変わんないよね。」ワイ「仕事の愚痴をこぼす人に会うといつも思い

Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load  '*********************************************************************  ' Form1　を Load した時のイベント　押した処理  '*********************************************************************         ' ポスグレ接続         Dim Con As NpgsqlConnection = Nothing         ' クラス ClassDB　から　接続文字列を取得 （接続文字列を入れればOK）         Con = New NpgsqlConnection(ClassDB.ConString)         Con.Open()         ' コマンド         Dim Cmd As NpgsqlCommand = New NpgsqlCommand("select id, name, ranking,group_name from countries;", Con) ' SQL　の結果を格納する         Dim rs As NpgsqlDataReader ' SQL 実行         rs = Cmd.ExecuteReader         rs.Read()         txthyouji.Text = rs