Pergunta : Teclas seguintes e precedentes que não trabalham

Eu adicionei primeiramente, precedente, em seguida e as últimas teclas a minhas janelas dão forma assim que o usuário poderia dar um ciclo através dos registros em uma série de dados.  Mas os campos do formulário não estão atualizando quando as teclas são selecionadas.  Eu falto algo.  Pode alguém por favor ajudar-me?  Agradecer a you. class= > " desobstruído " do
> do " codeSnippet " do class= do
class= " lineNumbers " do
class= do
1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
14:
15:
16:
17:
18:
19:
20:
21:
22:
23:
24:
25:
26:
27:
28:
29:
30:
31:
32:
33:
34:
35:
36:
37:
38:
39:
40:
41:
42:
43:
44:
45:
46:
47:
48:
49:
50:
51:
52:
53:
54:
55:
o class= lstPtName_Click secundário " do id= " codeSnippet791938 do
Private " notpretty " (remetente de ByVal como o objeto, ByVal e como System.EventArgs) segura lstPtName.Click
        LoadPtData ()
        Me.txt NoRecs.Text = Me.BindingContext (dsPatient.Tables (“pacientes”)). Count.ToString
        Me.BindingContext (dsPatient.Tables (“pacientes”)). Posição = 0
        Me.txt CurRec.Text = Me.BindingContext (dsPatient.Tables (“pacientes”)). Posição + 1
    Submarino da extremidade

    O btnNext_Click secundário confidencial (remetente de ByVal como o objeto, ByVal e como System.EventArgs) segura btnNext.Click
        Se Me.BindingContext (dsPatient.Tables (“pacientes”)). Posição < Me.BindingContext (dsPatient.Tables (“pacientes”)). Contagem - 1 então
            Me.BindingContext (dsPatient.Tables (“pacientes”)). Posição = Me.BindingContext (dsPatient.Tables (“pacientes”)). Posição + 1
            Me.txt CurRec.Text = Me.BindingContext (dsPatient.Tables (“pacientes”)). Posição + 1
        Terminar se
    Terminar o submarino

    O btnLast_Click secundário confidencial (remetente de ByVal como o objeto, ByVal e como System.EventArgs) segura btnLast.Click
        Me.BindingContext (dsPatient.Tables (“pacientes”)). Posição = Me.BindingContext (dsPatient.Tables (“pacientes”)). Contagem - 1
        Me.txt CurRec.Text = Me.BindingContext (dsPatient.Tables (“pacientes”)). Posição + 1
    Submarino da extremidade

    O btnPrev_Click secundário confidencial (remetente de ByVal como o objeto, ByVal e como System.EventArgs) segura btnPrev.Click
        Se Me.BindingContext (dsPatient.Tables (“pacientes”)). Posição > 0 então
            Me.BindingContext (dsPatient.Tables (“pacientes”)). Posição = Me.BindingContext (dsPatient.Tables (“pacientes”)). Posição - 1
            Me.txt CurRec.Text = Me.BindingContext (dsPatient.Tables (“pacientes”)). Posição + 1
        Terminar se
    Terminar o submarino

    O btnFirst_Click secundário confidencial (remetente de ByVal como o objeto, ByVal e como System.EventArgs) segura btnFirst.Click
        Me.BindingContext (dsPatient.Tables (“pacientes”)). Posição = 0
        Me.txt CurRec.Text = Me.BindingContext (dsPatient.Tables (“pacientes”)). Posição + 1
    Submarino da extremidade
    LoadPtData secundário ()

        dsPatient.Clear ()
        daPatient não ofuscante como SqlClient.SqlDataAdapter novo (“SELECIONAR * de RawData ONDE PtName = “” & lstPtName.Text & “” “, conexão)

        Tentativa
            conexão. Abrir ()
            dapatient. Encher (dsPatient, “pacientes”)
            conexões. Fecham-se ()
        Prendedor ex como a exceção
            MsgBox (ex. Mensagem)
        Tentativa do fim

        Se txtPtName.DataBindings.Count = 0 então
            txtPtName.DataBindings.Add (“texto”, dsPatient, “Patients.PtName”)
            txtDOB.DataBindings.Add (“texto”, dsPatient, “Patients.PtDOB”, verdadeiro, DataSourceUpdateMode.OnPropertyChanged, nada, “dd MMM, yyyy”)
            txtSex.DataBindings.Add (“texto”, dsPatient, “Patients.PtSex”)
            txtPhys.DataBindings.Add (“texto”, dsPatient, “Patients.PhyName”)
            txtTest.DataBindings.Add (“texto”, dsPatient, “Patients.Test”)
            txtResult.DataBindings.Add (“texto”, dsPatient, “Patients.Result”)
            txtUOM.DataBindings.Add (“texto”, dsPatient, “Patients.UOM”)
            txtCollDate.DataBindings.Add (“texto”, dsPatient, “Patients.CollectDate”, verdadeiro, DataSourceUpdateMode.OnPropertyChanged, nada, “dd MMM, yyyy”)
            txtCollTime.DataBindings.Add (“texto”, dsPatient, “Patients.CollectTime”)
        Terminar se
    Terminar o submarino
class= do

Resposta : Teclas seguintes e precedentes que não trabalham

Ajustes da política do grupo da partilha de ficheiros
Os ajustes da política do grupo associaram com a partilha de ficheiros
Finalidade do ajuste da política do grupo

Impedir que os usuários compartilhem de limas dentro de seu perfil
      

Determina se estão permitidos aos usuários compartilhar de limas dentro de seu perfil a outros usuários em sua rede. A partilha do tipo é permitida somente quando um administrador girou sobre a partilha de ficheiros nesse computador.

Se você permite esta política, os usuários não poderão compartilhar de limas dentro de seu perfil using o feiticeiro de partilha. Também, o feiticeiro de partilha não criará uma parte em %SystemRoot% \ usuários e pode somente ser usado para criar partes de SMB em dobradores.

Se você incapacita ou não configura esta política, a seguir os usuários poderão compartilhar de limas fora de seu perfil de usuário depois que um administrador girou sobre a partilha de ficheiros nesse computador.



Fonte: http://technet.microsoft.com/es-es/library/cc731655%28WS.10%29.aspx
Outras soluções  
 
programming4us programming4us