????? ??????? ????? ????? Visual Basic

?????? ????????? ?????? ?????????
???? ???????: 317885 - ??? ???????? ???? ????? ????? ??? ???????.
????? ???? | ?? ????

?? ??? ??????

??????

???? ??? ??????? ???? ????? ??? ????? ????? ???? ????? Visual Basic 6.0? ?????? ?? ??????? ??? Visual Basic .NET ?? 2005 Visual Basic ???????? ????? ????? Visual Basic ?? Visual Studio.net ?? ?? Visual Studio 2005.

?????? ??? ????? ????? ????? Visual Basic.net ?? Visual ???????.net ??????.

?????? ??? ?? ????? Visual Basic 2005 ????? ??????? ?? ????????? ??????? ?? Visual Basic.

???????

??? ??????? ??????? ??????? ?????? ??? ?????? ?????? ??????? ??????? ????????? ???????? ???? ?????? ??????:
  • Microsoft Windows 2000 Professional (?? ????)? ?? Microsoft Windows XP Professional (?? ????) ??.net Framework ?????
  • Microsoft Visual Basic 6.0
  • Microsoft SQL Server 7.0 ?? ?????? ?? Northwind ????? ????????? ???????? ???????? ???? ???? ???????? ????? ??????
??????? ??????? ????????:
  • ????? ????? ????? ??????? ???????? ??? ? visual Basic 6.0

?????? Visual Basic ????? ?????

