スレッド一覧 Page13 - DOBON.NETプログラミング道掲示板

DOBON.NETプログラミング道掲示板

HOME HELP 新規作成新着記事ツリー表示スレッド表示トピック表示発言ランクファイル一覧検索過去ログ

■ 「新規作成」から投稿できます。
■ マルチポストされた投稿を見つけたときは、その投稿に返信することによりご報告ください。その際は匿名で投稿し、マルチポストされている場所を併記してください。
■ スパム対策のため、メールアドレスの先頭に"_"という文字が付加されています。
■

RSS 2.0 | RSS 0.91 | 携帯電話用 | 自分専用のアイコンを使用するには | 掲示板への要望 | 管理人に連絡 | お気楽掲示板
■ 24時間以内に作成されたスレッドは

で表示されます。
■ 24時間以内に更新されたスレッドは

で表示されます。

・記事中の画像表示形式

[ 全100スレッド(61-65 表示) ]　 << 0 | 1 | 2 | 3 | 4 | 5 | 6 | 7 | 8 | 9 | 10 | 11 | 12 | 13 | 14 | 15 | 16 | 17 | 18 | 19 >>
[ 更新順 / 投稿順 / レス数 ]←ソート方法変更

記事リスト ( )内の数字はレス数

参照dllへの文字列引数をutf8で渡したい。(13) |

FILE.COPYでIOExceptionエラーが出る(11) |

リストを別フォームに渡す方法(9) |

例外発生した場合に変数をcatchに渡したい(9) |

Code128でバーコードが読み取れない(8) |

モードレスフォーム Warning IDE0067を回避したい(7) |

IE11では表示されるが、.netのWebBrowserでは、表示されないHPを表示する方法(7) |

数字だけで構成されてるＣＳＶフィールドが自動的に数値として解釈される(7) |

フォームコントロールへのDataBindingsでプロパティが相互反映されない(7) |

起動ディスプレイの指定方法について(6) |

ListBoxにデータが表示されない(6) |

文字列を8bit に戻してから UTF-8 に変換する方法(6) |

SQLServerテーブル内容をDataGridViewに表示するコードについて(6) |

文字列構造体のListのソート(6) |

WebBrowser Controlを使って、任意の値を取得(5) |

こんな演算子初めて見ました。(5) |

RichTextBoxで入力文字の自動折り返しを止めたい(5) |

あるWindows10PCでビルドしたEXEがW8.1以下で実行エラー(5) |

ポルトガル語の登録(5) |

oo4oのAddTableをADOに移行したい(5) |

Declare宣言するdllと参照追加をするdllの区別(4) |

VS2017で作成されたDLLをVS2005で作成されたAPで使用する方法(4) |

フォルダ内の全ての容量を取得したい(4) |

共変性と反変性ってこういうこと？(4) |

プロセスからウインドウを取得(4) |

Newの使い方間違ってますか？(4) |

ユーザーコントロール内のテキストボックスのmodifiedプロパティ(4) |

JOIN操作の構文エラー(4) |

動的にプロパティや変数の値の取得(4) |

VB6 ほかのアプリケーションを起動しそのアプリケーションは終了させる方法(4) |

スクロールバーが出た時に高さを変えたい(4) |

DatagridViewの行高さ変更について(4) |

LINQのメソッド構文の書き方(3) |

vb.net+SQLiteで複数データベースファイルへのトランザクション方法(3) |

ジェネリック型インターフェースを使った変数を扱いたい(3) |

Process.WaitForExitで正常に動作しない？(3) |

PictureBox.Locationのキャンセル(3) |

Catch時のex.StackTraceの情報(3) |

VisualStudioでマクロ(3) |

OracleDataAccess を参照したプログラムでデバッグモードが機能しなくなる(3) |

VisualStudioでExcelのVSTO開発(3) |

VB.NETでCSVを読み込む際にSQL文を使いたい(3) |

DrawImage でメモリ不足エラー(3) |

Vb.netからAccessへの接続について(3) |

令和の日付への対応(3) |

HTTP 417エラーを発生させるためのIIS設定はどうすればよいか(3) |

DrawString前のFillRectangle有無により文字の太さが違う理由について教えて下さい(3) |

PIctureBox同士を論理合成したい(3) |

データセット定義ファイルからDataTable(3) |

ネットの画像の複数枚を重ね合わせたい(3) |

DataGridViewで検索をかける方法(3) |

