2017-09-05から1日間の記事一覧
'自分自身の実行ファイルのパスを取得する Dim appPath As String = System.Reflection.Assembly.GetExecutingAssembly().Location *.exeが取得できる 実行しているアプリケーションのフォルダパスの取得 Dim appPath As String = System.Reflection.Assembl…
ログ出力にはlog4netというものを使うと良いらしい プロジェクトに追加 プロジェクトに追加する方法は2つある(他にもあるかも) Webからダウンロードし、追加 NuGetパッケージマネージャーを使用し、追加 Webからダウンロードし、追加 ここから「log4net-2.0.…
最小化を押すとバーに戻る。最大化を押すと左上に移動 '最大サイズと最小サイズを現在のサイズに設定する Me.MaximumSize = Me.Size Me.MinimumSize = Me.Size 参考文献 フォームのサイズを変更できないようにする: .NET Tips: C#, VB.NET
VBで設定を使ってみる 設定値の追加 ソリューションエクスプローラーの「プロジェクト名>My Project」をダブルクリック。その中の「設定」を表示。 一番下の行をアクティブにして、次のように入力する。 名前 種類 スコープ 値 ServerName String ユーザー l…
○モードレスフォームで表示する モードレスフォームで表示すると、そのフォームを閉じなくても他のフォームを操作できる Dim f1 As New Form1() f1.Show() ○モーダルフォームで表示する モーダルフォームで表示すると、そのフォームを閉じるまで他のフォーム…
VBAでD:\temp\hello.txtにUTF-8で保存するのは次のようにする With CreateObject("ADODB.Stream") .Charset = "UTF-8" .Open .WriteText "こんにちは", 1 .WriteText "世界", 1 .SaveToFile "C:\temp\world.txt", 2 .Close End With ○解説 CreateObject("ADO…
SQL Serverに接続する Dim con As System.Data.SqlClient.SqlConnection = Nothing Try '接続する端末名 Dim serverName As String = "localhost" ' 例) 192.168.0.173 '接続するデータベース名 Dim dbName As String = "testdb" 'ユーザ名 Dim userId As St…