???? ??????? ??????? ????? ????? ????? Visual Basic ????? ????? 6.0? ?????? ?? ??????? ???.net Visual Basic ?? Visual Basic 2005 ???????? ????? ????? Visual Basic ?? Visual Studio.net ?? ?? Visual Studio 2005:
  1. ?? ??????? ???? ? ??? ??? ???????? ???? ??? Microsoft Visual Studio 6.0? ??? ???? ??? Microsoft Visual Basic 6.0.
  2. ?? ???? ?????? ????? ???? ? ???? ??? EXE ?????? ??? ?? ???? ??? ???.
  3. ?????? ??????? ????? ?? ??? ??????? ADO ???????? ?????? ???????? ?? ???? ?????? ??????? ?? FlexGrid ?????? Microsoft ???? ??????. ?? ??? ????? ?? ???? ?????? ????? ? Form1? ??????????.
  4. ?? ???? ??? ??? ????? ???????? ?? ??????? ??? ? ???? ??? ???? ???????.
  5. ?? ???? ???????? ??? MSHFlexGrid ?? ??????? ??? ???? ???? ???????. ??? ????? ?? ????? ?????? ?? ??????? ???? ??.

    ??????: ??? ?? ????? ??? MSHFlexGrid ?? ????? ???????? ??????? ??? ???? ???????. ???? ????? ?????? ???? ???????? ?? ???? ??? ????????. ?? ???? ?????? ???????? ? ???? ?????? Microsoft ?????? FlexGrid ?????? 6.0 (OLEDB) ?? ????? ???????? ????????? ??? ?? ???? ??? ?????.
  6. ?? ???? ???????? ??? CommandButton ??? ??????? ?????? MSHFlexGrid. ?? ????? ????? ??????? ????? ?????? ????? ? ???? ?????.
  7. ???? ????? ?????? mADO??? ?? ???? ??? ??? ????????? ????????. ????? ???????? ???????? ???????? ???? ???? ?????? ????? ????? ?????? ? ????? ????? ???? ????? ??? ???? ???????? ?? ???? " ???????? " ????? ?????? Northwind.

    ??????: ?? ????? ????????? ???????? ???????? ??? ????? ???? ???????? =<username></username> ? ???? ?????? =<strong password=""></strong> ????? ???????. ???? ?? ?? ???? ???????? ???? ???????? ???????? ?????? ??? ??????? ??? ????? ????????.
    Private Sub Command1_Click()
        Unload Me
    End Sub
    
    Private Sub Form_Load()
        Dim cn As Connection
        Set cn = New Connection
        cn.ConnectionString = "Provider=sqloledb;Data Source=localhost;database=northwind;user id=<username>;password=<strong password>"
        cn.Open
        
        Dim rs As Recordset
        Set rs = New Recordset
        rs.CursorLocation = adUseClient
        rs.Open "select * from products", cn
        
        Set MSHFlexGrid1.DataSource = rs
    End Sub
    					
  8. ???? CTRL + S ???? ???????. ?? ??????? ??? ? ???? ??? ??? ????. ?? ???? ?????? ??? ???? ? ???? ??? ???.
  9. ?? "?????? ????????"? ?? ?????? ?????? ??? ????? 1????? ??? ?????? ??? ???? ??? ???????. ???? ??? ???.
  10. ?? ??? ????? ???? ?????? ????? ? ???? ????????????.
  11. ?? ???? ???????? ?? ???? ???? ??? ???????. ?? ??? ???? ? ???? ??? ?????? ????? ?????? ??? ??????? ???.
  12. ??? CommandButton ???? ???? ????. ?? ????? ????? ??????? ????? ?????? ????? ? ???? ????.
  13. ?? ???? CommandButton ??? ???????. ?? ????? ????? ??????? ????? ?????? ????? ? ???? ???.
  14. ???? ????? ?????? ??????????????? ?? ???? ??? ??? ????????? ????????. ??? ???????? ???????? ??????? ? CommandButton ???? ??? ?????. ?????? ??? ????? ????? ?????? ??? ?????? ??? ???? ?????:
    Private Sub Command1_Click()
        Clipboard.SetText Text1.SelText
    End Sub
    
    Private Sub Command2_Click()
        Text1.SelText = Clipboard.GetText
    End Sub
    					
  15. ???? CTRL + S ???? ???????.
  16. ??????? ?????? ????? ?? ????? ??????? ???????. ?? "?????? ????????"? ?? ?????? ?????? ??? ????? 1????? ??? ?????? ???? ??? ???????? ??? ???? ??? ???.
  17. ?? ??? ????? ???? ?????? ????? ? ???? frmMain.
  18. ?? ???? ???????? ??? CommandButton ??? ??????? frmMain. ?? ????? ????? ??????? ????? ?????? ????? ? ???? ADO.
  19. ?? ???? CommandButton ??? ???????. ?? ????? ????? ??????? ????? ?????? ????? ? ???? ???????.
  20. ???? ????? ?????? frmMain??? ?? ???? ??? ??? ????????? ????????. ???????? ???? ??? ??? ????????? ???????? ??????? ? CommandButton ??? ????? ??????? ??????:
    Private Sub Command1_Click()
        frmADO.Show
    End Sub
    
    Private Sub Command2_Click()
        frmClipboard.Show
    End Sub
    					
  21. ???? CTRL + S ???? ???????.
  22. ?? "?????? ??????"? ?? ?????? ?????? ??? ????? 1? ??? ?? ???? ??? ????? ????? 1. ?? ????? " ???? ??? ??????? "? ???? ??? frmMain??? ?? ???? ??? ?????.
  23. ?????? ???? ??? ?????? ADO? ??? ??????? ????? ? ???? " ?????". ?? ????? ??????? ????????? ???? ?????? ????? ?????? ?????? Microsoft ActiveX (??? ???? ?? ????? 2.0 ?? ????? ????). ???? ??? ?????.
  24. ?????? ???????? ?? ??????? ??? ? ???? ??? ???? Project1.exe. ???? ??? ????? ?? ???? ?????? ????? ????? (???? ??? ????? ?????????).
  25. ???? F5 ?????? ??????? ?? ??? ???????.

    ??????: ?? ????? ?????? ?? ?? Visual Basic ??????? ??? ????? ??????? ??? ??? ????? ??? ???????.
  26. ?? ?????? ???? ????? Visual Basic. ?? ???????? ???? ????????? ??? ???????? ???? ??? ???. ??????? ????? ????????? ??? ???? ???????.
  27. ?? ??????? ???? ? ??? ??? ???????? ???? ??? Microsoft Visual Studio.net? ??? ???? ??? Microsoft Visual Studio.net.
  28. ?? ???? "????"? ???? ??? ??? ???????. ??? ???? ?????? ???? ????? ??? ????? Visual Basic 6.0 ????? ???? ?????? ???? (???? ": ????? ???????? ?????????? ???????" Studio\VB98). ???? ??? Project1.vdp??? ?? ???? ??? ???.
  29. ???? visual Studio.net ??? Visual ??????? ??????? ???????? ????? ????? ????? ????? Visual Basic. ???? ??????? ??? ??? ???? ??? ??? ????? ?? ???? ??????? ??? ??? ???????:
    • ????? ????? ???? ??? ??????? ?????? ?? ??????? ??? ?????.
    • ???? ????? ??????? ?????? ??? ????? ???????.
    • ????? ????? ????? ???? ???? ?????? ??????? ???? ???? ????? ????? ????????? ???? ?? ??????? ?????.

  30. ???? ??? ?????? ?? ???? ?? ???? ?? ??????? ??? ???? ????? ???????. ????? ?????? ????? 30-60 ????? ?????? ????? ???????.
  31. ?? "?????? ??????"? ???? ????? ??????? ??? _UpgradeReport.htm. ???? ??? ??????? ????? ???????. ???? ?? ???? ??????? ?? ??? ???????????? ??????? ???? ??? ?????.
  32. ?? ?????? frmClipboard.vb ???? ???????. ?? ?? ??????? Clipboard.SetText ? GetText ???? ????. ???? ??? ?????????? ???????? ?? ??? ???? ????? ????? ????????.
  33. ?? "?????? ??????"? ???? ????? ???? ??????? ??? ????? ??????? ???????? ???? ???? ????? ??. frm ??? -vb.
  34. ?? ?????? ???????. ???? ??? ????? ??? ???? ???????? ???????? ???????? ???????? Visual Basic ? ADO ??????? ??? ??????? ????????.
  35. ?? ?????? ?????? ??? ?? ??? ?? ??????? ??? ?? ???? ??? ??? ????????? ????????. ?? ?????? ??????? ??? ??????? . ???? ??? ????? ????? ????? Visual Studio.net ?? Visual Studio 2005 ????? ??????? ?????????? ??????? ???????? ???????? ???? ?? ??????.
  36. ?? "?????? ??????"? ???? ????? ?????? frmClipboard.vb? ??? ?? ???? ??? ??? ????????? ????????. ???? ??? ???? ??????? ???? ??? ?????? ???? ??? ???????.
  37. ????? ??????? Command1_Click ? Command2_Click ??? ???:
    Private Sub Command1_Click(ByVal eventSender As System.Object, _
        ByVal eventArgs As System.EventArgs) Handles Command1.Click
            Clipboard.SetDataObject(Text1.Text)
        End Sub
    
        Private Sub Command2_Click(ByVal eventSender As System.Object, _
        ByVal eventArgs As System.EventArgs) Handles Command2.Click
            Text1.SelectedText = _
                Clipboard.GetDataObject().GetData(GetType(System.String))
        End Sub
    					