DataGridViewの選択時の色を透明にしたい(3) |

WebBrowserでWebページからのメッセージ(3) |

ASP.NETから呼ばれているかどうか判定する方法(3) |

CA2213の警告が消えません(3) |

C#　現在のコンテキスト内にｘｘｘという文字は存在しませんと出ます(3) |

Taskクラスを.NET Framework 2.0で実現させる方法(2) |

WebBrowser Control foreachで値が消える(2) |

Editボックスに簡体字をセットする方法(2) |

WebClientが上手く動かない(2) |

フォーム外のカーソルの変更(2) |

ラムダ式の勉強中(2) |

RichTextBoxで入力文字の自動折り返しを止めたい(2) |

C#をVBに変換(2) |

WebClientで、短期間にDownloadStringAsyncを実行したい(2) |

マウスのないOSでマウスカーソルの表示(2) |

ToolStripMenuItemにShortcutKeysを指定した際の、元のコントロールを取得する方法(2) |

MouseEventArgsのカレント座標(2) |

リッチテキストボックスでの字間の調整(2) |

VC++ → VB.Netに変換時に文法エラー(2) |

SQL-Server Compact 4.0が表示されない(2) |

バーコードの数字を非表示にしたい(2) |

自作したアプリの発行元を明記したい(2) |

System.Threading.Thread.Sleep()と変数(2) |

DataGridView 行の背景色の設定(2) |

Datagridviewのクリア(2) |

numericUpDwonコントロールのvalue(2) |

Visual Studio　DataTableの値のアクセスの仕方(2) |

DataTableの構造が同じか調べるメソッド(2) |

RejectChangesについて(2) |

PC機種によってスタートアップ画面が中央から左上にずれる、Fontがおかしくなる。(2) |

タスクスケジュール登録時の例外メッセージ(2) |

管理者モードでクリック(2) |

VB2017でのインストーラ作成時のエラーについて(2) |

Microsoft Azure OCRのサンプルコード実行時エラー(2) |

データバインド時のDataGridViewのカスタムソート(2) |

Object型からDecimalへの変換(2) |

擬似言語をVBのプログラミングに変換(2) |

ユーザーコントロールのプロパティが保存されない(2) |

Windows10(1803)からGetHostEntryでipv4が取得出来ない場合がある(2) |

自分自身を呼び出すのはOKですか(1) |

List型でエラーが起きてしまい・・・(1) |

LINQの拡張メソッドの定義(1) |

WebRequest でメモリが解放されない(1) |

Function プロシージャからの文字選択(1) |

RDP接続でのネットワーク帯域制限(0) |

必須コンポーネントの一覧に追加したい(0) |

App.configのMy.Application.Log設定で使用できない属性が出る(0) |

vb2010を使用したmicrosoft Wordの任意の行の削除(0) |

WinFormsでWindows10のカメラアプリと連携したい(0) |

■記事リスト / ▼下のスレッド

■34380 / 親記事)

　フォーム外のカーソルの変更

□投稿者/ /400 一般人(2回)-(2019/11/11(Mon) 23:34:22)

環境/言語:[vb.net2005]　
分類:[.NET]　

続けてですみません
フォームを表示しないプログラムで
Cursor.Current = Cursors.WaitCursor
でカーソルを変更してもカーソルはデフォルトのままです
フォームが見えないからだろうとは思うのですが、ではフォーム外のカーソルを変更
するにはどうすればいいのでしょう
それとも出来ないのでしょうか

違反を報告

▽[全レス2件(ResNo.1-2 表示)]

■34382 / ResNo.1)

　Re[1]: フォーム外のカーソルの変更

□投稿者/ 魔界の仮面弁士大御所(1255回)-(2019/11/12(Tue) 10:51:16)

■No34380に返信(/400さんの記事)
> フォーム外のカーソルを変更するにはどうすればいいのでしょう

目的にもよりますが、手っ取り早く、ウィンドウを用意してしまうとか?
Opacity = 1/255
TopMost = True
ShowInTaskbar = False
な枠無しフォームを重ねておけば、そちらのカーソルが優先されそう。

違反を報告

■34389 / ResNo.2)

　Re[2]: フォーム外のカーソルの変更

□投稿者/ /400 一般人(3回)-(2019/11/14(Thu) 17:44:28)

レスありがとうございます

> 目的にもよりますが、手っ取り早く、ウィンドウを用意してしまうとか?

