IT・テクノロジー（29ページ目）

Option Explicit Option Base 0 ' Public Sub 角丸四角形模様描画マクロ()     Const RDCNLEFT = 90　　　 '描画開始位置Ｘ     Const RDCNTOPP = 80　　　'　　　　　　Ｙ     '     Const RDCNSWID = 36　　　'図形幅     Const RDCNSHEI = 30　　　 '図形高さ     '     Const RDCNVSPC = 8 　　　 '横-間隔     Const RDCNHSPC = -12　　  '縦-間隔     Const RDCNCOLS = 6 　　　 '横-描画数     Const RDCNROWS = 8 　　　'縦-描画数     '     Const RDCNLNWE = 1.5　　 '線の太さ     Const RDCNADJU = 0.33　　'角の丸み度     '---------------------------------------------------------------------------     Dim Ip As Integer, Jp As Integer     Dim intDxp As Integer, intDyp As Integer     Dim lngCol As Long     '     lngCol = RGB(255, 99, 71)            '←線色     For Jp = 0 To RDCNROWS - 1         intDyp = R

【背痛の原因】誰でも経験した事がある背中の痛みの「背痛」は意外な事に良い姿勢をしてても背痛になる事が判明しました。背痛とは突然背中がつったり肩に痛みが走ったり背中の筋が痛くなる事です。良い姿勢とは座ったり立ったり物を持ち上げた状態でも背筋が伸びてる姿勢とされてます。今まで世間では背痛になりにくくするには良い姿勢を守る事が大切と思われてきました。でもフランスのカーティン大学がこれまでの研究をまとめ良い姿勢を守っても背痛の予防や背痛の治療に関係ないそうです。カーティン大学が行った研究は背痛が起こった時原因を調べて背骨と姿勢が関係してるのか若い人を大勢調査しました。その調査の結果頻繁に背中を丸めたり猫背の人でも将来背痛になる原因に繋がらなかったのです。〓＝〓＝〓＝〓＝〓＝〓＝〓＝〓＝〓【良い姿勢】ここでいう背痛とは「神経疾患」や「ストレス」や「運動器疾患」や「内臓疾患」等の要因でなく筋肉の痛みです。例えば5年以上肉体労働をして重い荷物を持ち上げる姿勢を毎日行っているのに背痛は起こらない傾向にあります。逆に背痛が起こる人ほど正しい姿勢を保とうと意識して背筋を伸ばし良い姿勢をとろうとしてました。この結果良い姿勢を保たない人ほど背痛になる確率が低くなり良い姿勢の人ほど背痛でした。その他の実験では背痛の症状が治った人ほど意識して良い姿勢を気にしなくなり力を抜いた姿勢になりました。この実験結果で背痛と姿勢の良し悪しはほとんど関係ない事が解り気楽な体制で良いと判明しました。これらの研究から背痛の予防や治療する為には特定の体制を維持するのでなく体を動かす事が効果的だそうです。〓＝〓＝〓＝〓＝〓＝〓

YouTubeでも紹介しています。是非ご覧ください。ACCESSで、最初の関門は、検索フォームを作成することです。 フィールド毎に検索する方法を紹介します。 オプショングループで、検索フォームに花をつける こんにちは。伊川です。 ACCESSで、最初の関門は、検索フォームを作成することです。 フィールド毎に検索する方法を紹介します。 今回は、社名は言えませんが、コンサルの内容を一部公開します。 キーワード検索についてです。 データベースには、様々なフィールドがあります。 本日は、名前で検索したいが、明日は、メールアドレスで、検索したいという時があります。 そんな時は、どうしますか？ 検索のテキストボックスを、複数設置すればできます。 しかし、見栄えがよくないです。 そんな時に、参考にしていただければ幸いです。 このブログはこんな人にお勧め ACCESSで検索フォームを作成している人 ACCESSで、VBAを勉強している人 社内から、様々な要望を言われて、困っている人 このブログを、読み終わるころには・・・・ 検索フォームを作成するには、主キーで検索するのが、原則です。 なぜ、主キーで検索するのかというと、それがACCESSなのす。 今回は、主キーを設定できない場合を想定しました。 その時に役に立つのは、オートナンバー型の主キーです。 オプショングループを利用する 今回は、名前で検索する。 次回は、都道府県で検索する。 このような条件があるときは、フラグを立てます。 もし、Aというフラグであれば、名前で検索する。 もし、Bというフラグであれば、都道府県で検索する。 このフラグを立

こんにちはNulllです。マイニング需要の急増や半導体不足等々様々な要因から価格が大幅に高騰していたGPUですが、やっと、、やっと価格が落ち着いてきました！現在ではRTX3080が9万円~13万円ほどで購入できるようになっています！以前までは16万円~20万円ほどしていたので大幅な値下がりですよね！「値下がりじゃなくて定価に戻っただけじゃねぇか！」と感じた方もいるかもしれませんが、ご存じの通り現在深刻な円安となっております。PCパーツや周辺機器がその影響で値上げされたにもかかわらず定価に戻っていると考えるとかなり値下がりしたといっても良いのではないでしょうか？さて、ではなぜここまで値段が下がっているのでしょうか？要因はいくつかあります。１つ目はマイニング需要に低下です。仮想通貨が暴落し、マイニングで稼ぐことができなくなったことからGPUが不要となった という要因です。２つ目は今年の年末から翌年にかけてRTX4000シリーズの発表・発売が予定されているという要因です。それに伴い、各販売店が在庫処分として通常よりも安く販売していることもあります。９月からさらに値下げすると発表している販売店、メーカーもあり、来月以降が買い時となるでしょう！どのようなGPUを買えばいいか分からない！GPUを買っても取り付けられるか不安、、、などなど ご不明な点があればお気軽にご相談ください！

Option Explicit Option Base 0 Public Sub 丸く並ぶ円描画マクロ其の二()     Const CIRCXPOS = 180               '円の中心位置　X     Const CIRCYPOS = 180               '                     Y     Const CIRCRADI = 50                 '円の半径     '     Const SATECONT = 12                '衛星円の数     '     Const CIRCLNWE = 1.5               '線の太さ     '---------------------------------------------------------------------------     Dim Ip As Integer, intAng As Integer     Dim intXps As Integer, intYps As Integer     Dim dblRnd As Double, lngCol As Long     '     lngCol = RGB(220, 20, 60)                 '←線色     '*中心円描画     With ActiveDocument.Shapes.AddShape(msoShapeOval, _          CIRCXPOS - CIRCRADI, CIRCYPOS - CIRCRADI

昔使ってたNASはI/OデータのLANDISK。ネットワークがギガビット対応のもので本体に1つ、外付けケースでUSB接続のHDDが4つ繋がるタイプだった。その当時はNASって余り知らなかったし拡張性もまあまあだったのでこんなのを買って使ってた。データが多くなるとバックアップもしたいし接続したHDDも壊れたりする。なので同じものをと考えたが販売終了で後継機が出ていた。後継機は外付けは3つだったので少し不満だった。ただどちらも内蔵HDDにシステムが入っておりHDDが壊れるとNASが動かなくなることに。そのためこういった統一感の無いごちゃごちゃと外付けHDDを付けるタイプではなく本格的なNASの購入を考えたのが今のもの。NETGEARのReadyNasシリーズで内蔵ベイにHDDを入れるだけのシンプルさと完結性が良かった。ただどのNASにしてもRAIDは使わない。これらのNASはSATA接続なのでどれだけコントローラーが良いものであっても本来RAIDとはSCSIで構築してこそのものだから。パソコンでもRAIDは組めるがしない。一度お試しでノートパソコンにその機能がありSSDを2台でRAIDを構築したものの結局分散して読み書きするのでその分コントローラーに負担が掛かりかえって遅くなった。また信頼性もほどソフトウェアRAIDと同じなので低い。そういったRAIDは壊れたらリビルドする事が出来るはずだがリビルド出来ないのでそれ用のソフトが存在するという矛盾した世界が広がっていた。このNASもファームウェアのアップデートが無くなりかつHDDも怪しくなってきたので現在のNASと入れ替えて役目を終え

ジョジョオールスターバトルRの最後のPVが公開されましたね。これでプレイアブルキャラクター50体が全て公開。第5部ということでリークの噂からトリッシュとプロシュートが出るのは知っていたのですが、まさかペッシーとギアッチョが出るなんて。もう驚きが隠せない！サイコー！あと、シュトロハイムとウェザーリポートとリゾットが出現すれば良かったのに。いやいや、きっと追加キャラクターで出現するのでしょうが……第8部が1人しかおらんねん。第8部のキャラクターが増えて欲しいなぁ。本日の午前9時からスプラトゥーン3の前夜祭に参加してきました。知り合いのシュークチャンネルと配信をしながらです。楽しい！新しい武器とか技とかあって楽しいですね！あんまりFPSって得意じゃないのですが、撃ち合いだけがメインではなく壁を塗れば貢献できるのが良い！でも最近腕が上がってきたので、積極的に戦いに赴けるようになりました。まあ昼はUnityで恐竜のノンフィールドRPGをしていたのですが、ようやく画面のフェード移動とボタン音。ようやく同じフィールドで別の進行度となるシステムも構築完了です。まだまだ完成には遠いんですけどね。とりあえず今日はあとBGMを入れようと思います。うーん、でもまだいいかな。BGMは一番こだわりたいし。さて、絶賛『サザエさん症候群』を発症して止まないのですが、明日もお仕事です。あぁUnityとプログラミングをして、動画編集とかして、ブログを書いて生きていきたい。あとスタバかコメダ珈琲に通って、好きな時間に寝て好きな時間に起きたい。パソコンで地味に何かをすることは好きなんですよね。あと授業ぽいのも大丈夫。

