プログラミング・開発

javaを覚えています。そこでどうしてもオブジェクト指向の考え方が分かりません。 本を読んでもいまいちわかりません。 本ではオブジェクトは「物」と記載していますが、いまいちわかりません。 例を交えて教えて下さい。 例）りんご、人等交えて教えて頂けるとたすかります。

独学で、vbaを習得したいです！ ただ、きっかけは仕事が忙しく、とてもじゃないけど余裕が持てない。。 のが嫌すぎて、はじめました。 なので、無理やり作ってなんとか動かしてた、という感じで、最初に作ったのは途中で不具合が出たりして、全く身についてません。 本当に習得なんてほど遠く、業務中に、あ、これ効率化できるのでは？と閃いたら必死でvbaをネットで探して切り取りつぎはぎだらけ、本を見て繋いで、という感じです。最近はここに書けば答えてくださる優しい方を頼るだけで、ちょっと、あかんな、勉強せな、と思います。 私のマクロレベルは、1人で困難なく作れたのが、昨日の話ですが最終行まで、昇順に並べる、ぐらいかと思います。 難しすぎて、仕事を早く終わらせたい、という目的がなければ、やる気起きなかったです。本当にわけがわからない世界です。でも、すぐに、文を考え、希望のマクロを作れる人を尊敬します。 皆さんはどうやって学んだのですか？？ 参考に、させてください。 よろしくお願いします。

A列にリストがあり、C列のセル内に リストの5桁の数字があれば、C列にチェック（字を赤くするなど）が入り確認が可能になるマクロを組みたいです。下記はネットで探してきて、コピーして動かしたのですが、End ifに対するifがありませんが出て、その後Loopに対するForがありません、と出ました。 下記は合ってますか？ Sub Sample1() Dim i As Long, k As Long, myStr As String Dim myFound As Range, myFirst As Range For i = 2 To Cells(Rows.Count, "A").End(xlUp).Row myStr = Cells(i, "A") Set myFound = Range("C:C").Find(what:=myStr, LookIn:=xlValues, lookat:=xlPart) If Not myFound Is Nothing Then Set myFirst = myFound GoTo 処理 Do Set myFound = Range("C:C").FindNext(after:=myFound) If myFound.Address = myFirst.Address Then Exit Do GoTo 処理 処理: For k = 1 To Len(myFound) If Mid(myFound, k, Len(myStr)) = myStr Then myFound.Characters(Start:=k, Length:=Len(myStr)).Font.ColorIndex = 3 End If Next k Loop End If Next i End Sub

CSSの背景画像のソースでどちらが正しいのか教えてください。 【Aパターン】 body{ background-image:url(images/＊＊＊.jpg); } 【Bパターン】 body{ background-image:url("images/＊＊＊.jpg"); } の（　）内に" "（ダブルクォーテーション）を付ける・付けないで関係なく、結果としてはどちらも背景画像が表示されます。　 背景画像の指定するサイトを見ても、付いてたり・付いてなかったり…書籍でも特に具体的に""←について詳しく載ってないのですが、実際どちらを使う方がが正しいですか？