ちょいと時間がかかるので待機カーソルにしといたほうが良いかなと思っただけです

まあ簡単な方法は無いということで諦めます(出来ればフォーム被せはしたくないので)

解決済み!

違反を報告

■記事リスト / レス記事表示 → [親記事-2]

■記事リスト / ▼下のスレッド / ▲上のスレッド

■34372 / 親記事)

　ラムダ式の勉強中

□投稿者/ VBはじめました一般人(17回)-(2019/11/07(Thu) 10:24:48)

環境/言語:[VisualStudio2017 VB.net]　
分類:[.NET]　

ラムダ式の勉強をはじめました(下記のコードに対する質問)
(質問１）
コメントの①と②をDelegateで書くと、①－Dと②－Dの形になると
思いますが、あってますか？(動作は確認したのでなんとか同じ動きになります)
もっと、適切な書き方があれば教えてください。

(質問２)
コメントの①を1行で書くと、①-1行になるとおもいますが、
②を1行で書くことはできない。であってますか？
https://docs.microsoft.com/ja-jp/dotnet/visual-basic/programming-guide/language-features/procedures/lambda-expressions
を見ると、ラムダ式は、ステートメントに含める必要があると記載されているので
1行で書けないと考えたのですが、あってますか？

Public Class TestClass
Sub Test()
Dim increment1 = Function(x) x + 1 '①
Console.WriteLine(increment1(1))

Console.WriteLine((Function(num As Integer) num + 1)(1)) '①-1行

Dim writeline1 = Sub(x) Console.WriteLine(x) '②
writeline1("Hello")

'①をDelegateで書いたもの
Dim increment As New DelegateTest_TestClass
Dim d1 As TestDelegateF = AddressOf increment.Method1 '①-D

Console.WriteLine(d1(1))
Dim d3 As SampleDelegateS = AddressOf increment.Method3 '②-D
d3("Hello")
End Sub
End Class
Public Delegate Function TestDelegateF(x As Integer) As Integer
Public Delegate Sub TestDelegateS(x As String)

Public Class DelegateTest_TestClass
Public Function Method1(x As Integer) As Integer
Return x + 1
End Function
Public Sub Method3(x As String)
Console.WriteLine(x)

End Sub
End Class

違反を報告

▽[全レス2件(ResNo.1-2 表示)]

■34373 / ResNo.1)

　Re[1]: ラムダ式の勉強中

□投稿者/ 魔界の仮面弁士大御所(1253回)-(2019/11/07(Thu) 14:11:35)

■No34372に返信(VBはじめましたさんの記事)
> ラムダ式の勉強をはじめました(下記のコードに対する質問)
投稿モードが「通常モード」の場合、HTML の特性上
連続した空白が一つにまとめられ、行頭空白は失われます。

コード内のインデントを残す場合は、投稿時に
「図表モード」を選択してください。

> コメントの①と②をDelegateで書くと、①－Dと②－Dの形になると
> 思いますが、あってますか？(動作は確認したのでなんとか同じ動きになります)

いいえ。x のデータ型が明示されていないので、①のコードは
Option Strict On モードではコンパイルエラーになりますし、
Option Strict Off では、x が As Object としてコンパイルされます。

そのため、①に相当するデリゲートの引数と戻り値は
　　(x As Integer) As Integer
ではなく
　　(x As Object) As Object
です。

> もっと、適切な書き方があれば教えてください。

①で、引数と戻り値が Integer であることを明示するために、
下記のように書くことができます。

Dim increment1 = Function(x As Integer) x + 1
Dim increment1 As TestDelegateF = Function(x As Integer) x + 1
Dim increment1 As TestDelegateF = Function(x) x + 1
Dim increment1 As Func(Of Integer, Integer) = Function(x) x + 1

> Dim d3 As SampleDelegateS = AddressOf increment.Method3 '②-D
> Public Delegate Sub TestDelegateS(x As String)

SampleDelegateS というのは
TestDelegateS の誤記でしょうか。

提示されたコードでは、クラスのインスタンスメソッドを割り当てていますが、
Module 内のメソッドや Shared なメソッドを割り当てることもできます。

Dim method As Action = AddressOf Console.WriteLine

またイベントハンドラと同様、一つのデリゲートに複数のメソッドを割り当てることもできます。

