Solved

Visual Basic 6 to VB.NET advice (desktop apps) !

Posted on 2008-10-09
4
223 Views
Last Modified: 2013-11-26
Are there many hurdles to overcome moving to .NET.  Im fine with OO coding as i have used java before.  In VB6/VBA i was using DAO to access databases and compiling to an exectuable was easy for distribution my questions are:

What access methods are availble/recommended in .NET for database access / reading in csv files?
How easy is it to compile all classes and code into a exectuable for distribution?
Is UserIntfaces just as easy to setup ie drag and drop

Your help is much appreaciated

Dave
0
Comment
Question by:david_88
  • 2
4 Comments
 
LVL 53

Expert Comment

by:Dhaest
ID: 22677529
In vb.net, there is a new technology, called ado.net for interaction with a database.
http://www.aspfree.com/c/a/.NET/An-introduction-to-ADONET/
http://www.startvbdotnet.com/ado/default.aspx
0
 
LVL 53

Accepted Solution

by:
Dhaest earned 250 total points
ID: 22677543
>> How easy is it to compile all classes and code into a exectuable for distribution?
Deploying applications
http://www.startvbdotnet.com/extras/deploy.aspx

>> UserIntfaces just as easy to setup ie drag and drop
Almost the same way of working like vb6
0
 
LVL 2

Assisted Solution

by:MTEXX
MTEXX earned 250 total points
ID: 22679307
Here's a quick CSV reader I use.
Notice it is simply a shared (read static in VB6) function in a class.  EVERYTHING in .net is in a class.
Imports System.IO
 
Public Class Csv
    ''' <summary>
    ''' Reads a CSV formatted file and returns a two-dimensional non-jagged array.
    ''' </summary>
    ''' <param name="filespec">The file to read.</param>
    ''' <param name="performTrim">If enabled, fields are trimmed after parsing.</param>
    ''' <param name="remark">A remark token, usually "'" or "REM"</param>
    ''' <returns>A two-dimensional non-jagged array of strings.</returns>
    ''' <remarks></remarks>
    Public Shared Function read(ByVal filespec As String, Optional ByVal performTrim As Boolean = True, Optional ByVal remark As String = Nothing) As String()()
        Dim content As String
        Dim sReader As StreamReader
        Try
            sReader = New StreamReader(filespec)
            content = sReader.ReadToEnd()
            sReader.Close()
        Catch Ex As Exception
            Return Nothing
        End Try
 
        Dim lines() As String = content.Split(vbCrLf)
        Dim retval(0)() As String
        Dim firstFlag As Boolean = True
 
        For i As Integer = LBound(lines) To UBound(lines)
            If (lines(i) = "") Then Continue For
            If (remark IsNot Nothing AndAlso remark <> "" AndAlso lines(i).Trim.StartsWith(remark)) Then Continue For
            Dim words() As String = lines(i).Split(",")
            If (performTrim) Then
                For j As Integer = LBound(words) To UBound(words)
                    words(j) = words(j).Trim
                Next
            End If
            If (firstFlag) Then
                firstFlag = False
            Else
                ReDim Preserve retval(UBound(retval) + 1)
            End If
            retval(UBound(retval)) = words
        Next
        Return retval
    End Function
End Class

Open in new window

0
 

Author Closing Comment

by:david_88
ID: 31504604
Brilliant just what i need thanks
0

Featured Post

DevOps Toolchain Recommendations

Read this Gartner Research Note and discover how your IT organization can automate and optimize DevOps processes using a toolchain architecture.

Question has a verified solution.

If you are experiencing a similar issue, please ask a related question

It’s quite interesting for me as I worked with Excel using vb.net for some time. Here are some topics which I know want to share with others whom this might help. First of all if you are working with Excel then you need to Download the Following …
Real-time is more about the business, not the technology. In day-to-day life, to make real-time decisions like buying or investing, business needs the latest information(e.g. Gold Rate/Stock Rate). Unlike traditional days, you need not wait for a fe…
Windows 10 is mostly good. However the one thing that annoys me is how many clicks you have to do to dial a VPN connection. You have to go to settings from the start menu, (2 clicks), Network and Internet (1 click), Click VPN (another click) then fi…
Microsoft Active Directory, the widely used IT infrastructure, is known for its high risk of credential theft. The best way to test your Active Directory’s vulnerabilities to pass-the-ticket, pass-the-hash, privilege escalation, and malware attacks …

772 members asked questions and received personalized solutions in the past 7 days.

Join the community of 500,000 technology professionals and ask your questions.

Join & Ask a Question