前回powershellを使い複数のcsvをそれぞれのシートに分けて新規Excelファイルとして書き込む方法についてお教え頂きましたが、既存ファイルの場合下記の下記のコードのようにすると既存シートがある場合既存のシートにシート名を変え書き加えられることになります。既存シートをそのままにして新規シートとして追加するような方法をお教えください。 $csvFiles = @("D:\test_data\test_data1.csv", "D:\test_data\test_data2.csv") # Excelファイルのパス $excelPath = (Get-ChildItem "D:\test_data\AAA.xlsx").FullName $excel = New-Object -ComObject Excel.Application $excel.Visible = $true $book = $excel.Workbooks.Open($excelPath) foreach ($index in 0..($csvFiles.Length - 1)) { if ($index -eq 0) { $sheet = $book.Sheets.Item(1) } else { $sheet = $book.Sheets.Add() } $sheet.Name = "data" + ($index + 1) $startRange = "C2" $QueryTable = $sheet.QueryTables.Add("TEXT;"+$csvFiles[$index], $sheet.Range($startRange)) $QueryTable.TextFileCommaDelimiter = $True $QueryTable.TextFilePlatform = 65001 $QueryTable.TextFileStartRow = 1 $QueryTable.Refresh($false) $QueryTable.Name = "仮テーブル" $QueryTable.Delete() } [System.Runtime.Interopservices.Marshal]::ReleaseComObject($sheet) > $null [System.Runtime.Interopservices.Marshal]::ReleaseComObject($book) > $null [System.Runtime.Interopservices.Marshal]::ReleaseComObject($excel) > $null Remove-Variable sheet, book, excel [gc]::Collect() [GC]::WaitForPendingFinalizers() なお、csvファイルの指定方法は違います（ファイル名で指定する方が分からないのでコピペのコードそのままに近い）がExport-Excelを使った下記コード場合同じシート名がある場合は、そのシートに書き込まれますがそれ以外は新規シート名（csvファイル名)として付け加えられます。 $csvs = Get-ChildItem .\* -Include *.csv $csvCount = $csvs.Count Write-Host "Detected the following CSV files: ($csvCount)" foreach ($csv in $csvs) { Write-Host " -"$csv.Name } $excelFileName = "D:\test_data\AAD.xlsx." Write-Host "Creating: $excelFileName" foreach ($csv in $csvs) { $csvPath = ".\" + $csv.Name $worksheetName = $csv.Name.Replace(".csv","") Write-Host " - Adding $worksheetName to $excelFileName" Import-Csv -Path $csvPath | Export-Excel -Path $excelFileName -WorkSheetname $worksheetName -StartRow 2 -StartColumn 3 } しかしならこの方法では大きなデータの場合処理時間を要することになります。処理時間で言うなら下記コードの方が一番速いですがやはり新規シートに置き換えられる問題があります。 $sourceFiles = @("D:\test_data\test_data1.csv", "D:\test_data\test_data2.csv") $outputFile = "D:\test_data\AAE.xlsx" $excel = New-Object -ComObject Excel.Application $excel.Visible = $false $excel.DisplayAlerts = $false $outputWorkbook = $excel.Workbooks.Add() $index=1; foreach ($sourceFile in $sourceFiles) { $workbook = $excel.Workbooks.Open($sourceFile) foreach ($sheet in $workbook.Sheets) { $sheet.Copy([ref]$outputWorkbook.Sheets.Item($outputWorkbook.Sheets.Count)) } $index=$outputWorkbook.Sheets.Count $workbook.Close($false); } $outputWorkbook.Sheets.Item($index).Delete() $outputWorkbook.SaveAs($outputFile); $excel.Quit(); [System.Runtime.InteropServices.Marshal]::ReleaseComObject($outputWorkbook) | Out-Null; [System.Runtime.InteropServices.Marshal]::ReleaseComObject($excel) | Out-Null; Write-Output "Sheets have been combined into $outputFile"; 私のコピペ能力ではここまでです。シート名が同じの場合は上書きされそれ以外は新規シートとして追加される方法になれば幸いです。よろしくお願いいたします。

cgi初心者です。 yybbsの管理者アイコンを使おうと選択し、管理パスワードを入力しても「管理者アイコンは管理者しか使えません」と弾かれてしまいます。 管理者アイコンは使いたいので、手法を教えてください。

次のようなC++の入門書を教えてください。 ・高校生でも理解できる丁寧な説明 ・Cの知識がなくてもわかる ・オブジェクト指向についてわかりやすく説明している ・C++そのものの機能をあまねく説明している ・ライブラリは使い方の簡単な説明で十分 カーニハンとリッチーが書いたＣの入門書のようなもので、大学の教科書よりは読みやすいものを探しています。 どうかよろしくお願い致します。

JS iframe要素に読み込んだデータでグラフ表示したい JavaScript iframe要素にデータを書いたテキストファイルを読み込んで グラフを描くことができますか？ 例えば、ある同行会のイベント企画のデータ。 題目 希望アンケートの集計結果 (この場合のセパレーターは半角空白) 食べ歩き 20人 バーベキュー 15人 映画鑑賞 10人 卓球大会 5人 -------------- [html] <iframe src="sample.txt" width="400" height="100"></iframe> <div class="container"> <canvas id="canvas1"></canvas> </div> [仕様] ・ローカル環境であること ・ファイルリーダーは使わない ・JavaScriptのコードを用いて実現させること ・テキストファイルの先頭行がグラフタイトルで、それ以降がデータ ・グラフ化は、Chart.js などのプラグインを使用してもよい 以上から、 iframe要素に読み込んだデータでグラフ表示ができますか？ （※グラフは添付画像のように）

