2016-01-01から1年間の記事一覧

一行ずつ書込む

以下のサイトを参考にプログラムを作成しました。 ストリームを使用します。 Dim savedlg As SaveFileDialog = New SaveFileDialog() savedlg.Filter = "テキストファイル (*.txt)|*.txt" If savedlg.ShowDialog() = Windows.Forms.DialogResult.OK Then 'フ…

= 共有メンバ

いまだに、クラスの利点について分からないのですが・・・ とりあえず、1つのアプリで複数の画面(ウィンドウ)を表示するには、 その画面数分だけ、クラスの数が増えることは分かっている・・ (1つのクラスには1つの画面しか属さないようだ…) 各画面間で変…

Nullエラー回避

DataGridViewのセルが未入力状態 (空文字) で そのセルを DataGridView1(0, 0).Value で入力文字を判定するとNullエラーとなる。 この場合、CStr(DataGridView1(0, 0).Value) とすると、文字変換で空文字と判定され Nullエラーにならない。

コンボボックス 使用時注意点

DataGridViewでコンボボックスを使用する時(Column Type : DataGridViewComboBoxColumn) ① DataGridViewを右クリックして、「列の編集」をクリックする。 DefaultCellStyle をクリックしてCellStyleビルダーを開く。 ② NullValueを「False」 -- (書きかけ…

セル幅 変更 禁止

ちょっと迷ったのでメモしておく。 手順 ①DataGridViewのプロパティでAllowUserToResizeColumnsをFalseにする。 ②コントロール「DataGridView」右クリックして「列の編集」よりResizableをFalseにする。

列ヘッダの縦書き (位置調整)

DataGridView 列ヘッダの縦書き について調べると... 投稿者shu 様のソース http://rucio.cloudapp.net/ThreadDetail.aspx?ThreadId=25932 参考にさせて頂きました。 このままでは、列ヘッダの左上にヘッダ文字がひっついてしまいます。 ⇒列ヘッダセル上端中…

セル配置 (注意点)

セル配置の設定をDataGridView1のプロパティ「DefaultCellStyle」で決めてしまうと、 DataGridView1全体にその設定が有効になり、 「列の編集」の「DefaultCellStyle」設定を個別に設定しても変化しない。 →個別設定する時は、まずDefaultCellStyleの設定が…

PDF Foxit カラー表示

Foxit で PDFがグレー表示になる現象があったが、「環境設定」を変更することで解決した。 「ファイル」→「環境設定」→「文書の表示カラーを調整」のチェックを外す。→「OK」

メニューバー(MenuStrip) の プルダウン を 非表示にする。

メニュ-バーに含まれる「ファイル」等のプルダウンを プルダウン表示状態からプログラムで非表示にする方法 ファイルToolStripMenuItem.HideDropDown() これで、もし、「ファイル」のプルダウンが表示されていたら、プルダウン状態が解除される。 --- なぜか…

DataGridView コンボボックスの1クリック化

Apocripha.net 様のページを参考にさせて頂いた。 http://apocriphanet.blog17.fc2.com/blog-entry-83.html

テキストボックス 入力文字を小文字から大文字にする

Private Sub TextBox1_KeyPress(sender As Object, e As KeyPressEventArgs) Handles TextBox1.KeyPress If "a" <= e.KeyChar And e.KeyChar <= "z" Then e.KeyChar = e.KeyChar.ToString.ToUpper '大文字変換し格納 End If End Sub --- ↑やらなくても、Tex…

フォーム 設定(サブフォームにはこれがいい)

フォームのプロパティ設定 最大化・最小化・サイズ変更禁止 ControlBox を False MaximizeBox を False MinimizeBox を False FormBorderStyle を FixedSingle -- フォント Font を MSゴシック,9pt フォームのフォントを変えることで含まれるコントロールの …

コンボボックスの指定インデックスへ値代入

ComboBox1.Items(i) = "TEST" --- iは、指定インデックス

チェックボックス 択一選択 (ラジオボタン化)

DOBON様のページとzenmai software様のページのコードを一部変更し、ミックスして作成した。 動作OKのようだ。 'CurrentCellDirtyStateChangedイベントハンドラ Private Sub DataGridView1_CurrentCellDirtyStateChanged( _ ByVal sender As Object, ByVal e…

DataGridView 行ヘッダ 幅 調節不可 設定

プロパティ RowHeadersWidthSizeMode を DisableResizing にする!

テキストボックス の テキスト 全選択

テキストボックスを選択時(クリック時) テキストボックス内の文字を全選択する。 Private Sub TextBox1_Click(sender As Object, e As EventArgs) Handles TextBox1.Click Me.TextBox1.SelectAll() End Sub DOBON様のサイトでは、TextBox1_Enterイベントで…

DataGridView セル 空白 検出

DataGridViewの指定セルが空白であるかを見つけるためのコード 「Validated」イベントを使用する。 Private Sub DataGridView1_Validated(sender As Object, e As EventArgs) Handles DataGridView1.Validated If DataGridView1(0, 0).Value Is Nothing Then…

指定行の高さ調整

1行目の行の高さを「15」に設定 DataGridView1.Rows(0).Height = 15 デフォルトの行の高さは21

フォーム 2つの場合のコントロール変更

(メモ) メインフォーム から サブフォーム の コントロール変更はできない。 サブフォーム から メインフォームの コントロール変更はできる! 理由は分からないけど・・ --- メインフォーム(呼出元フォーム) サブフォーム(メインフォームから呼出されたフ…

Delegate Invoke

スレッドを使ってループ処理をする場合、 フォームのコントロールを直接触ることは禁止される。 たとえば、 TextBox1.Text = ”Hello” は、スレッド中に直接記述することはできない。 スレッド中でも間接的にコントロールを触る方法はある。 Delegate と Invo…

VB.net での Mid, Left, Right

VB.net でも Mid, Left, Right は使えるようだ。 Imports Microsoft.VisualBasic をインポートしておけば使える。 ただし、フォームクラス中のコードでは Left を Microsoft.VisualBasic.Left と書かないといけないようだ。。。 [参考] http://developer.thi…

VB.net 「Partial」クラス作成

1つのソースファイルに記述していくと 長文になる。 →そのため、ソースファイルを分割する。 本当は、クラスの名前を分けてソースファイルを 分割するとメリットがあるようだけれど、 とりあえず、1つのクラス名を使いそのソースを2つのソースファイル に分…

VB6(SP6) 不思議な現象 2

For i = 0 To 0 MsgBox "hello" Next i メッセーシ゛ボックスが1回表示される。 C言語の for(i = 0; i <= 0; i++) { "表示" } と同じか・・

VB6(SP6) 不思議な現象

例えば、文字列型変数Strを宣言するとする。 Dim Str As String Str = "test" この変数を配列にしたくなったとする。 「(3)」と「(0)」だけ追記する。 Dim Str(3) As String Str(0) = "test" するとコンパイルエラーになる。 原因分からず、再度、「Dim …

VB配列 宣言

VB6またはVB.NET配列宣言は、 Dim Hairetu(3) As Integer とすると、Hairetu(0),Hairetu(1),Hairetu(2),Hairetu(3)の4つが使える。 CやC#の配列宣言とは異なるので注意

DataGridView 1列を非選択にする

Private Sub DataGridView1_SelectionChanged(sender As Object, e As EventArgs) _Handles DataGridView1.SelectionChanged If DataGridView1.CurrentCell.ColumnIndex = 0 Then 'フォーカスが1列目か? DataGridView1.CurrentCell = Nothing 'フォーカス…

Windows7 Windows アップデート 解決

古いノートPC(Core2 Duo)をVISTAから7にした。 7は、価格.comの「風見鶏」で購入した(19,000円)。 インストールは、正常だった。 Windows アップデートで「更新プログラムを確認しています」が終わらない現象を確認。 ⇒この問題はよくあるようで…

PC間Ping

PC間のPingは、Windowsの場合設定をしないと通らないみたい。 WinXP http://oshiete.goo.ne.jp/qa/4248468.html?from=recommend 回答No.7 Win7 http://kb.seeck.jp/archives/5570 危険かもしれないがパブリックも含めて 以上のように設定をするとPingが双方…