C# と VB.NET の質問掲示板

■No13695 (しほちゃん★ さん) に返信
> textboxに入力したshohinCDからSELECT文でレコードを検索してレコードが２個以上の時に
> ポップアップ画面がshowdialogされます。

IntelliSense や、AutoComple 、あるいは google サジェストのようなものかな?

TextBox の KeyPress や TextChanged などから、入力と同時に、
リアルタイム検索で表示されるような物を連想しました。


>  　(3) UserControlText 上の Text1　　です。
> なのでどのUsercontrolのtext１からshowされたかが必要になりました
であれば、Text1 自身のインスタンスは、すぐに得られますよね。
あとは、その Parent を辿れば、UserControl のインスタンスも得られるので、
「名称」に頼る必要も無くなるかと。


>>アクティブかどうかは関係無く、単に名称を得たいだけなら、そのコントロール自身は、
>>　Me.Name
> コントロールの名前（UserControltext）はとれるのですが
> Formにはりついた名称はとれません。（UserControltext１〜６の名称）

…? おかしいですね。
"UserControltext" を得るのであれば、Me.GetType().Name とせねばならないハズですが。

下記の UserControl を貼り付けて、ダブルクリックしてみてください。
コントロールの名前が得られませんか?

Public Class UserControltext

    Private Sub UserControltext_DoubleClick( _
        ByVal sender As Object, _
        ByVal e As EventArgs) Handles Me.DoubleClick

        MsgBox("名前=" & Me.Name & vbCrLf & "型名=" & Me.GetType().Name)
    End Sub

    Private Sub UserControltext_Load( _
        ByVal sender As Object, _
        ByVal e As EventArgs) Handles Me.Load
        Me.BackColor = Color.ForestGreen
    End Sub
End Class


> 予測ですが二回目もUsercontroltext1.text１からshowdialogされた状態になっています。
「予測」でコーディングするのは危険な気がしますが…。

■No43524 (がながな さん) に返信
> dim SyouhinID as long
お使いのデータベースが分からないので、何とも言えませんが、
本当に Long 型が必要なのでしょうか?
（9桁程度までの数値であれば、Integer で収まるはずです）


ちなみに Jet Provider は、64bit整数型をサポートしていません。
数値は、Decimal型、Integer(Int32)型、Double型などにマッピングされます。

SQL Server の場合には、int 型が Integer、bigint 型は Long に相当します。


> '//---商品IDがNULLの時
> If rsASO("商品ID") Is System.DBNull.Value Then

これは実際の値ではなく、Field オブジェクトを返しますので、DBNull にはなりえません。
rsASO("商品ID") は、rsASO.Fields("商品ID") の省略表記であって、
rsASO("商品ID").Value とは異なる事に注意してください。


実際の値を調べるのであれば、
　rsASO.Fields("商品ID").Value
もしくは
　rsASO.Collect("商品ID")
を利用してください。これらであれば、実際の値が返されます。

なお、Field オブジェクトを変数にキャッシュしない場合には、
Collect プロパティを使った方が、Value プロパティよりも効率が良いとされています。