昨日の夜に仕事から帰って2時間くらいUnityと格闘していたのですが、それでも全く上手くいかない。エラー祭り。色々なサイトやYoutubeの動画を見て、真似してみるのですが、思った挙動にならない……。今日は仕事から帰っていじけていたので、大食いのテレビを見たり、ヒロアカの4期を見たりしていたのですが、ようやく今重い腰を上げてブログを書いております。あー……ネットフリックス。何という誘惑。何という魔性。というわけで今回もアニポケに対する悪口です！乞うご期待！アニポケ見ました。タイトルが「セミファイナルⅠ　『圧勝』」だったので、もう見る前から「あっ、これヤバイね」と思いましたが案の定でした。いや、バトル形式は楽しみだったんです。久しぶりの6対6のフルバトル。チャンピオン同士の激突。こんな字面だけ見たら楽しそうじゃないですか。歩く炎上チャンピオン：ダンデが対戦相手でなければ。前回の対決でアランのメガリザードンを普通のリザードンがほぼ一撃で葬るという胸糞シーンを披露しやがりました。今回の犠牲者はカルネ。あー……胸が躍らねぇなぁ。まず……対戦が始まらない。何でだよ！先週はポケモン映画をやっていたらしいから(見てない)作画の時間はあっただろうが(いや、もっと早く完成させているんでしょうけれども)！ん？あれあれ！本当に始まらないぞ？あれー半分終わっちゃった。あれー。ダンデの残り4匹VSカルネ残り2匹。その内のヌメルゴンも瞬殺される……。ダイジェストでお送りされております。あークソ。気が付いたらドラパルトだけがやられていて、ゴリランダーにカルネの殆どのポケモンが敗北しているという。何で大文字を

Option Explicit Option Base 0 ' Public Sub 歯車模様描画マクロ()    Const GEARLEFT = 100　　　　　　'描画開始位置Ｘ    Const GEARTOPP = 80　　　          '　　　　　　Ｙ    '    Const GEARSIZ1 = 34 　 　　　　　'歯車１直径    Const GEARSIZ2 = 25                    '歯車２    Const GEARSIZ3 = 25                    '歯車３    '    Const GEARHMAG = 15                  '描画間隔（横）    Const GEARVMAG = 15                  '描画間隔（縦）    '    Const GEARHGAP = 16                  '歯車２と歯車３の距離    Const GEARVGAP = 16    Const GEARCOLS = 5                    '横描画数    Const GEARROWS = 4                   '縦描画数    '    Const GEARLNWE = 1                   '輪郭線の太さ    Const GEARADJ1 = 0.15                '歯車の歯高さ    '----------------------------------------------

【個人宅】世界一値段が高い個人宅はイギリスのロンドンにある「バッキンガム宮殿」です。その見積価格は推定で3100億円にもなりまさに世界最高値の「個人宅」で追従を許さない値段です。バッキンガム宮殿は1703年にバッキンガム公の「ジョン・シェフィールド」が邸宅として建てました。52室の王室とゲストルームを備え78個の豪華なお風呂場があり92室ものオフィスもあります更にスイートルーム19部屋スタッフ用寝室188部屋等あり全部で775部屋もあります。宮殿に勤務する人は約450名年間の招待客は4万人にもなり王族たちを補助する侍従が50人も専用宿舎に住み込みでいます。敷地面積が約1万坪もあり部屋の中に「舞踏会場」「音楽堂」「美術館」「接見室」「図書館」等がありもう1つの街みたいです。〓＝〓＝〓＝〓＝〓＝〓＝〓＝〓＝〓＝〓【ショップモール】世界最大のショッピングモールはブルジュ・ハリファに隣接するドバイ・モールです。ここはショッピングやエンターテイメントレジャーの全てを楽しめる世界最大のショッピングモールです。1,200軒を超える小売店2軒の大手デパート何百軒もの飲食店がこのドバイモールの中ににあります。広さはサッカー場200個分に相当する114万平方メートル以上もの敷地面積がある。 このショッピングモールではゴールドスークで最高級の宝石やレベルシューズで最先端の靴をお高く購入することができます。更にドバイ水族館やアンダーウォーター動物園オリンピック規模の広さを誇るアイス・リンク等もあります。子供向けにはキッザニアエンターテイメントや 巨大な映画館などがあり家族で来ても十分楽しめる。〓＝〓＝

Option Explicit Option Base 0 Public Sub 分銅文様描画マクロ()     Const WEIGLEFT = 100                '描画開始位置Ｘ     Const WEIGTOPP = 90                 '　　　　　　Ｙ     Const WEIGLRAD = 30                 'サイズ     '     Const WEIGROWS = 5                 '描画数(縦)     Const WEIGCOLS = 12                '描画数(横)     '     Const WEIGLNWE = 2                 '描画線の太さ     '---------------------------------------------------------------------------     Dim Ip As Integer, Jp As Integer     Dim Kp As Integer, lngCol As Long     Dim intCxp As Integer, intCyp As Integer     '     lngCol = RGB(0, 139, 139)           '←線色     For Jp = 0 To WEIGROWS - 1         For Ip = 0 To WEIGCOLS - 1             intCyp = WEIGTOPP + (

取り合えず画像を撮影したのであげておきます。画像はバックアップ側RN214　２．6TBを8TBに交換している作業の様子です。ホットスワップOKなのでNAS自体の電源は入ったままです。ドライブの構成〇メイン側　RN104１．4TB（今回壊れた）　＜－　RN214の３．4TBと入れ替え２．8TB３．4TB４．1TB〇バックアップ側　RN214１．4TB２．6TB　＜－　新規購入の8TBと入れ替え３．4TB　＜－　RN214の２．6TBと入れ替え４．1TBこのような形でHDDを入れる専用ケースに入った状態のものを抜きます。（物理作業前にNASの設定画面から2つ目のボリュームの破棄をしています）下のロックを外すと上の取っ手が出てきてそれを引き出します。するとこのようにHDDが出せるようになります。このケースにHDDはねじ止めなど一切なくドライバー等無しでHDDの交換作業が出来ます。これは便利。その後8TBのHDDと入れ替えて逆手順。物理的にHDDを入れるとNASの設定画面でHDDを認識するのでまずはHDDをJBODの設定で領域確保します。私はRAIDが嫌いなので。物理的なHDDの名前を設定したら今度は共有名を決めます。（この辺の考え方が若干面倒かも知れない。）今回はその後にバックアップスケジュールを入れてそのまま手動実行（通常はスケジュールになるまで動きません）。

NASのボリューム（平たく言えばHDDのドライブの1つ）が壊れたのでHDDを交換するために購入することを検討に着手（アレ？どっかの人みたいｗ）。ドライブの構成〇メイン側　RN104１．4TB（今回壊れた）２．8TB３．4TB４．1TB〇バックアップ側　RN214１．4TB２．6TB３．4TB４．1TB以前からメイン側に8TBを入れてフルに使ったらバックアップ出来ないやん、って一人ノリツッコミしてたのですがまあまだフルには使ってませんでした。しかし使う事も考慮に入れてやはりバックアップ側の6TBを8TBにしたい。そしたら6TBが余るのでバックアップ側の３．4TBと交換し6TBとし余った4TBをメインの１．に入れ替えるようにすればバックアップ側が容量が同じか若干大きい容量になるのでこれがベターかと。（１．のドライブにはNASのシステムが若干入るため取り扱いが少し面倒）取り合えず購入したら儀式的なものをするため到着してもすぐに入れ替えることは出来ませんけど・・・。

Option Explicit Option Base 0 ' Public Sub 一の字繋ぎ文様描画マクロ()     Const BRCKLEFT = 80　　　　　　　　 '描画開始位置Ｘ     Const BRCKTOPP = 80 　　　　　　　  '　　　　　　Ｙ     '     Const BRCKWIDT = 40                       '矩形幅     '矩形高さ　= 矩形幅の半分     Const BRCKHEIG = (BRCKWIDT / 2)     '     Const BRCKCOLS = 6                         '横　描画数     Const BRCKROWS = 8                        '縦　描画数    '     Const BRCKJNWD = 3                        '目地幅     '---------------------------------------------------------------------------     Dim Ip As Integer, Jp As Integer     Dim intDxp As Integer, intDyp As Integer     Dim intWid As Integer     Dim lngCol(1) As Long     '     lngCol(0) = RGB(178, 34, 34)                '←矩形の色  

私は、Ubuntuで、blender、OBS、動画編集ソフト、画像編集ソフトなどを使っています。これらをネットで探しながら、地道にインストールして環境を作ってきました。今回自分で作った作品のBGMを自分で演奏できるようにしたいと思い、自動演奏やDTM、DAWなどを勉強する中で、Jackというオーディオサーバーを知りました。このJackのインストール方法を調べている中で、Ubuntu studioを知りました。今回virtualboxを使い、外付けのハードディスクを使いインストールしてみました。日本語で、インストールできました。でも、そのままでは、日本語入力ができないのです。また、libreoffice のメニューが日本語表示になっていないです。まず、 sudo apt-get update sudo apt-get install fcitx-mozcとターミナルで、コマンドを入力してください。これで、fcitx-mozcを再インストールします。これで、日本語入力できるようになります。さらに、sudo apt install libreoffice libreoffice-l10n-ja libreoffice-help-jaとコマンド入力することで、libreofficeのメニューを日本語にできます。このコマンドは、「LibreOffice 日本語化」という記事を読み知りました。私は、この画像の環境で使っていますが、CPUがコア4以上でも、CPUが新しくないと仮想環境を使うこと自体が難しいです。Ubuntu studioを使うときは、できるだけ新しいパソコン、能力の有るパソコ