???? ??? ??????? ???????

????? ??? ????????? ???????? (frmADO.frm)

Private Sub Command1_Click()
    Unload Me
End Sub

Private Sub Form_Load()
    Dim cn As Connection
    Set cn = New Connection
    cn.ConnectionString = "Provider=sqloledb;Data Source=localhost;database=northwind;user id=<username>;password=<strong password>"
    cn.Open
    
    Dim rs As Recordset
    Set rs = New Recordset
    rs.CursorLocation = adUseClient
    rs.Open "select * from products", cn
    
    Set MSHFlexGrid1.DataSource = rs
End Sub
				

????? ??? ????????? ???????? (frmClipboard.frm)

Private Sub Command1_Click()
    Clipboard.SetText Text1.SelText
End Sub

Private Sub Command2_Click()
    Text1.SelText = Clipboard.GetText
End Sub

Complete Code Listing (frmMain.frm)
Private Sub Command1_Click()
    frmADO.Show
End Sub

Private Sub Command2_Click()
    frmClipboard.Show
End Sub
				

???? ?? ?? ???? ???????

  1. ???? F5 ?????? ???????.
  2. ??? ??????? ???? ???????? ???? ??? ?????.
  3. ?? Form1? ???? ??? ADO. ???? ????? ????? ??? ???????? ?? ????. ?? ?????? ??? ???????.
  4. ?? Form1? ???? ??? ???????.
  5. ???? ??? ???.
  6. ?? ???? ??????? ?? ???? ???? ?? ????? ????? ?? ???? ??? ???. ??? ?? ????? ???? ??????.

??????? ??????? ????????

.NET Visual Basic ???? ???? ?? ????????? ??????? ?? ? visual Basic. ?????? ?? ????????? ??? ????? ????? ????? ?? ???????? ??? ???????. ?????? ??? ??????? ??????? ?????? ??? ??????? ?? ?????? ??? ????? ???? ?????:
??????? ?????? ???????? ??? ???????

?????

????? ?? ?????????? ???? ??? Microsoft Developer ??????? ?????? ?????? (MSDN):
????? ????????? Visual Basic 6.0 ??????? ??? Basic.NET ???????

????? ????????? ???? ?? ??????? ?? ????????? ??????? ?? Visual Basic

???????

???? ???????: 317885 - ????? ??? ??????: 12/?????/1433 - ??????: 1.0
????? ???
  • Microsoft Visual Basic 2005
  • Microsoft Visual Basic .NET 2003 Standard Edition
  • Microsoft Visual Basic .NET 2002 Standard Edition
  • Microsoft Visual Basic 6.0 Professional Edition
  • Microsoft .NET Framework 1.1
????? ??????: 
kbvs2005swept kbvs2005applies kbmigration kbhowtomaster kbmt KB317885 KbMtar
????? ????
???: ??? ????? ??? ?????? ???????? ?????? ????? ???? ????? ?????????? ????? ?? ????????? ?????? ????. ???? ???? ?????????? ???? ?? ???????? ???????? ?????? ????????? ????? ????????? ???????? ????? ???????? ?????? ?? ?????? ??? ?? ???????? ???????? ?? ????? ??????? ?????? ??? ??????? ?????? ??. ?????? ?? ???? ??? ??????? ???????? ????? ?? ???? ????? ?????? ??? ????? ??? ????? ??????? ?? ????? ?? ?????? ??? ??? ??????? ??????? ?? ????? ????? ????? ????? ?????. ?? ????? ???? ?????????? ??????? ??? ????? ?? ??????? ?? ????? ?????? ?? ??? ????? ?? ????? ??????? ?? ???????? ?? ??? ???????. ???? ???? ?????????? ???????? ??? ????? ?????? ??????? ??????
???? ??? ????? ??????? ?????? ??????????317885

????? ???????

 

Contact us for more help

Contact us for more help
Connect with Answer Desk for expert help.
Get more support from smallbusiness.support.microsoft.com