Sub Main()
　　Dim method = DirectCast(System.Delegate.Combine(
　　　　New System.Action(Sub() System.Console.WriteLine("ABC")),
　　　　New System.Action(AddressOf System.Console.WriteLine),
　　　　New System.Action(Sub() System.Console.WriteLine("XYZ")),
　　　　New System.Action(AddressOf Now.ToString),
　　　　New System.Action(Sub() MsgBox("マルチキャストデリゲート"))),
　　　　System.Action)
　　method()
End Sub

> (質問２)
> コメントの①を1行で書くと、①-1行になるとおもいますが、
> ②を1行で書くことはできない。であってますか？

②を単行とするなら、このように書けます。

Call (Sub(x) Console.WriteLine(x))("Hello")

違反を報告

■34374 / ResNo.2)

　Re[2]: ラムダ式の勉強中

□投稿者/ VBはじめました一般人(18回)-(2019/11/07(Thu) 18:27:55)

魔界の仮面弁士さん

いつも、丁寧に有難う御座います。
色々、ググって整理したつもりが、スカスカでした。
VBAで、型を意識する癖がついていないので、苦労しています。

Call文なんて、言われてみれば、納得できるのですが、思いつきもしませんでした。
何度も、熟読してものにしたいと考えます。

本当に、ご丁寧に有難う御座います。

解決済み!

違反を報告

■記事リスト / レス記事表示 → [親記事-2]

■記事リスト / ▼下のスレッド / ▲上のスレッド

■34354 / 親記事)

　RichTextBoxで入力文字の自動折り返しを止めたい

□投稿者/ C#初心者一般人(1回)-(2019/11/04(Mon) 09:21:32)

環境/言語:[Windwos10 64bit / VS2017 C#、.NET Framework 4.7.2]　
分類:[.NET]　

RichTextBoxに入力すると、BOXの端まで表示されずに途中で改行されてしまうことを止めたいのですが、方法がわからずご教示願います。

入力文字入力文字入力文字入力文字入力文字１２３４５６｜
７８９１０　　　　　　　　　　　　　　　　　　　　　｜
　　　　　　　　　　　　　　　　　　　　　　　　　　｜

　　　↓　こうならず、以下になる。

入力文字入力文字入力文字入力文字入力文字　　　　　　｜
１２３４５６７８９１０　　　　　　　　　　　　　　　｜
　　　　　　　　　　　　　　　　　　　　　　　　　　｜

違反を報告

▽[全レス2件(ResNo.1-2 表示)]

■34357 / ResNo.1)

　Re[1]: RichTextBoxで入力文字の自動折り返しを止めたい

□投稿者/ 魔界の仮面弁士大御所(1249回)-(2019/11/04(Mon) 20:08:13)

■No34354に返信(C#初心者さんの記事)
> RichTextBoxに入力すると、BOXの端まで表示されずに途中で改行されてしまうことを止めたいのですが、方法がわからずご教示願います。

これでどうでしょう。
https://codeday.me/jp/qa/20190706/1184754.html
https://qa.atmarkit.co.jp/q/1976

違反を報告

■34376 / ResNo.2)

　Re[2]: RichTextBoxで入力文字の自動折り返しを止めたい

□投稿者/ C#初心者一般人(2回)-(2019/11/07(Thu) 19:41:30)

ありがとうございます、解決致しました。

解決済み!

違反を報告

■記事リスト / レス記事表示 → [親記事-2]

■記事リスト / ▼下のスレッド / ▲上のスレッド

■34347 / 親記事)

　C#をVBに変換

□投稿者/ VBはじめました一般人(11回)-(2019/11/01(Fri) 10:23:22)

環境/言語:[VisualStudio2017 VB.net]　
分類:[.NET]　

次のC#のコードをVBに変換したいと考えています。
var queryMatchingFiles =
from file in fileList
where file.Extension == ".htm"
let fileText = System.IO.File.ReadAllText(file.FullName)
let matches = searchTerm.Matches(fileText)
where matches.Count > 0
select new
{
name = file.FullName,
matchedValues = from System.Text.RegularExpressions.Match match in matches
select match.Value
};

****以後　自分で変換できた範囲　********
Dim queryMatchingFiles =
From file In fileList
Where file.Extension = ".htm"
Let fileText = System.IO.File.ReadAllText(file.FullName)
Let matches = searchTerm.Matches(fileText)
Where matches.Count > 0
Select New

お願いがあります。
New以後、どうやって変換すればいいか教えて頂けませんか？
宜しくお願いいたします。