休日が明ける2日前ということで、知り合いの家に遊びに行って夕食を食べて温泉入って今帰ってきました。もうすぐ閉店になる温泉とのことで……残念。もっと残念だったのは、サウナが大好きなんですけど、8人までしか入れなくて、順番待ちが嫌で諦めたこと。うーん残念。遊んで疲れて帰ってきたのに、ブログを書く俺の精神力よ。これからポジティブになる為に自分を褒めていくスタンスでいきます。今日も電車の中で他の方の「IT・プログラミング」のブログを見たのですが、やっぱり俺ってこのココナラのブログのシステムを理解していないのかな、って思いました。という訳で今回は真面目にUnityのお話をしたいと思います。8月12日(金)に実施されました、今回のOneWeekGameJam(1週間でゲームを作成する)。テーマは「月」「キャンプ」でした。愚直にキャンプをするゲームを作成したのですが……もうちょっと考えるべきだったなぁ。紹介して頂いた順番はまさかの一番手。張り切っていきましょう。まあ自分を責めすぎるのも良くないのですが、反省は必要です。今回のブログでスパッと語って切り捨てます。結論から申し上げますと、今回のOneWeekの私の作成したゲームの仕上がり具合ですが……単純すぎた、です。いや作業時間は膨大でした。夏季休暇の殆どを費やしましたから。しかし……単純作業が殆ど。難しい技術がありませんでした。まあ、基本練習みたいな感じになってしまったんですね。前回はランキング機能とか、オンライン機能とか、頑張った要素が多かったので、時間があったのにも関わらず、このグレードダウンは駄目でした。折角シャドウバースを止めたのに。

Option Explicit Option Base 0 ' Public Sub 蚊絣文様描画マクロ()     Const MOKCANLF = 90                         'キャンバス位置Ｘ     Const MOKCANTP = 80                         '                     Ｙ     Const MOKCANWD = 300                     'キャンバス幅     Const MOKCANHT = 200                      'キャンバス高さ     '     Const MOKALEFT = 10                         '蚊絣描画開始位置Ｘ     Const MOKATOPP = 15                        '　　　　　　　　Ｙ     Const MOKASIZE = 30                         '十字サイズ     Const MOKAHZSP = 20                        '水平間隔     Const MOKAVTSP = 60                        '垂直間隔     '     Const MOKACOLS = 5                         '横 描画数     Const MOKAROWS = 8                       '縦 描画数     '

【自動修復】車の塗装に傷がついてしまった時太陽光にあててるだけで修復してしまう夢の塗料が完成しました。これを作ったのは韓国化学研究院と言う所で太陽光に30分車を放置すると傷が修復される魔法の塗料です。この塗料が一般に使われれ始めれば傷がついた車を駐車場に置き買い物に行って帰ってきた頃には車の傷が治ってる事になります。新開発された塗料は「光熱変換色素」と言うものでポリマー性の自動車ワックスに混ぜて使えるようにしました。そしてこの塗料を試しにおもちゃの車に塗って傷をつけその部分に紫外線を集中的に当てました。すると30秒もせずに傷が治りはっきりとした効果が見えたので本物の自動車にも傷をつけて塗り天日干しにしてみたました。その後観察し続けてみたら30分経たない内に傷が修復され元の塗装状態に戻りました。〓＝〓＝〓＝〓＝〓＝〓＝〓＝〓＝〓＝〓【しくみ】修復のメカニズムはポリマー性ワックスに太陽光がの赤外線が当たるとかなりの高温まで温められます。するとそのワックスが緩み「光熱変換色素」に光が届き太陽からの赤外線を吸収すると車の塗料と混ざっていきます。光熱変換色素と混ざった塗料はくっついたり離れたりしながらだんだん伸びて傷を埋めていき修復してくれるのです。その後正常な状態になってもくっついたり離れたりし続けますがもう塗料がはげてる所がないので伸びずに今いる位置に留まります。イメージとしては隙間が空いてるパズルのピースを1度ばらばらにして再度組みなおし隙間を埋めて完成させる感じです。この塗料を最初試したときミニカーの塗装に傷をつけそこにこのワックスを塗り実験してみました。そこに虫眼鏡を使い太陽光

Option Explicit Option Base 0 ' Public Sub 角繋ぎ文様描画マクロ()     Const CRNRLEFT = 100 　　　　　　'描画開始位置Ｘ     Const CRNRTOPP = 100　　　　      '　　　　　　Ｙ     '     Const CRNRLWID = 10　　　　        'Ｌ字幅     Const CRNRLHEI = 20　　　　　      'Ｌ字高さ     Const CRNRCOLS = 5                      '横描画数     Const CRNRROWS = 6                     '縦描画数     '     Const CRNRLNWE = 1                     '線の太さ     Const CRNRCHIP = 0.4                    'Ｌ字欠け率     '---------------------------------------------------------------------------     Dim Ip As Integer, Jp As Integer     Dim Kp As Integer, lngCol As Long     Dim intCxp As Integer, intCyp As Integer     Dim intDxp As Integer, intDyp As Integer     Dim dblThe As