wxPythonが実行できません。下記で何かわかりますか？ Win11Home、Visual Studio 2022 Communityインストール済み 仮想環境作ればwxGladeは起動する。 cd AppData\Local\Programs\Python\wxGlade-1.0.0 python -m venv wxglade_env .\wxglade_env\Scripts\activate pip install wxPython python wxglade.py コマンドプロンプトで下記実行してもPythonと出るだけ。しかし、インストールはされている。 PS C:\Users\(ユーザー名)\AppData\Local\Programs\Python\Python39> python -c "import wx; print(wx.version())" Python PS C:\Users\(ユーザー名)\AppData\Local\Programs\Python\Python39> pip install wxPython Requirement already satisfied: wxPython in c:\users\(ユーザー名)\appdata\local\programs\python\python39\lib\site-packages (4.2.1) Requirement already satisfied: pillow in c:\users\(ユーザー名)\appdata\local\programs\python\python39\lib\site-packages (from wxPython) (10.3.0) Requirement already satisfied: six in c:\users\(ユーザー名)\appdata\local\programs\python\python39\lib\site-packages (from wxPython) (1.16.0) Requirement already satisfied: numpy in c:\users\(ユーザー名)\appdata\local\programs\python\python39\lib\site-packages (from wxPython) (1.26.4) PS C:\Users\(ユーザー名)\AppData\Local\Programs\Python\Python39> Pathは通したつもり。 %USERPROFILE%\AppData\Local\Microsoft\WindowsApps C:\Users\(ユーザー名)\AppData\Local\Programs\Python\Python39 C:\Users\(ユーザー名)\AppData\Local\Programs\Python\Python39\Scripts C:\Users\(ユーザー名) C:\Users\(ユーザー名)\AppData\Local\Programs\Python\wxGlade-1.0.0 %USERPROFILE%\.dotnet\tools C:\Users\(ユーザー名)\AppData\Local\Programs\Python\Python39\Lib\site-packages\wx PS C:\Users\(ユーザー名)> pip list Package Version ------------------------- -------- altgraph 0.17.4 importlib_metadata 7.1.0 numpy 1.26.4 packaging 24.0 pefile 2023.2.7 pillow 10.3.0 pip 24.0 pyinstaller 6.6.0 pyinstaller-hooks-contrib 2024.6 pywin32-ctypes 0.2.2 setuptools 58.1.0 six 1.16.0 wxPython 4.2.1 zipp 3.18.1

Asteriaを勉強しています。 Zファイルを展開したいのですが、アーカイブコンポーネントにはzip.GZ.TARしかありません。 FTPスクリプトでやろうかと思いましたが、umcompressはサポートされていませんでした。 なにか方法ありませんでしょうか？

複数のCSVファイルを各々一つのexcelファイルの各ワークシトに書き込む方法のコードを下記のようにQueryTableを使った形にしてみました。 $csvFile1 = "D:\test_data\test_data1.csv" $csvFile2 = "D:\test_data\test_data2.csv" $excel = New-Object -ComObject Excel.Application $excel.Visible = $true $book = $excel.Workbooks.Add() $Book.Worksheets.Add() $sheet1 = $excel.Worksheets.Item(2) $sheet2 = $excel.Worksheets.Item(1) $startRange = "C2" $outputColumn = $sheet1.Range($startRange).Column $outputRow = $sheet1.Range($startRange).Row $QueryTable = $sheet1.QueryTables.Add("TEXT;$csvFile1",$sheet1.cells($outputRow,$outputColumn)) $QueryTable.TextFileCommaDelimiter = $True $QueryTable.TextFilePlatform = 65001 $QueryTable.TextFileStartRow = 1 $QueryTable.Refresh($false) $QueryTable.Name = "仮テーブル" $QueryTable.Delete() $startRange = "C2" $outputColumn = $sheet2.Range($startRange).Column $outputRow = $sheet2.Range($startRange).Row $QueryTable = $sheet2.QueryTables.Add("TEXT;$csvFile2",$sheet2.cells($outputRow,$outputColumn)) $QueryTable.TextFileCommaDelimiter = $True $QueryTable.TextFilePlatform = 65001 $QueryTable.TextFileStartRow = 1 $QueryTable.Refresh($false) $QueryTable.Name = "仮テーブル" $QueryTable.Delete() [System.Runtime.Interopservices.Marshal]::ReleaseComObject($sheet) > $null [System.Runtime.Interopservices.Marshal]::ReleaseComObject($excel) > $null [gc]::Collect() これは2個のcsvファイルだから何とかなっていますがファイルが増えた場合これではとても面倒なことになります。私の能力ではコンパクトにコードを纏めることが出来ません。コンパクトな方法をお教えください。別にExport-Excel等使う方法でもかまいません。