C#のコードの出典は、https://docs.microsoft.com/ja-jp/dotnet/csharp/programming-guide/concepts/linq/how-to-combine-linq-queries-with-regular-expressions
です。

違反を報告

▽[全レス2件(ResNo.1-2 表示)]

■34348 / ResNo.1)

　Re[1]: C#をVBに変換

□投稿者/ 魔界の仮面弁士大御所(1245回)-(2019/11/01(Fri) 11:03:11)

■No34347に返信(VBはじめましたさんの記事)
> New以後、どうやって変換すればいいか教えて頂けませんか？

Select New With {
　Key .Name = file.FullName,
　matchedValues = From match As System.Text.RegularExpressions.Match in matches Select match.Value
}

という感じでどうでしょう。

クエリ構文のかわりにメソッド構文でも可。

違反を報告

■34350 / ResNo.2)

　Re[2]: C#をVBに変換

□投稿者/ VBはじめました一般人(12回)-(2019/11/01(Fri) 14:27:41)

魔界の仮面弁士さんありがとうございます。
助かりました。

解決済み!

違反を報告

■記事リスト / レス記事表示 → [親記事-2]

■記事リスト / ▲上のスレッド

■34345 / 親記事)

　WebClientで、短期間にDownloadStringAsyncを実行したい

□投稿者/ VBはじめました一般人(10回)-(2019/10/29(Tue) 11:48:38)

環境/言語:[VB.net]　
分類:[.NET]　

Webから、Htmlデータをダウンロードするプログラムを作ろうとしています。
どうしても、Completedする前に、別のページのダウンロードを始める(その場合、ダウンロード中のデータは破棄してよい)必要があります。

DownloadStringAsyncの前にCancelAsyncを実行すれば可能かと思ったのですが、
System.NotSupportedException: 'WebClient は同時 I/O 操作をサポートしません。'とエラーが発生します。

但し、キャンセル場合もあります。(不安定)
どのようにすれば、確実にキャンセルできるのでしょうか？
詳しい方いらっしゃいまいたら教えてください。
サンプルのコードは下記になります。(フォームにボタン一つ貼り付けている)
3回に一回ぐらいは成功する

Imports System.Net
Imports System.Text

Public Class Form1
Dim myUri As Uri = New Uri("https://www.yahoo.co.jp/")
Dim HtmlData As String
WithEvents myWebClient As New WebClient
Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
myWebClient.Encoding = Encoding.UTF8
myWebClient.DownloadStringAsync(myUri)
myWebClient.CancelAsync()
myWebClient.DownloadStringAsync(myUri)　←ここでエラー発生！
End Sub
Private Sub myWebClient_DownloadStringCompleted(sender As Object, e As DownloadStringCompletedEventArgs) Handles myWebClient.DownloadStringCompleted
If e.Error Is Nothing Then
HtmlData = CStr(e.Result)
MsgBox(HtmlData.Substring(0, 1000))
ElseIf e.Cancelled Then
MsgBox("キャンセルボタンが押されました。")
End If
End Sub
End Class

違反を報告

▽[全レス2件(ResNo.1-2 表示)]

■34370 / ResNo.1)

　Re[1]: WebClientで、短期間にDownloadStringAsyncを実行したい

□投稿者/ shu 大御所(489回)-(2019/11/07(Thu) 08:49:19)

■No34345に返信(VBはじめましたさんの記事)

WebClientのインスタンスを別に作るのでは
うまくいきませんでしょうか？

違反を報告

■34371 / ResNo.2)

　Re[2]: WebClientで、短期間にDownloadStringAsyncを実行したい

□投稿者/ VBはじめました一般人(16回)-(2019/11/07(Thu) 10:14:24)

shuさん　お返事有難う御座います

IsBusyで状態を確認してmyWebClient.CancelAsync()を
実行していましがた。どうしても、ロストするので、
shuさんのおっしゃる通り、コストがかかっても
インスタンスを新しく作ることにします。

有難うございました。

解決済み!

違反を報告

■記事リスト / レス記事表示 → [親記事-2]

＜前のスレッド5件 | 次のスレッド5件＞
- ( ページ移動 / << 0 | 1 | 2 | 3 | 4 | 5 | 6 | 7 | 8 | 9 | 10 | 11 | 12 | 13 | 14 | 15 | 16 | 17 | 18 | 19 >> )

HOME HELP 新規作成新着記事ツリー表示スレッド表示トピック表示発言ランクファイル一覧検索過去ログ

- Child Tree -