Option Explicit Option Base 0 ' Public Sub 井桁卍文様描画マクロ()     Const DBCRLEFT = 100 　　　　　'描画開始位置Ｘ     Const DBCRTOPP = 80 　　　　　 '                  Ｙ     '     Const DBCRMAGN = 6                  'ポリライン倍率     Const DBCRCOLS = 5                   '横描画数     Const DBCRROWS = 3                 '縦描画数     '     Const DBCRLNWE = 2                 '線の太さ     '---------------------------------------------------------------------------     Dim Ip As Integer, Jp As Integer     Dim Kp As Integer     Dim intDxp As Integer, intDyp As Integer     Dim varPos As Variant, lngCol As Long     Dim sngBas() As Single, sngDat() As Single     '     '*ポリラインデータ元データ     varPos = Array(1, 3, 1, 5, 3, 5, 3, 3, 5, 3, 5, _    

Option Explicit Option Base 0 ' Public Sub 千鳥格子描画マクロ()     Const HOTOLEFT = 100 　　　　　　'描画開始位置Ｘ     Const HOTOTOPP = 120 　　　　　  '                  Ｙ     Const HOTOMAGN = 10                   'ポリライン倍率     Const HOTOCOLS = 6                      '横描画数     Const HOTOROWS = 4                    '縦描画数     '---------------------------------------------------------------------------     Dim Ip As Integer, Jp As Integer     Dim Kp As Integer     Dim intDxp As Integer, intDyp As Integer     Dim varPos As Variant, lngCol As Long     Dim sngBas() As Single, sngDat() As Single     '     '     '*ポリラインデータ元データ     varPos = Array(0, -2, -1, -2, -3, 0, -2, 0, -1, -1, -1, 0, _     0, 0, -1, 1, -1, 2, 1, 0, 1,

【きっかけの依頼】この猛暑の命綱となってる冷房を世界で最初に発明した人はアメリカのエンジニア「ウィリス・キャリア」氏です。この発明者が冷房を作るきっかけとなったのはブルックリンの印刷会社からとある依頼をうけたからです。その依頼は印刷工場が高温多湿になると印刷紙が水分を吸ってしまい縮んでシワシワになります。すると思うようにインクが乗らず文字がかすれたり曲がったりそこから乾燥すると人の顔が歪み変な印刷物になってしまいます。なのでこの印刷会社から室内の湿度を抑える機械を制作してくれとの依頼されました。この会社の名前は「サケット・ウィルヘルムリトグラフ＆パブリッシングカンパニー」と長い名前です。そしてキャリアはベルト駆動で機械を動かす今と全然違う形の物を作り上げたのです。〓＝〓＝〓＝〓＝〓＝〓＝〓＝〓＝〓【しくみ】しかし湿度調整機の大きさはとても巨大な物でバスくらいの大きさがあり広い場所しか設置できません。当時携帯電話もありましたがボストンバック位の大きさで当時のパソコンの大きさも大きな本棚サイズ程ありました。この機械の仕組みはファンで外気を取り込みフィルターを通してごみや塵を取り除きます。そして綺麗になった空気に霧の水を噴射してさらに除菌しフロンガスが入った「冷媒」に送り込まれます。この「冷媒」の中のフロンは圧力を下げると気体になり圧力を上げると液体になります。水噴射で湿度を高くして「冷媒」の中でフロンと空気をつけ圧力を上げ液体にしそこで出た水を外に流します。この状態で一気に圧力を下げると水分が抜けたカラカラの空気が出来乾燥した空気を工場に送れます。〓＝〓＝〓＝〓＝〓＝〓＝〓＝〓＝〓

※あまり画像とか撮ってなかったので分かりにくいのはご了承ください。現在使っているメインのパソコンは第六世代になるのだと思いますが、Corei7-6850Kを使ったマシンになります。このCPUはメインストリームと呼ばれる所とは違い若干サーバー寄りとでも言いましょうかメインストリームではオーバースペックの方向性のものです。CPUは今となってはショボい6コア12スレッドですがPCIe3.0のレーンが40レーンもあるためビデオカードなどのPCIe3.0の16レーン使用するカードを2枚させて32レーンで使えます。そこを目玉にしたのは先にご紹介した画面枚数を稼ぐためです。最初は3画面出力のビデオカードを寄せ集めで2枚挿していましたが32レーンの制御は意外とCPU負荷が高く、操作している時に感じるものだったので今は諦めて5画面出力出来るビデオカード1枚だけに交換しています。（画像はまだ一枚ビデオカードを抜いていない状態）そしてこの本体ですが、少し前までは「自作パソコンはフルタワーでドライブとか一杯入れる」思考だったのですが、このパソコンの構築時には一転して「ほぼ何も無くていいや」って思考に変化しました。それは後に繋がる静穏に関係してくるのですがフルタワーだと場所も取るしファンとか一杯入れて冷やすのでファンの音などがうるさい、かつ排熱で部屋が熱くなるのが嫌になったので逆にミニマムでドライブなどは外付けをUSB接続し（当初は内蔵DVD-Rドライブ）それ以外の機能はマザーボードにある機能を活用するなどしてカードも少なく、それでいてシンプルにまとめたかったのでこんな状況に。このケースはミドルタワーよ

Unityで毎月初めに1週間でゲームを制作する『OneWeekGameJam』というものに参加をしています。いつもテーマの募集があって、ランダムに1つのテーマに決まるのですが……今回のゲームテーマは『キャンプ』『月』になりました。ん？テーマ2つ？えっと……分からんて。こちとら7月の出張の精神的なダメージがまだまだ重く心に圧し掛かっております。コミュ障かつスキルないから、いつも個人開発だし。果たして太刀風居合はゲームを完成させることができるのか。次回『太刀風居合、死す』デュエルスタンバイ。まあ、色々なことを言いつつもゲーム開発を頑張っています。今回もなんだかんだ言って提出は出来ると思います。今週の日曜日にまだシュークチャンネルにお邪魔して配信に出演してきました。ちゃんとAmazonで1080円で買ったハリーセンのぬりぐるみを持って。超塩対応だったけど。明日、その話をしますね。やったゲームは「ファイナルファンタジー」です。やったことなかったんですよねー。で、今日からゲーム開発を頑張ります。午前中は頑張っていたのですが、午後は昼寝と家事で時間が消えましたので、今日の夜は遅くまで頑張りたいと思います。連休ですから時間はある。夜更かししても問題ないという不健康の極み。その前にブログを書きますけどね。余裕をかましていると、また気が付けば時間が無くなるので、とにかく急がねば。時間は待ってくれない！今プログラミングで勉強していることなんですけど、ノンフィールドRPGを学びなおしています。恐竜をテーマにして作っているんですよね！楽しい！そう言えば、ジュラシックワールドを見に行かねば！夏休み忙しい

こちらはとてもマニアックでUSB接続のSDカードなどのリーダーにCF（コンパクトフラッシュ）が入っていれば全然必要の無いものです。SSDが流行りかけた頃、それまではHDDでは速度向上が見込めないのでなんとかしてHDDを超える速度を出せないかといろいろ考えられた結果の一つと思います。当時CFはHDDよりは早く読み書き出来ていたのでそれをHDDに置き換えが出来ないかと考えられたインタフェースの一つでしょう。この変換アダプタ自体はパソコンに直接接続して固定で使うイメージです。この変換アダプタの出る場面は少ないでしょうけどカードリーダーで認識出来なかった場合などこちらに接続して認識するかも知れないのでうちでは置いている状態です。

どうなんでしょうね？最近のキーボード自作って言うのでしょうか、アレはあまり興味がありませんね。だからマニアとも言えないかも。ちなみに今使っているキーボードは25年以上使ってるコレ。Logitechのロゴが馴染み無いかも知れませんが現行はLogicoolという会社のキーボードです。このキーボードのタッチ・ストロークが弱めで力が要らないので自分的にはかなり楽で気に入っています。他にもキーボードは星の数ほど（言いすぎ）買ってきましたが、キーストロークの重めのものだったり軽すぎたりと、人それぞれの好みはあろうかと思いますがここに行きつきました。このキーボードが壊れたら他のにしないといけないと数十年買っては試しを繰り返していますが、未だこれを超えるものはありません。もしかしたらLogicoolのキーボードでも高級な部類のものならいいのがあるのかも知れませんがリーズナブルでロングセラーのものの方が安心かなとも思います。（このキーボードも当時どの程度の価格だったかは忘れましたが）このミツミは定番商品でその当時（90年代）のパソコンに付属していた事もあるキーボードですがキーが重たい。配列はちゃんとしており真面目でいいのですが重たい。プログラムや文章をずっとしていると肩が凝りそうなので使用はしていません。（予備として置いてます）こんなのもありますね。こちらもミツミではありますが、ぱっと見は普通。若干デザインがオシャレかなと思いきや、実は15インチ程度のノートパソコンと同じ幅です。ノートパソコンの場合コスト削減のためだったりとかの理由でキーボードはテンキーが付いていてもデスクトップと同じような配列

前回の記事は、WordPressで制作した場合とJamstackで制作した場合の比較をしつつJamstackのメリットを紹介させて頂きましたが、Jamstackでサイトを制作すると通常とは異なる部分も有りますので、その辺りに関して書いていきたいと思います。静的サイトジェネレーターを使うWordPressの場合、まずはベースコーディングを行い、静的なページを作成します。その後、それをWordPressに組み込んで構築します。（既存のテーマを使うことを前提にしている場合、このベースコーディングの工程が無い場合も有ります。）一方、Jamstackの場合は、ローカル環境で開発する際に静的サイトジェネレーター（以後 SSG）と呼ばれるツールを使ってコーディングを行います。このSSGを使うことで様々な処理を行ってくれるので、これにより、ヘッドレスCMS等から投稿されたコンテンツを、APIを通じてデータを取得し、予めHTMLに埋め込むと言う事が可能になります。しかし、SSGを使った場合は素のHTMLは書かないため、そのままではブラウザが解釈出来ないソースコードになっています。（CSSだと、SassやLESSがイメージしやすいと思います）そのため、最終的に実行可能なファイル（HTML等）に変換する、ビルドと言う処理を行う必要があります。ビルド処理を行うことで、静的サイトが出来上がるのですが、そうすると「そのビルドってのはどこで行うの？」と言う疑問が生じるかと思います。毎回ローカル環境でビルドしてファイルをアップするなんてやってられませんので、Jamstackに適したホスティングサービスを利用し

YouTube は、クリエイターからのよくある質問に答える新しい動画で、ショート動画のレコメンデーション アルゴリズムがどのように機能するかを説明しています。YouTube は、短い形式のコンテンツで認知度を高めることに関して、クリエイターが抱く最も一般的な質問のいくつかに対応する Q&A ビデオで、ショート アルゴリズムの謎を解き明かしています。 YouTube のレコメンデーション アルゴリズムが長い動画に対してどのように機能するかについては、少なくともある程度の情報はわかっていますが、ショート動画のアルゴリズムについてはほとんどわかっていません。YouTube の Q&A ビデオでは、次のようなテーマに触れています。 ・ショート用に別のチャンネルを作成する必要があるかどうか・同じチャネルで長編コンテンツと短編コンテンツを公開することの影響・YouTube のロングフォーム コンテンツ レコメンデーション アルゴリズムの要素として、ショート動画へのエンゲージメントがあるかどうか。同じチャンネルで長いコンテンツと短いコンテンツを混在させるべきですか?最初の質問は、ショート動画を公開しているチャンネルが通常より長い動画をアップロードする場合に、YouTube ショート動画のアルゴリズムがどのように反応するかを尋ねます。これはチャンネルに悪影響を与える可能性がありますか? YouTube は、ショート動画を投稿しても、長い動画で確立されたチャンネルに損害を与える可能性は低いと述べています。それは逆効果かもしれません。 YouTube の会社代表者は次のように述べて

Option Explicit Option Base 0 Public Sub 唐草文様描画マクロ()     Const ARACANLF = 80 　 　'キャンバス位置Ｘ     Const ARACANTP = 100　　'                     Ｙ     Const ARACANWD = 280　　'キャンバス幅     Const ARACANHT = 200　　'キャンバス高さ     '     Const ARABZMAG = 0.15     'ベジェ曲線倍率     '     Const ARABZLFT = 20　　'ベジェ曲線描画開始位置Ｘ     Const ARABZTOP = 25　　'　　　　　　　　　　　Ｙ     '     Const ARABZWID = 30      'ベジェ曲線描画幅     Const ARABZHEI = 25       'ベジェ曲線描画高さ     '     Const ARABROWS = 7　　'ベジェ曲線描画行     Const ARABCOLS = 9　　'ベジェ曲線描画桁     Const ARABZWEI = 3　　'ベジェ曲線描画太さ     '---------------------------------------------------------------------------     Dim Ip As Integer, Jp As Integer     Dim Kp As Integer     Dim intDxp As Integer,

（画像はかなり古いですが画面数はほぼ変わらず。）現在メインで使っているパソコンは自作でマザーボードやCPUなどは古いですが画面の構成がこのような状態です。まず左側の4K+2Kはサブマシンが表示しています（現在はThinkPadX260）メインマシンが表示している画面は4K+4K+2K+2K+2Kです。壁紙が2Kなのでその構成を識別できるかと思います。右の2K3画面の一番上は現在はサイズが揃っています。メインマシン側は4Kは27インチ、2Kは13インチです。サブマシン側は4Kは24インチ、2Kは11インチです。液晶ディスプレイもかなり前の物で一時期リモートワークなどで液晶ディスプレイが高騰していた以前だったのでかなり安かったですが基本的に2Kのディスプレイはモバイルディスプレイタイプです。モバイルの場合は脚は付属していない事が多く私のようにVESAマウントで複数台液晶ディスプレイを接続する場合は必要の無い脚が付属しないので便利でした。モバイルだからといって表示に遅延とかありませんので普通に使えています。メインマシンのビデオカードは現在はAMD Radeon RX570で出力ポートは5つです。なので5画面表示出来ます。表示出来る領域は8Kの範囲のようなのですが4つの出力ポートで全て4Kを出力するか5ポートをその領域範囲内で出力するかの選択は出来るようです。それ以前に3画面出力のNVidiaのビデオカード持っていてそれを2つ接続して5画面の構成にしていましたが流石にPCIe3.0x16を2枚処理すると全体的に重くなったのでAMDのビデオカードに交換した経緯があります。CPU自体32レ

こちらはSATA専用です。SATAは3.5インチも2.5インチもコネクタの形状に違いは無いためこのようなシンプルな構造になっています。見た目からも分かる通り簡易的に接続して使用するタイプなのでこれを常時使用するのはあまりおすすめは出来ませんね。またこのアダプタは結構古いので3TBの壁があります。勿論このアダプタが出た後に3TBより大きい容量のハードディスクなりが出てきたので仕方ありませんが。なので3TBより大きい場合は他にハードディスクケースを用意しています。そちらは多分8TBよりも大きい容量に対応しているはずです。（この容量問題、IDE時代では使わなくなった小容量のパラメータなりを使用していた過去があるのでその辺りSATAではどうしているか気になります。）

インタフェースがIDEやSATAのハードディスク・SSDなどをUSB接続に出来るアダプタです。こちらは他に所有しているSATA USB3.0変換アダプタがあるためIDE接続がメインです。IDEは3.5インチと2.5インチの2種類が接続可能です。3.5インチと2.5インチでは物理的にコネクタのピッチ等が違います。また2.5インチは1.8インチドライブも接続可能です（ZIFタイプは無理ですが。）この先にコンパクトフラッシュ IDE変換もあるためコンパクトフラッシュの広範囲の対応が出来ると考えています。当時もそうでしたが自作パソコンに新たにパーツを購入した時や故障かと疑う時にはこれに接続して動作チェックをしています。ケースが無いため簡易のチェックには向いていますが常時使用には向いていませんね。

ここからは依頼を受けた時にどんな道具を使うかと言うお話を少しします。今回取り上げる道具は「M.2 SATA to USB 3.1 Gen 1」という変換アダプタです。名前の通りM.2 SATAをUSB接続出来るように変換するものです。実はこれ、間違って買ったものですｗ。というのも本来はM.2 NVMeのパーツを買っていて動作確認等をしたかったのでこれを買ったのですが動作せず。調べてみるとM.2はコネクタ形状は同じようでもSATAとNVMeの大きく2種類が存在し、このアダプタでは両方使えないというのを買ってから気が付いたのです。最近の規格の物は殆ど分かってないのも多いので大失敗です。勿論後に紹介する事になるだろうNVMe用は購入して無事パーツの動作確認等は出来たのは言うまでもありませんが。まあいろいろ自分でも扱うので無駄にはならないだろうと置いています。

セキュリティ脆弱性の回避や機能更新などの目的で、ソフトウェア製造ベンダーよりパッチがリリースされ、利用者にそれらを適用することが推奨されているケースがよくあります。かつては、MS Blastのようなセキュリティホールを利用したコンピュータウィルスがありましたが、最近のOSでは、ＬＡＮに繋いだだけでウィルスに感染してしまうことはなくなりました。パッチの適用や、更新はOSやアプリケーションの一部の機能を更新することですから、パッチ適用したり、更新してマイナーバージョンを上げたことにより不具合が発生することも想定しなければなりません。不具合が発生した場合は、適用したパッチをアンインストールすることで解決する場合もありますが、アンインストールできないパッチもあります。パッチ適用前の状態に戻すには事前にバックアップを取得し、不具合が起こったらバックアップデータからリストア作業により、以前の状態に復元することをします。サーバー機は、AWSのようなクラウド環境か実機で実装されているかのどちらかです。AWSですとAMIバックアップという手法で事前にバックアップを取得することが可能です。実機でWindows OSの場合には、Windows Server Backupという手法かAcronisという製品を使ってのバックアップとなります。いずれにせよ、そのバックアップ手法、手順で、実際にリストアが成功するのか十分な検証が必要となります。十分な検証された手順で、パッチ適用前に事前バックアップを取得してください。サーバー機のパッチを適用することは、事前、事後の検証など、多大な注意力が必要です。マイクロソ

Option Explicit Option Base 0 Public Sub 古銭風模様描画マクロ()     Const ECOILEFT = 120                    '描画開始位置Ｘ     Const ECOITOPP = 100                   '　　　　　　Ｙ     '     Const ECOICSIZ = 60                      '古銭のサイズ     Const ECOIOTWE = 2                      '外形線の太さ     Const ECOIMDWE = 2     Const ECOISMLN = (ECOIOTWE + ECOIMDWE - 1)     Const ECOIHSIZ = 18                      '穴の大きさ     Const ECOIHRPS = (ECOICSIZ - ECOIHSIZ) / 2     Const ECOIVSPC = 10                     '横の間隔     Const ECOIHSPC = 10                     '縦の間隔     '     Const ECOICOLS = 3                       '横描画数     Const ECOIROWS = 2                     '縦描画数     '--------------------------------------------------

みなさんこんにちは。イプシロンです。VBAで大量の処理をするときに時間が掛かり、その間PC操作ができないとなると、手持ち無沙汰になりがちです。(ちゃんと動いてんのかな～。)(あとどれくらいかかるんやろ～。)なんて、雑念が湧き始めます。そんな時に、役立つのがプログレスバーです。プログレスバーを使用するメリットは以下のとおりです。プログレスバーを使用するメリット・ユーザーが処理を中断しなくなる(動作の見える化)・進捗状況の見える化・終了時間が推測可能VBAには標準のプログレスバーがありますので、それを使いがちなのですが、実は、、、標準のプログレスバーには落とし穴があるのです！！！標準プログレスバーの落とし穴それは、環境依存のエラーがあり、開発者のバージョンと、ユーザーのバージョンに差異があるとエラーになりやすいのです。64bit版のOfficeにはプログレスバーが実装されていないため、表示させようとするだけでエラーになってしまいます。なので、不特定多数のユーザー向けに配布する場合は、そこを考慮して開発をする必要があります。そのため、私はプログレスバーを自作することをおすすめします。さっそく、いってみましょう！！！手順1.「挿入」→「ユーザーフォーム」をクリックし、フォームを追加するユーザーフォームが追加されます。2.ツールボックスから「ラベル」を選択します。ラベルが追加されます。3.ラベルをプログレスバーっぽく引き伸ばします。4.ラベルのCaptionを消します。(念のため)5.ラベルのBackColorを変更します。6.標準モジュールに以下のコードをコピペしてください。Sub t

ホームページを作ったのに全然アクセスがない、検索結果に上がってこない、こんなことありませんか？ホームページ作成で陥りやすい失敗例とその原因をご紹介いたします。失敗例その1：検索結果に全く表示されないホームページを公開したらGoogleやYahooなど検索エンジンに検索結果が表示されると思っていませんか？公開したばかりのサイトは検索エンジンの評価がない為、公開したからといって上位に表示されるとは限りません。その原因に、ホームページを作ることが目的となっている為、検索エンジンの評価に関わるコンテンツやSEO対策などのホームページを構成する要素が不十分なことが多い点が挙げられます。また、公開後XMLサイトマップの送信やGoogleサーチコンソールを登録する等の対策も必要となります。失敗例その2：デザイン拘りすぎてユーザー目線で作成されてないデザインに拘りオシャレに作ったのに訪問者が増えないということありませんか？それは、デザインに拘りすぎた分、使いにくいホームページになっている可能性があります。ユーザーの離脱を防ぐ為にもオシャレなホームページより使いやすいホームページを目指しましょう。その為には、文字を最適なサイズにしたり余計な動きをいれない、スマホでも最適なボタンサイズにする等考慮する点はいくつもあり、それを実現できる制作者に依頼することが大切となります。失敗例その3：更新に時間かかる、更新できないせっかくホームページを作成したのに更新ができないホームページを作ってしまったということありませんか？Googleなど検索エンジンに評価される為にはホームページのコンテンツの更新がとても大

みなさんこんにちは。イプシロンです。VBAではコードをカキカキする際、VBE（Visual Basic Editor）という専用のエディタを使います。初期設定のままでも十分なのですが、これ、、、見にくくないですか？長時間作業するのであれば、画面は真っ黒にして使用したほうが疲れにくいし(個人的感想)、なんかかっこよくないですか？ww私は、壁紙も、Officeソフトのテーマも、VSCodeもすべて真っ黒設定にしています。理由はかっこいいからですwと、いうわけで今回は、VBEの背景色や文字色を変更する方法について書きます。VBEのデフォルト画面VBEのデフォルト設定は下記のような画面になります。この状態でも充分使用できます(当たり前)ここから好みの文字色やフォントに変えていきます。手順1.画面上部の「ツール」→「オプション」をクリックします。2.オプション画面の「エディターの設定」タブをクリックします。こちらで設定して、最後に「OK」をクリックすれば完了です。以上！かんたん！！！コードの表示色についてエディターの設定にある、「コードの表示色」についての詳細は下記のとおりです。(別に覚える必要はありません。)=====================================　・標準コード：数値や文字列などの値など 　・選択された文字：クリックで選択した文字　・構文エラーの文字：構文中のエラー箇所　・次のステートメント：実行時エラー、Stopなどで停止している次のステートメント 　・ブレークポイント：ブレークポイントを貼っている箇所　・コメント：コメントアウトの文字　・キーワード

こんにちは！現役システムエンジニア＠育休中のtak_kです！😁本業でシステムエンジニアをしているかたわら、複業でプログラミング講師や、初学者向けにプログラミング学習をサポートする『メンター』をやっています！前回の振り返り前回の記事で、以下の話をしました。・プレイヤーが「HIGH」か「LOW」と入力するまで、再入力を求めるようにするため、「繰り返し処理」を学んだ！・繰り返し処理は「while文」で記述できる！・while文を使ってプログラムを書いたが、想定と違う結果に。。。問題の発生箇所を推定して、原因を特定しよう！前回までのプログラミングの結果、想定と異なる挙動が発生してしまいました。その時は落ち着いて、以下の流れで解決を試みましょう。①事象の分析まずは、起こった事象を一つずつ紐解いていきましょう。実行したプログラムは以下ですね。■実行プログラムnum1 = rand(10)puts "「HIGH」か「LOW」を入力してください"input = getswhile input != "HIGH" && input!= "LOW"　#⇦ この部分を満たしている!?  puts "もう一度入力してください" #確認用出力  input getsendputs "繰り返し文を抜けました" #確認用出力今回、プレイヤーが「HIGH」としたのに、「もう一度入力してください」と表示されてしまいました。つまり、「while文の条件文を満たしている」と判定されてしまったことになりますね。つまるところ、プレイヤーの入力である変数「input」が「HIGH」という文字列と異なると判

自分のスキルを棚卸ししてみました。自分が今何ができるのか、何が強みなのか、どんなところでお役に立てるのかを整理して、自分にとっても利用していただく方にも良くなるようにできたらいいなと思っています！なかなか言語化するのは難しいですね...

初めまして、Webコーダーの【くまこ】と申します。ブログをご覧いただき、光栄です。最近は色んな場面で自分のWebサイトを持つ方が増えていますね。・飲食店運営をされている方・イベントを宣伝したい実行委員の方・個人でネット通販を始めたい方・サークル活動の紹介をしたい学生さんWebサイト制作の依頼もあちこちで飛び交っているのではないでしょうか。Webデザイナーさんや制作会社さんもきっと大忙しですよね。そんな方々のお力になるべく、「コーディング代行」の出品を始めました！需要の増える中、コーディング部分のお手伝いができればと思っています。ご興味を持たれましたら、よろしければ以下のリンクから当サービスをご覧ください。最後までお読みいただきありがとうございました！このブログに足を運んでくださったあなたとご縁がありますように…☆

【ドローンバイク】A.L.I.テクノロジーズ社から空飛ぶバイクが完成し予約が開始されました。名前は「エクスツーリスモリミテッド・エディション」値段はなんと！「7770万円」もし受注生産になります。しかしこれを買っても日本で走れる場所がなくサーキットでも走れず完全私有地内でしか走れません。このバイクはプロペラ用電気モーター４個と電気切れした時の為にガソリンエンジンを装備してます。上昇限界「上空2m」最高時速「80㎞」最大追跡重量「300㎏」最高速度「100㎞」航続時間が40分ですが飛んでる時バイクが安定性を制御し普通にバイクを運転する感覚で自由に空を走行できます。〓＝〓＝〓＝〓＝〓＝〓＝〓＝〓＝〓＝〓【警察用バイク】ドバイ警察が「ホバーバイク社」に開発を依頼し空飛ぶバイクを警察車両として導入しました。このバイクの名前は「ホバーセルフ S3 2019」と言い値段が1台1700万円します。このバイクは地上から5m上空まで浮く事が出来時速96㎞で走行する事が可能。航続時間は最大25分が限界ですが2.5時間で満タンまで充電できます。バイクの動力が電気モータでガソリンエンジンを備えて無く電池切れを起こしたら終了です。このバイクの種類で無人自動走行モードがありこの場合だと40分間も飛行が可能です。手付金15％払えば一般にも販売してくれて3日間の訓練を受ければ半年以内に届けてくれます。〓＝〓＝〓＝〓＝〓＝〓＝〓＝〓＝〓＝〓【ジェットバイク】イタリアが通常のバイクモードから空飛ぶバイクに変形をするロマンのバイクを販売してます。このバイクを開発した会社は「ルドヴィック・ラザレス」社で値段が「615

Fcuntionを利用することで、本当に便利になるのでしょうか？ 整ったデータベースを作成するには、データを整理整頓することです。 Fcuntionを利用すると本当に便利なのか？ こんにちは。伊川です。 以前に何度か、Fcuntionを紹介しています。 今回は、カンタンなFcuntionを紹介します。 Fcuntionを検索すると、テストの結果、消費税の計算になりますが、実用できないのが現状でしょう。 今回は、カンタンなFcuntionを紹介します。 Excelは、ユーザーフォームで解説します。 ACCESSは、フォームで解説します。 ぜひとも、整形されたデータベースを作成してください。 このブログはこんな人にお勧め VBAを勉強している人 Fcuntionを勉強している人 テキストボックス毎に、VBAのコードを記載するのが面倒な人 このブログを、読み終わるころには・・・・ Fcuntionを、勉強するにあたり、戻り値だとか、様々ななれない言葉が出てきます。 要するに、Fcuntionの結果を呼び出すということです。 呼び出したら、その結果を反映させます。 正確なデータベースを作成するには、必要な知識です。 カンタンなFcuntion 明日からでも、実務で利用できます。 実務で、あるあるだと思うのです。 電話番号を全角で入力する アルファベットを、1文字だけ、全角で入力する したがって、VLOOKUP関数で、参照できない そのたびに、切れている上司をなだめることが必要になる毎日が、イヤになる毎日。 これも、業務のストレスですね。 カンタンなFcuntion　作業手順　その1　そ

表記Seeed XIAO RP2040（以下XIAO2040と表記）のI2C Master - Slave通信がうまく動かずに苦労しました。Master-Slaveが駄目というよりも、Wire1が駄目です。テストには「TalkingToMyself」を使っています。マイコン1台で2組のI2Cを使い片方をマスター他方をスレーブとして通信するやつです。ボード設定はPhilhower版Arduinoを使っています。まだ完全に切り分けができていないのですが、ボード設定としてSeeed XIAO RP2040を使うとうまくいきません。以下、とりあえず動かす方法です。XIAO2040固有の機能は使えなくなるかもしれませんが、ボードとしてRaspberry Pi Picoを指定して、以下のピン番号に置き換えて使用してください。たとえば、I2C0がアサインされたGPIO0, GPIO1を使うならば、D6 = 0u, D7 = 1uと記載されているので、Wire.setSDA(0); Wire.setSCL(1);と記述し実際の配線はD6とD7を使います。なんでこんなややこしいことをしてるんでしょうね。実際、XIAO2040を選んで Serial.println(D6);を実行すると0が出力されます。つまり、他のArduinoのつもりでdigitalWrite(6)って書いても駄目でLチカですらうまく動かないんですよね……。もう一つ、WireにはI2C0、Wire1にはI2C1に属するGPIOピンを指定してください。PR2040のI2Cは、I2C0とI2C1の2つのグループがあります。Pi Pi

ホームページを作る前に、まず考えなければならいのはページ構成です。どういったページが必要かを洗い出しどういう順番で表示するかを表したものとなります。ホームページを依頼する際、ページ数によって費用が変わってくるので最初から何ページ必要か改めて考えておく必要があります。どうやってページ構成を考えていけばいいかをご紹介いたします。掲載するページを洗い出そうホームページにどのような情報を掲載するのか考えるところからはじめましょう。一般的なコーポレートサイトの場合下記のようなページが最低限必要となります。・トップページ・会社概要・事業紹介・お問い合わせ・個人情報保護方針上記のような5ページ程度のホームページは一般的ですが、集客につなげる為には閲覧者が求める情報、製品やサービス等の情報も準備をしておくことが大切です。ホームページの目的によってどんなページが必要かを考え出来る限り多く洗い出すことが重要です。弊社では目的を丁寧にヒアリングした後、ページ構成のご提案もさせていただきます。是非ご検討ください。ページ階層を考える掲載する情報を洗い出しをしたらページ階層を考えましょう。関連する情報をグループにまとめ制作していきます。手書きでも大丈夫です。ホームページにとって重要なことは閲覧者にとって分かりやすく求めている情報に即アクセスできることです。その為にも目的のページにいくまでには3階層目以内で収めておくことが大切です。優先順位を考えてページ順序を決めよう最後にページの順番を決めます。自社に興味を持ってもらう為には何を伝えるべきか優先順位を付け見て欲しい順にページを配置することをおすすめします。

ホームページを依頼される際に「どのように依頼すれば良いのかわからない」「何を準備すればいいのかわからない」といったご相談をよくいただきます。ホームページ制作を依頼する際、事前に準備しておくといいものについてまとめました。1.目的、強みを明らかにしておくホームページを作る目的、ターゲット、強み、売り、どんなところを見せたいのかなどを明らかにしておきましょう。制作者は多くの場合、ヒアリングをして、どのようなサイトを作るかを決めていきます。デザイン、ページ構成、どこに何を配置するのかといったことを決めるときに、上記の情報を踏まえて作成することになります。その際、伝えるべきことを事前に明らかにしておくことで、スムーズに伝わり、思い違いなどの問題が起こることを防げます。ホームページを作る目的については、下記の記事にも詳しく載せていますので、参考にしてみてください。私たちは、下記のサービスにおいてヒアリングシートでしっかりと目的、コンセプトをお伺いさせていただきます！ホームページを存在するだけのサイトにしない為に是非ご依頼お待ちしております。2.予算の上限を決めておくホームページはページ数ややりたいことによって、予算が変わります。大まかでもいいので、だいたいの予算を決めておきましょう。オリジナルかテンプレートを使用するのか、CMSを使うのか、システムを新たに構築するのかなどで金額は大幅に変わります。やりたいことを実現するには様々な方法がありますので、どこに依頼するかを決めるだけでも時間がかかってしまいます。予算を決めれば、何を優先するのか、どのような形で実現するのかを決めやすくなり、目的に

ホームページを作成したけれど何も反応がない…こんなお悩みありませんか？それはホームページの導線が原因かもしれません。今回は、最適なホームページの導線づくりを紹介いたします。1.ホームページのゴール設定をしようホームページのゴールとは一体何でしょうか？それは、訪れた人に何をしてほしいかといことです。例えば下記のようなことがあります。✓問い合わせを増やしてほしい✓資料請求をしてほしい✓商品を購入して欲しい✓会員登録して欲しい✓予約をして欲しいゴールを明確にしなければどんなコンテンツが必要でそこからどうやってゴールに導くかという点が曖昧になってしまいます。ホームページを制作する前にまずはゴール設定をしましょう。私たちのサービスではヒアリングを丁寧に行いゴール設定考慮したホームページの設計をいたします。オリジナルデザインだからこそお客様のご要望に沿ったホームページが実現可能です。2.ゴールまでの導線を整理しようゴールが決まったら次に導線を整理します。ホームページを見に来た人がサービスに関心をよせお問い合わせしようとした際に迷わず即問い合わせできることが必要です。お問い合わせの例で下記のようなホームページ設計が必要となります。✓お問い合わせボタンはアクションをしたい際に常に目に入る位置に配置する✓お問い合わせを促すメッセージを表示する　例：「どんな些細なことでもお気軽にお問い合わせください。」✓お問い合わせフォームの入力項目を精査する✓スマートフォンユーザに配慮する　例：クリックするだけで電話がかけれるようにする等最適なホームページを実現する為には、デザイン力だけでなくアクションを起こさ

スマホをそろそろ新しいやつにしようかと　 悩んでいる所ですが。　 色々探していたら、ちょー気になるスマホを見つけたのでご紹介。　 それがXiaomiのPOCO F4 GTです。　 Xiaomiといえば、Redmiシリーズが有名で　 超コスパのいいスマホとして知名度がありますけど。　 POCOはほとんど知られていない。　 だがスペックを見てみると、かなりすごいスペックなんですよ。　 スペックはこんな感じ↓　 ストレージは　128GBと256GB　 メモリは8GBと12GB CPU：オクタコア Qualcomm® Kryo™ CPU、最大 3.0 GHzGPU：Qualcomm® Adreno™ GPUAI：第7世代 Qualcomm® AI エンジン 6.67インチ有機EL（AMOLED）フラットディスプレイ解像度：2400×1080 FHD+アスペクト比：20:9リフレッシュレート：最大120Hzタッチサンプリングレート：最大480Hz バッテリー　4700mahで急速充電対応　 【約27分でフル充電】リアカメラ6400万画素　 フロントカメラ2000万画素 デュアルSIMと5GとWi-Fi6e対応　 OSはAndroid12　 そして　更に　 冷却機能であったり　 ゲーム中のレイテンシーを軽減する機能であったり ポップアップトリガーがあったり タッチ感度が10倍になっていたり　と　 ゲーミング機能がまじですごい。　 これだけのフルスペック機能でお値段がなんと　 75000円と　かなり安い。　 だって、ROGのゲーミングスマホとかは10万円前後しますから　 それよりもゲーミング

【奇妙なアレルギー】イギリス在住の女性体操選手「ナターシャ・コーツ」さんは世にも奇妙なアレルギーを発生してしまいました。そのアレルギーは喜怒哀楽の感情に反応して呼吸が出来なくり気を失う程の強いアレルギー症状になります。このアレルギー反応は「マスト細胞活性化症候群」と言い感情変化で即アレルギー反応が出てすごく悩んで苦しんだと言います。病気があまりにも苦しくて20歳の時に自分の葬式を計画し遺書まで書いたほどでした。アレルギーが出た時は18歳の時に大きなイベントに参加しこの時みんなと騒いてたら突然アレルギー症状が出ました。当時の状態はめまいがして体が震え始め上手く呼吸が出来なくなってすぐ病院に運ばれました。そして病状が回復し無事に退院できたけどその後2週間の間に8回も症状が出て入退院を繰り返しました。〓＝〓＝〓＝〓＝〓＝〓＝〓＝〓＝〓＝〓【攻撃対象】アレルギーの主な症状は「食物」「花粉症」「気管支喘息」「アトピー性皮膚炎」等があり日本人半数がアレルギー持ちです。しかしコーツさんのアレルギーは感情に反応してしまうと言うすごく特種なアレルギーを発症してしまいました。このアレルギーの原因はマスト細胞によるヒスタミンの過剰分泌が原因で発症するそうです。マスト細胞は「脂肪細胞」という物で血管の周りや皮膚や皮膚の下や肺や消化管や肝臓とかにあります。マスト細胞は細菌や寄生虫が体内に入るとそれらを退治するよう体の抗体に命令を出します。でもコーツさんの場合感情による体内の変化にすらマスト細胞が退治してくれと命令をだしてしまうのです。その結果無害な細胞や細菌を攻撃しアナフィラキシーショックを引き起こして

　私がココナラにアカウントを作って初めてやらせて頂いた仕事が秀丸エディタのマクロの修正でした。　ココナラのサービスを提供するにあたり、エクセルVBA、Access、バッチファイルに狙いを定め、お客様を待っていました。しかし全く相談がなかったので自分でもできそうな公開依頼にちょいちょい提案しておりました。そこで初めて提案が通ったのが秀丸エディタのマクロ修正でした。多分、提案が少なかったんだと思われます(笑)。　ココナラで初めて提案が通ったのでテンション上がりました。　正直なところ、秀丸エディタのマクロ作製は簡単なものを数える位しか作った事がなかったのですが、調べながらやれば何とかなるだろうと実績欲しさの半分勢いでの提案でした。結果はハイテンションだった事もあり、どうにかこうにかなりました。お客様にはご好評頂き嬉しかったです。　その後、暫くしてテキストエディタのマクロのサービス提供もありかなと思って、サービスを出品させて頂きました。ですが、まだ売れてません。　そもそもテキストエディタのマクロ作製って需要があるのか、我ながら疑問です。　このサービスは、前提として秀丸エディタかサクラエディタを使っていてマクロを作れない、または作るのが面倒な方が対象になると思います。　テキストエディタを使う人って大抵エンジニアなんですよね。ある程度のエンジニアの人は自分でマクロ作っちゃいますし、エンジニアでない方はそもそもテキストエディタを使わず、Windowsのメモ帳ですましてしまいます。　さらに言うと、マクロってその場限りのものが多く、何度も同じものを使うってあまりないような気がします。　以上、テキ

こんにちは！現役システムエンジニア＠育休中のtak_kです！😁本業でシステムエンジニアをしているかたわら、複業でプログラミング講師や、初学者向けにプログラミング学習をサポートする『メンター』をやっています！前回の振り返り前回の記事で、以下の話をしました。・いよいよプログラミング開始！Rubyという初心者向けのプログラミング言語を使用。・まずは画面に文字を表示！「こんにちは」の文字を出力できました！・ランダムな数字（乱数）を生成する方法を紹介！乱数を画面に表示させることができました！前回記事へは以下リンクからどうぞ！生成した乱数は一時的に保存が必要！前回、処理の流れ図（フローチャート）の最初の箱の部分で、乱数を生成するところまでをやりました。ただし、ここで生成した乱数は、ただ画面に表示して終わりではなく、後の処理で使うことになります。全体のフローチャートを再掲しますが、赤枠で囲んだ処理の後半の3か所で使われています。いずれも2番目に発生させた乱数との比較に使用していますね。実は、箱の中の「0〜9の乱数を生成　→　①」の太字部分には、生成した乱数に「①という名前を付ける」という意味が含まれています。ここで言う①のことを、「変数」と呼びます。「変数？どこかで聞いたことあるかも。。。」と言う方、さすがです。小学校の算数で習った「x」のことですね。こんな感じでしょうか。■例題1本60円の鉛筆を、何本か買おうとしています。鉛筆の本数をxとすると、合計金額は(60 × x)円で表すことができます。2本買う場合は、x=2を代入して　→　合計金額は60 × 2 = 120円3本買う場合は、x=3

【復活】映画バックトゥーザフューチャーの夢のタイムマシン「デロリアン」が新たに１から設計し直され新車として登場します。値段は2200万円で販売予定頭金の最低金額50万円2024年に届けられます。この新車は電気自動車として作られてあの独特なドアが上に開く構造もきちんと再現されてます。乗車人数も初代の2人乗りから4人乗りにスペースが広げられクーペとして作られました。初代デロリアンを製造してた会社は1975年に設立されて1982年に倒産しました。なのでもうデロリアンが作られる事が無く絶対後継機が出るなんて誰も予想してませんでした。しかし今回40年ぶりに復活する事となり全米が泣きました。〓＝〓＝〓＝〓＝〓＝〓＝〓＝〓＝〓＝〓【デザイン】初代デロリアンの正式名称は「DMC12」と言い今回出るデロリアンの正式名称は「アルファ５」と言います。初代のデロリアンと比べると全く別物の新型車ですがデロリアンと名乗れるきちんとした理由があります。新型デロリアンのデザイン担当は初代のデザインを担当したイタリアのデザイン会社インタルデザイン社だからです。バッテリーが「100kw」搭載し1回の充電で「483㎞」走行可能最高時速が「250㎞」まで加速し時速「100㎞」到達まで3秒です。タイムマシンが発動する時速の「140㎞」まで到達する時間は「4.35秒」とされてます。ボディサイズは全長「4955㎜」全幅「2044㎜」全高「1370㎜」ホイールベースが「2300㎜」あり乗車人数が4名まで乗車でき駆動モータを2つ装備してます。〓＝〓＝〓＝〓＝〓＝〓＝〓＝〓＝〓＝〓【短期間製造】初代デロリアンを製造してたデロリア

YouTubeでも紹介しています。是非ご覧ください。5回にわたり、SQL文の書き方を紹介してきました。 今回は、紹介してきたSQL文を、VBAで実行した場合はどうなるのかということを紹介します。 VBAでSQLを実行するには、公式を覚えることだ こんにちは。伊川です。 今まで、紹介してきたSQLをVBAで実行したいと思います。 SQLとVBAは、少し書き方が違います。 しかし、前回、前々回等の動画を観ていれば、理解できると思います。 先にSQL文を書いて、後は、VBAの公式に当てはめればいいだけす。 SQL文を書けない人は、デザインビューで、先にクエリを作成して、SQLビューでSQL文を、コピペしてください。 誰でも、SQL文をVBAで実行することができます。 このブログはこんな人にお勧め SQL文を、VBAで実行したい人 SQL文の、クォーテーション、ダブルクォーテーションの付け方がわからない人 VBAで、SQL文を実行すると、必ずエラーが出る人 このブログを、読み終わるころには・・・・ VBAで、SQL文を実行するのは、あまり、お勧めしません。 本当に、システムが、属人化します。 しかし、どうしても実行したい場合は、今回の公式を覚えてください。 書き方は、ACCESSから、Excelへ転送する場合も同じです。 VBAをSQLで実行する このブログでも、何度か、VBAでSQLを実行する記事を、書いてきました。 しかし、クォーテーションや、アンパサンドなどで繋げるのが、結構面倒です。 なので、いやになります。 今回は、公式を紹介します。 この公式に当てはめてください。 Deb

うおおおお！ やるぞabc258！ 今週もやりますAtCoderBeginnersContest(abc258)この二週間はこの日のために生きてきたと言っても過言ではありません。 自分は書いて覚えたり考えたりする派なので こんな風にメソッドノートを作って覚えたり実際にプログラミングする時にはノートに書き込んで考えたりしていました。 そのほかにも、アルゴリズムとか、高校時代に置いてきた数学の知識をインプットするために 図書館から本を引っ張り出してきて、計算をノートに書き散らす そんな日々を送ってきました。 気付いたら書き散らかされた裏紙がたくさん溜まっていました。途中で腱鞘炎になって右手が使えなくなってしまったので、少し左手のパフォーマンスが向上したりもしました。 今回は、すごく自信があります！ 前回の、勉強して挑んだのに一問も解けなかった雪辱を晴らしてやろうと思います。 結果 一問正解でした笑っちゃいますよね。 最初の、一番簡単な、A問題しか解けませんでした… 練習では、もっとできたんです 嘘じゃないです。 B問題までなら絶対に解けるというくらい、練習では本当に上手くいってたんです。 ですが、今回は本当にB問題の意味が分かりませんでした。 しばらく見て、ダメだと判断したので、すぐに次の問題であるC問題に挑んだのですがC問題は、何回やっても実行制限オーバー(At Coderでは実行に2秒以上の時間を掛けてはいけない)で何度やってもクリアできずに 慌てて挑んだD問題も、クリアできるはずなく あえなく一問正解でした。 どうして、こう上手くいかないのでしょうか。 このあと、ただでは転ぶ

【微妙な神経】とうとうロボットが感じる感覚が「コチョコチョ」「なでなで」まで微妙な感覚が解る様になりました。ロボトットの神経となる場所は外装を覆った人間そっくりの柔らかさや弾力や肌触りを実現した外装にです。この外装は３つの層に分かれてて上から「表皮」「真皮」「皮下」と層になって重なってます。皮膚の表皮が「触り心地」皮膚の真皮が「筋肉の弾力」皮膚の下皮が「センサー層」この様になってます。皮膚を作り出してる成分は「ハイドロゲル」と「シリコン」で製作しました。この２つの相乗効果により弾力性にとても優れて強い力がかかっても高い反発力があります。しかもこのロボットは風が皮膚に当たる感触まで検知できるそうです。〓＝〓＝〓＝〓＝〓＝〓＝〓＝〓＝〓＝〓【センサー】ロボットを作った研究チームは韓国「KAIST」と米「MIT」と独「シュトゥットガルト大学」の研究チームが開発しました。人間の皮膚の面積は約２㎡もある大きな臓器の１つで超大型精密感覚器官になってます。そこで研究者たちはロボットの外装を人の皮膚の様に全身で感覚を検知できるよにしより人に近づけようと考えました。もしこれが出来ればロボットが人と同じ生活を送る時人と同じ危険回避が出来人と同じ行動が可能です。しかしこれほど大きな面積に電気的センサーを付けるとセンサーを取り付ける数が多すぎて人間の形になりません。そこで研究者たちは１番下に当たる「下皮」部分に音波検知できるセンサーを取り付けました。この音波センサーは紙みたいな薄いスピーカーでこれで全身を覆い音波の流れで感覚を区別します。〓＝〓＝〓＝〓＝〓＝〓＝〓＝〓＝〓＝〓【検知方法】このロボットは

みなさん、正直なところホームページは必要と思っていますかそれとも、別に無くてもいいんじゃない！？って思っていますか？これの解答は、「必要」なんです。理由をご説明します。何か商品を購買・成約して頂くに段階があります。こちらの図をご覧ください。上から順に1. 認知2. 興味・関心3. 比較・検討4. 購買・成約の順番です。まずはお客さんに知ってもらわなければ売れるものも売れません。なので認知はとても大事です。次に、「これいいな」っと思ったら商品に自然と興味・関心が出てきます。テレビやインターネット、SNSなどで名前を入力し調べ出します。その次に、気になっている商品と、その商品の競合他社の商品と比較・検討を行います。最後に、気になっている商品が競合他社と比較して優れていると思ってもらえたら購入してくれます。しかし認知から、直接購買に繋がることもありません。必ずと言っていいほど、1. 認知2. 興味・関心3. 比較・検討4. 購買・成約この流れになっています。そして、ホームページの役割は比較・検討の大事なことろを担っています。iPhoneで例えて見ましょう。（認知）まずは、テレビやネットニュースで新作のiPhoneが出ることを知ります。（興味・関心）興味や関心があればそのままニュースを見続けます。（比較・検討）次にいよいの、欲しくなったらAppleのホームページを閲覧して、今持っているスマホと見比べて、どの色にするか、どのスペックにするかを吟味します。（購買）吟味し、良ければ購入ボタンを押し購入。もし、ホームページが無かったとしたら見込み客が「比較・検討」が出来ず購入までの確率はぐーん

最近電車に乗るとすぐに寝てしまいます。力尽きるように。レッドブルを飲んでいるのにですよ！まだ火曜日なのになぁ。オンラインで遊べるカードゲームを作成しているのですが、この上ない絶望の渦に巻き込まれています。XENOって2人のプレイヤーが合わせてデッキ1個なんですけど、オンラインになると2個になるんです。問題は分かっても解決方法が分からない……。あぁ、いつになったら、このトンネルから抜け出せるのか。ワンピースの『和の国編』が終了しそうになっているみたいで。日曜日に久しぶりアニメをみて、「ワンピース長いなぁ」と思う次第です。そんなことより、この前の金曜ロードショーでジュラシックパーク3を見てたら、次の週の放送の紹介がありました。そこで細田守作品が金曜ロードショーでやることを知って、久しぶりに時をかける少女の『ガーネット』を聞いてめっちゃテンションが上がった次第です。時をかける少女見たことないけどね！！以前に『竜とそばかすの姫』をめっちゃ酷評したから……うん、まあ、ね。バンドリ、細田守コラボしてほしい！ガーネット→パスパレ、僕らの夏の歌→モルフォニカ、StartingOver→ポピパ、U(ミレニアムパレード)→ロゼリアってことまで妄想して……ん？細田守監督作品ってあと何があったっけ？と狼の奴とみらいのミライのテーマソングが全く頭に浮かばない太刀風居合でした。アフターグロウは実は細田守監督作品であるデジモンアドベンチャーの僕らのウォーゲームってことで「Butterfly」と思ったけど、もう既にあるじゃねえか。じゃあ駄目じゃねーか。ってとこまで考えた瞬間に頭がクリアになりました。え？妄想や

どうもPython初学者の中川です。 いきなり説得力ゼロですが、初学者なりにどうすれば初学者を脱退できるのか考察してみました。どの言語においても共通して言えることかも知れませんがが、ほとんどのコードは クラス、関数、 if elif else などによる条件分岐、while for 文などによる繰り返し処理のなどのいずれかに含まれます。 この3ヶ月くらい、Pythonを学んで分かったことは、この基本文法さえ押さえていれば、その都度メソッドやモジュールを調べて使うことでどんなプログラミングコードだって書けるということです。 なので、基本的な文法知識さえあれば、それを自分のやりたいことに応用していくことで、一人前のパイソニスタになれるのではないかと考えました。・ifによる条件分岐まず、一番良く使うifによる条件分岐です。 if文は if 条件式①:    処理内容 elif 条件式②: 　処理内容 else :     処理内容 のように記述します。例えば、簡単なものですが a = input()if a < 0:     print("負の値が入力されました。") elif a = 0:     print("0が入力されました。") else:     print("正の値が入力されました。") この条件分岐は、入力された値をaで受け取りそれをaの値によって分岐し、出力します。・繰り返し文while文 while文は繰り返し文といわれるように、指定の条件に当てはまる間、処理の実行を繰り返すというものです。 使い方としましては、while 条件: 処理内容　 のように記述し

Option Explicit Option Base 0 Public Sub 曲輪繋ぎ文様描画マクロ()     Const KURULEFT = 120               '描画開始位置Ｘ     Const KURUTOPP = 80                '　　　　　　Ｙ     Const KURUCISZ = 24                 '円の大きさ     Const KURICIOV = 0.25               '円の重なり     '     Const KURUVLSZ = 5                  '縦線の太さ     Const KURUVLGP = 3                  '縦線の間隔     '     Const KURUROWS = 6                '縦の数     Const KURUCOLS = 5                 '横の数     '     Const KURILNWE = 1.5              '線(円)の太さ     '---------------------------------------------------------------------------     Dim Ip As Integer, Jp As Integer     Dim Kp As Integer     Dim intXpt As Integer, intYpt As Integer     Dim lngCol

Option Explicit Option Base 0 Public Sub 桔梗文様描画マクロ()     Const KIKYLEFT = 150　　 　　      '描画開始位置Ｘ     Const KIKYTOPP = 120 　　  　　　'　　　　　　Ｙ     '     Const KIKYPRAD = 14 　　　　　　'花半径（花びら）     Const KIKYSRAD = 10                   '花半径 (／)     Const KIKYMRAD = 4                    '花半径（○）     '     Const KIKYROWS = 3                   '描画数(行)     Const KIKYCOLS = 4                    '描画数(桁)     Const KIKYROLN = 50                  '縦方向間隔     Const KIKYCOLN = 60                  '横方向間隔     '     Const KIKYLNWE = 1                   '描画線の太さ     '     Const KIKYADJU = 13 　　　　　  '調整値     Const KIKYBZXX = 0.15               'ベジェ曲線描画倍率     '-------------------------------------------------------------