Sendmailを利用したCGIプログラムで、 突然メールフォームが500エラーになるようになりました。 確認画面までは出て、送信ボタンを押すとエラーになります。 いろいろ試したところ、受け取るメールの件名などに、 全角文字を設定するとエラーになるところまでは判明しました。 ※利用しているレンタルサーバーはhetemlです。 　新サーバーになってからエラーになるようになりました。 ※プログラムは長く、また複数あるためここに記載は難しいです。 　こんな単語の箇所とか、この記述を入れたら・・、などあれば 　でご指示いただけると幸いです。 大変漠然な質問で申し訳ないのですが、 回避する方法などアドバイスがあれば教えてください。

windowsアプリで何かを作りたいのですが、作りたいものに迷った場合どうしたらよろしいでしょうか？

VBAやHTMLに詳しい人に質問です。 webサイトからハイパーリンクの値を取得するVBAコードを10年近く前に書いたのですが、全く覚えていないので困っています。 例えば下記の南関競馬の年間日程表のページから、各日程のハイパーリンクの値（4月1日なら /program/20140401200101.do )を抜き出し1つの列に並べて表示するという動きです。実行すると画像のようになります。 https://www.nankankeiba.com/calendar/201404.do しかし、現在は南関競馬は大幅リニューアルしたらしく、HTMLの仕様も変わったようなので、上手く動きません。 下はコードの一部分ですが多分ですが、サイトがリニューアルした結果、下記の行での指定("EM") では上手くアクセスできないのかと思います。HTMLも全く知識がないので、詳しい方いましたら、アドバイスお願いします。 Set Doc = ie.document Set chNodes = Doc.getElementsByTagName("EM") 'getElementsByTagName On Error Resume Next For Each chNode In chNodes Set docPart = New HTMLDocument docPart.write chNode.outerHTML Set chNodes1 = docPart.getElementsByTagName("A") myCell.Value = Replace(chNodes1(0).href, "about:", "") Set myCell = myCell.Offset(1, 0) Next chNode

amebablogハムスター恋愛andアタシの日記のcss3D回転キューブアメーバピック広告透明キューブボックスにテキストを透明に配置して、シャドウに広告の画像を配置して左下から右にカーブしながら大きくなりながら上がってきてスマホ画面の左にボックスの角でポンッと軽くつつかせてクリックするとボックスが止まってバラバラになって跳ね返る様に右にカーブしながら小さくなりながら左下にボックスの角で着地しています 難易度はどれぐらいですか？ なかなか出来ません 作り方を教えて下さい https://ameblo.jp/asuka1395000

JavaScript Object要素に読み込んだデータを配列変数に格納したい [html] <object data="sample.txt" type="text/plain" width="300" height="100"></object> [sample.txtの内容] United States, アメリカ China, 中国 Germany, ドイツ Japan, 日本 [JavaScript] // 配列に読み込まれたデータ const data = [ ["United States", "アメリカ"], ["China", "中国"], ["Germany", "ドイツ"], ["Japan", "日本"] ]; [仕様] ・ローカル環境であること ・jQueryなどのプラグインは不使用 ・ファイルリーダーは使わない ・JavaScriptのコードを用いて実現させること 以上から、 Object要素に読み込んだデータを配列変数に格納できますか？

お世話になります。 PHP　Spreadsheet　を使って、Excelファイルから情報を集めるPHPプログラムを作っていますが、次のようなエラーメッセージが出てきて情報を読めません。 Could not find zip member zip://C:/Users/.... これはいったいどういう意味なのでしょうか？Excel ファイル以外に何のZIPファイルが必要なのでしょうか？ 詳しい方がいらっしゃいましたら、ご教授お願いいたします。

Dynamic Draw 6.2.0usbで編集しました。 ｊｐｇでアウトプットの方法をおしえてください。

Laravel11を使用しております。クエリビルダで、テーブルとサブクエリをJOINするにはjoinSub()やleftJoinSub()を使えばいいのですが、サブクエリとサブクエリをJOINするにはどうすればいいか分かりません。いろいろなドキュメントを見ていますが、どれもDB::table()から始まるものばかりで、テーブルとのJOINを想定したものばかりです。 サブクエリとサブクエリをJOINする方法をご存じの方、教えて下さるようお願いします。それとも、できないのでしょうか？

VS2022で.NetFramework4.0を使いたいです。 https://qiita.com/diontools/items/b193ae8394161fc26698#net-framework-4--45-の場合 「ダウンロードした Nuget パッケージを .zip にリネームし、その中の /build/.NETFramework/ 以下を C:\Program Files (x86)\Reference Assemblies\Microsoft\Framework\.NETFramework\ に上書きすることで配置完了です。」とありますが、具体的にリンク先のどのファイルをダウンロードすればよいのでしょうか。