0

私には2つのフォームがあります。1 つは InvoiceEntry で、もう 1 つは ListofSuppliers です。InvoiceEntry.ListofSuppliers にはコントロール「txtsnam」があり、サプライヤーのすべての名前を持つ Datagrid が含まれています。ユーザーがこのテキスト ボックスで f9 キーを押すと、ListofSupplier フォームが開きます。ユーザーはグリッドからサプライヤーの名前を選択し、Enter キーを押します。このプレスで、「txtsnam」にサプライヤーの名前を渡したいと入力します。このコードを使用しましたが、うまくいきません：

InvoiceEntry:

Private Sub txtsnam_KeyDown(sender As Object, e As System.Windows.Forms.KeyEventArgs) Handles txtsnam.KeyDown`
       If e.KeyCode = Keys.F9 Then
            Dim lov As New SupplierLOV
            lov.ShowDialog()
        End If
End Sub

サプライヤーのリスト:

Private Sub RadGridView1_KeyDown(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyEventArgs) Handles RadGridView1.KeyDown
If e.keycode=keys.Enter then
   InvoiceEntry.txtsnam.text=RadGridView1.CurrentRow.Cells(0).Value.ToString
  End If
End Sub

私もプロパティの助けを借りて試しましたが、うまくいきません。ブレークポイントを 2 行目に配置すると、bt テキストが txtsnam に表示されません

4

2 に答える 2

0

これを試して

Private Sub RadGridView1_KeyDown(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyEventArgs) Handles RadGridView1.KeyDown
If e.keycode=keys.Enter then
   InvoiceEntry.txtsnam.text=RadGridView1.Currentcell.value
  End If
End Sub
于 2013-05-21T08:51:20.920 に答える