{"id":19861,"date":"2022-11-07T23:12:16","date_gmt":"2022-11-07T17:42:16","guid":{"rendered":"https:\/\/jassweb.com\/solved\/solved-vb6-to-vb-net-conversion-syntax-print-to-streamwriter-reader-closed\/"},"modified":"2022-11-07T23:12:16","modified_gmt":"2022-11-07T17:42:16","slug":"solved-vb6-to-vb-net-conversion-syntax-print-to-streamwriter-reader-closed","status":"publish","type":"post","link":"https:\/\/jassweb.com\/solved\/solved-vb6-to-vb-net-conversion-syntax-print-to-streamwriter-reader-closed\/","title":{"rendered":"[Solved] VB6 to VB.NET conversion (Syntax : Print to StreamWriter\/Reader)? [closed]"},"content":{"rendered":"

[ad_1]
\n<\/p>\n

\n
\n
<\/div>\n
\n
\n

The ampersand, &<\/code>, is the concatenation character for vb.net. Although the plus sign will usually work, if numbers are involved you could get unexpected results.<\/p>\n

Streams must be disposed to released unmanaged resources. Using...End Using<\/code> blocks take care of this for us.<\/p>\n

I made filePath<\/code> a class level variable because it is used in more than one method. This must also be Shared<\/code> because it is used in Shared<\/code> methods. I changed the format of date so it will appear chronologically in File Explorer.<\/p>\n

It makes no sense to read the log and do nothing with it. I changed the ReadLog<\/code> method to a Function<\/code>. It also makes no sense to pass a string to it.<\/p>\n

I believe the vb6 code was trying to express elapsed time in seconds with the 24 60 60 business. I gave you an example of that with the Form.Load<\/code> setting the startTime<\/code> and then hitting a button some time later and calculating the seconds that had passed.<\/p>\n

In the form class…<\/p>\n

Private StartTime As DateTime\n\nPrivate Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load\n    StartTime = Now\nEnd Sub\n\nPrivate Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click\n    FileIO.WriteLog(TextBox1.Text)\nEnd Sub\n\nPrivate Sub Button2_Click(sender As Object, e As EventArgs) Handles Button2.Click\n    TextBox2.Text = FileIO.ReadLog\nEnd Sub\n\nPrivate Sub Button3_Click(sender As Object, e As EventArgs) Handles Button3.Click\n    Dim elapsedTime As TimeSpan = Now - StartTime\n    Dim TotalSeconds = elapsedTime.TotalSeconds\n    MessageBox.Show($\"The elapsed time since the program started is {TotalSeconds}\")\nEnd Sub\n<\/code><\/pre>\n
Your class would look like this…<\/p>\n
Public Class FileIO\n    Private Shared filePath As String = AppDomain.CurrentDomain.BaseDirectory & \"\\WisysDataCollector_\" & Format(Now, \"yyyyMMdd\") & \".log\"\n\n    Public Shared Sub WriteLog(strToWrite As String)\n        Using sw = File.AppendText(filePath)\n            sw.WriteLine(strToWrite)\n        End Using\n    End Sub\n\n    Public Shared Function ReadLog() As String\n        If File.Exists(filePath) Then\n            Return File.ReadAllText(filePath)\n        Else\n            Return \"\"\n        End If\n    End Function\nEnd Class\n<\/code><\/pre>\n<\/p><\/div>\n
<\/div>\n<\/div>\n
            <\/span> <\/p><\/div>\n<\/div>\n
[ad_2]<\/p>\n
solved VB6 to VB.NET conversion (Syntax : Print to StreamWriter\/Reader)? [closed] <\/p>\n","protected":false},"excerpt":{"rendered":"
[ad_1] The ampersand, &, is the concatenation character for vb.net. Although the plus sign will usually work, if numbers are involved you could get unexpected results. Streams must be disposed to released unmanaged resources. Using…End Using blocks take care of this for us. I made filePath a class level variable because it is used in … Read more<\/a><\/p>\n","protected":false},"author":1,"featured_media":0,"comment_status":"closed","ping_status":"closed","sticky":false,"template":"","format":"standard","meta":{"footnotes":""},"categories":[320],"tags":[353,2922],"class_list":["post-19861","post","type-post","status-publish","format-standard","hentry","category-solved","tag-vb-net","tag-vb6-migration"],"yoast_head":"\n[Solved] VB6 to VB.NET conversion (Syntax : Print to StreamWriter\/Reader)? [closed] - JassWeb<\/title>\n<meta name=\"robots\" content=\"index, follow, max-snippet:-1, max-image-preview:large, max-video-preview:-1\" \/>\n<link rel=\"canonical\" href=\"https:\/\/jassweb.com\/solved\/solved-vb6-to-vb-net-conversion-syntax-print-to-streamwriter-reader-closed\/\" \/>\n<meta property=\"og:locale\" content=\"en_US\" \/>\n<meta property=\"og:type\" content=\"article\" \/>\n<meta property=\"og:title\" content=\"[Solved] VB6 to VB.NET conversion (Syntax : Print to StreamWriter\/Reader)? [closed] - JassWeb\" \/>\n<meta property=\"og:description\" content=\"[ad_1] The ampersand, &, is the concatenation character for vb.net. Although the plus sign will usually work, if numbers are involved you could get unexpected results. Streams must be disposed to released unmanaged resources. Using...End Using blocks take care of this for us. I made filePath a class level variable because it is used in ... Read more\" \/>\n<meta property=\"og:url\" content=\"https:\/\/jassweb.com\/solved\/solved-vb6-to-vb-net-conversion-syntax-print-to-streamwriter-reader-closed\/\" \/>\n<meta property=\"og:site_name\" content=\"JassWeb\" \/>\n<meta property=\"article:published_time\" content=\"2022-11-07T17:42:16+00:00\" \/>\n<meta name=\"author\" content=\"Kirat\" \/>\n<meta name=\"twitter:card\" content=\"summary_large_image\" \/>\n<meta name=\"twitter:label1\" content=\"Written by\" \/>\n\t<meta name=\"twitter:data1\" content=\"Kirat\" \/>\n\t<meta name=\"twitter:label2\" content=\"Est. reading time\" \/>\n\t<meta name=\"twitter:data2\" content=\"2 minutes\" \/>\n<script type=\"application\/ld+json\" class=\"yoast-schema-graph\">{\"@context\":\"https:\/\/schema.org\",\"@graph\":[{\"@type\":\"Article\",\"@id\":\"https:\/\/jassweb.com\/solved\/solved-vb6-to-vb-net-conversion-syntax-print-to-streamwriter-reader-closed\/#article\",\"isPartOf\":{\"@id\":\"https:\/\/jassweb.com\/solved\/solved-vb6-to-vb-net-conversion-syntax-print-to-streamwriter-reader-closed\/\"},\"author\":{\"name\":\"Kirat\",\"@id\":\"https:\/\/jassweb.com\/solved\/#\/schema\/person\/65c9c7b7958150c0dc8371fa35dd7c31\"},\"headline\":\"[Solved] VB6 to VB.NET conversion (Syntax : Print to StreamWriter\/Reader)? [closed]\",\"datePublished\":\"2022-11-07T17:42:16+00:00\",\"mainEntityOfPage\":{\"@id\":\"https:\/\/jassweb.com\/solved\/solved-vb6-to-vb-net-conversion-syntax-print-to-streamwriter-reader-closed\/\"},\"wordCount\":187,\"publisher\":{\"@id\":\"https:\/\/jassweb.com\/solved\/#organization\"},\"keywords\":[\"vb.net\",\"vb6-migration\"],\"articleSection\":[\"Solved\"],\"inLanguage\":\"en-US\"},{\"@type\":\"WebPage\",\"@id\":\"https:\/\/jassweb.com\/solved\/solved-vb6-to-vb-net-conversion-syntax-print-to-streamwriter-reader-closed\/\",\"url\":\"https:\/\/jassweb.com\/solved\/solved-vb6-to-vb-net-conversion-syntax-print-to-streamwriter-reader-closed\/\",\"name\":\"[Solved] VB6 to VB.NET conversion (Syntax : Print to StreamWriter\/Reader)? [closed] - JassWeb\",\"isPartOf\":{\"@id\":\"https:\/\/jassweb.com\/solved\/#website\"},\"datePublished\":\"2022-11-07T17:42:16+00:00\",\"breadcrumb\":{\"@id\":\"https:\/\/jassweb.com\/solved\/solved-vb6-to-vb-net-conversion-syntax-print-to-streamwriter-reader-closed\/#breadcrumb\"},\"inLanguage\":\"en-US\",\"potentialAction\":[{\"@type\":\"ReadAction\",\"target\":[\"https:\/\/jassweb.com\/solved\/solved-vb6-to-vb-net-conversion-syntax-print-to-streamwriter-reader-closed\/\"]}]},{\"@type\":\"BreadcrumbList\",\"@id\":\"https:\/\/jassweb.com\/solved\/solved-vb6-to-vb-net-conversion-syntax-print-to-streamwriter-reader-closed\/#breadcrumb\",\"itemListElement\":[{\"@type\":\"ListItem\",\"position\":1,\"name\":\"Home\",\"item\":\"https:\/\/jassweb.com\/solved\/\"},{\"@type\":\"ListItem\",\"position\":2,\"name\":\"[Solved] VB6 to VB.NET conversion (Syntax : Print to StreamWriter\/Reader)? [closed]\"}]},{\"@type\":\"WebSite\",\"@id\":\"https:\/\/jassweb.com\/solved\/#website\",\"url\":\"https:\/\/jassweb.com\/solved\/\",\"name\":\"JassWeb\",\"description\":\"Build High-quality Websites\",\"publisher\":{\"@id\":\"https:\/\/jassweb.com\/solved\/#organization\"},\"potentialAction\":[{\"@type\":\"SearchAction\",\"target\":{\"@type\":\"EntryPoint\",\"urlTemplate\":\"https:\/\/jassweb.com\/solved\/?s={search_term_string}\"},\"query-input\":{\"@type\":\"PropertyValueSpecification\",\"valueRequired\":true,\"valueName\":\"search_term_string\"}}],\"inLanguage\":\"en-US\"},{\"@type\":\"Organization\",\"@id\":\"https:\/\/jassweb.com\/solved\/#organization\",\"name\":\"Jass Web\",\"url\":\"https:\/\/jassweb.com\/solved\/\",\"logo\":{\"@type\":\"ImageObject\",\"inLanguage\":\"en-US\",\"@id\":\"https:\/\/jassweb.com\/solved\/#\/schema\/logo\/image\/\",\"url\":\"https:\/\/jassweb.com\/wp-content\/uploads\/2021\/02\/jass-website-logo-1.png\",\"contentUrl\":\"https:\/\/jassweb.com\/wp-content\/uploads\/2021\/02\/jass-website-logo-1.png\",\"width\":693,\"height\":132,\"caption\":\"Jass Web\"},\"image\":{\"@id\":\"https:\/\/jassweb.com\/solved\/#\/schema\/logo\/image\/\"}},{\"@type\":\"Person\",\"@id\":\"https:\/\/jassweb.com\/solved\/#\/schema\/person\/65c9c7b7958150c0dc8371fa35dd7c31\",\"name\":\"Kirat\",\"image\":{\"@type\":\"ImageObject\",\"inLanguage\":\"en-US\",\"@id\":\"https:\/\/jassweb.com\/solved\/#\/schema\/person\/image\/\",\"url\":\"https:\/\/jassweb.com\/solved\/wp-content\/litespeed\/avatar\/1261af3c9451399fa1336d28b98ea3bb.jpg?ver=1775798750\",\"contentUrl\":\"https:\/\/jassweb.com\/solved\/wp-content\/litespeed\/avatar\/1261af3c9451399fa1336d28b98ea3bb.jpg?ver=1775798750\",\"caption\":\"Kirat\"},\"sameAs\":[\"http:\/\/jassweb.com\"],\"url\":\"https:\/\/jassweb.com\/solved\/author\/jaspritsinghghumangmail-com\/\"}]}<\/script>\n<!-- \/ Yoast SEO plugin. -->","yoast_head_json":{"title":"[Solved] VB6 to VB.NET conversion (Syntax : Print to StreamWriter\/Reader)? [closed] - JassWeb","robots":{"index":"index","follow":"follow","max-snippet":"max-snippet:-1","max-image-preview":"max-image-preview:large","max-video-preview":"max-video-preview:-1"},"canonical":"https:\/\/jassweb.com\/solved\/solved-vb6-to-vb-net-conversion-syntax-print-to-streamwriter-reader-closed\/","og_locale":"en_US","og_type":"article","og_title":"[Solved] VB6 to VB.NET conversion (Syntax : Print to StreamWriter\/Reader)? [closed] - JassWeb","og_description":"[ad_1] The ampersand, &, is the concatenation character for vb.net. Although the plus sign will usually work, if numbers are involved you could get unexpected results. Streams must be disposed to released unmanaged resources. Using...End Using blocks take care of this for us. I made filePath a class level variable because it is used in ... Read more","og_url":"https:\/\/jassweb.com\/solved\/solved-vb6-to-vb-net-conversion-syntax-print-to-streamwriter-reader-closed\/","og_site_name":"JassWeb","article_published_time":"2022-11-07T17:42:16+00:00","author":"Kirat","twitter_card":"summary_large_image","twitter_misc":{"Written by":"Kirat","Est. reading time":"2 minutes"},"schema":{"@context":"https:\/\/schema.org","@graph":[{"@type":"Article","@id":"https:\/\/jassweb.com\/solved\/solved-vb6-to-vb-net-conversion-syntax-print-to-streamwriter-reader-closed\/#article","isPartOf":{"@id":"https:\/\/jassweb.com\/solved\/solved-vb6-to-vb-net-conversion-syntax-print-to-streamwriter-reader-closed\/"},"author":{"name":"Kirat","@id":"https:\/\/jassweb.com\/solved\/#\/schema\/person\/65c9c7b7958150c0dc8371fa35dd7c31"},"headline":"[Solved] VB6 to VB.NET conversion (Syntax : Print to StreamWriter\/Reader)? [closed]","datePublished":"2022-11-07T17:42:16+00:00","mainEntityOfPage":{"@id":"https:\/\/jassweb.com\/solved\/solved-vb6-to-vb-net-conversion-syntax-print-to-streamwriter-reader-closed\/"},"wordCount":187,"publisher":{"@id":"https:\/\/jassweb.com\/solved\/#organization"},"keywords":["vb.net","vb6-migration"],"articleSection":["Solved"],"inLanguage":"en-US"},{"@type":"WebPage","@id":"https:\/\/jassweb.com\/solved\/solved-vb6-to-vb-net-conversion-syntax-print-to-streamwriter-reader-closed\/","url":"https:\/\/jassweb.com\/solved\/solved-vb6-to-vb-net-conversion-syntax-print-to-streamwriter-reader-closed\/","name":"[Solved] VB6 to VB.NET conversion (Syntax : Print to StreamWriter\/Reader)? [closed] - JassWeb","isPartOf":{"@id":"https:\/\/jassweb.com\/solved\/#website"},"datePublished":"2022-11-07T17:42:16+00:00","breadcrumb":{"@id":"https:\/\/jassweb.com\/solved\/solved-vb6-to-vb-net-conversion-syntax-print-to-streamwriter-reader-closed\/#breadcrumb"},"inLanguage":"en-US","potentialAction":[{"@type":"ReadAction","target":["https:\/\/jassweb.com\/solved\/solved-vb6-to-vb-net-conversion-syntax-print-to-streamwriter-reader-closed\/"]}]},{"@type":"BreadcrumbList","@id":"https:\/\/jassweb.com\/solved\/solved-vb6-to-vb-net-conversion-syntax-print-to-streamwriter-reader-closed\/#breadcrumb","itemListElement":[{"@type":"ListItem","position":1,"name":"Home","item":"https:\/\/jassweb.com\/solved\/"},{"@type":"ListItem","position":2,"name":"[Solved] VB6 to VB.NET conversion (Syntax : Print to StreamWriter\/Reader)? [closed]"}]},{"@type":"WebSite","@id":"https:\/\/jassweb.com\/solved\/#website","url":"https:\/\/jassweb.com\/solved\/","name":"JassWeb","description":"Build High-quality Websites","publisher":{"@id":"https:\/\/jassweb.com\/solved\/#organization"},"potentialAction":[{"@type":"SearchAction","target":{"@type":"EntryPoint","urlTemplate":"https:\/\/jassweb.com\/solved\/?s={search_term_string}"},"query-input":{"@type":"PropertyValueSpecification","valueRequired":true,"valueName":"search_term_string"}}],"inLanguage":"en-US"},{"@type":"Organization","@id":"https:\/\/jassweb.com\/solved\/#organization","name":"Jass Web","url":"https:\/\/jassweb.com\/solved\/","logo":{"@type":"ImageObject","inLanguage":"en-US","@id":"https:\/\/jassweb.com\/solved\/#\/schema\/logo\/image\/","url":"https:\/\/jassweb.com\/wp-content\/uploads\/2021\/02\/jass-website-logo-1.png","contentUrl":"https:\/\/jassweb.com\/wp-content\/uploads\/2021\/02\/jass-website-logo-1.png","width":693,"height":132,"caption":"Jass Web"},"image":{"@id":"https:\/\/jassweb.com\/solved\/#\/schema\/logo\/image\/"}},{"@type":"Person","@id":"https:\/\/jassweb.com\/solved\/#\/schema\/person\/65c9c7b7958150c0dc8371fa35dd7c31","name":"Kirat","image":{"@type":"ImageObject","inLanguage":"en-US","@id":"https:\/\/jassweb.com\/solved\/#\/schema\/person\/image\/","url":"https:\/\/jassweb.com\/solved\/wp-content\/litespeed\/avatar\/1261af3c9451399fa1336d28b98ea3bb.jpg?ver=1775798750","contentUrl":"https:\/\/jassweb.com\/solved\/wp-content\/litespeed\/avatar\/1261af3c9451399fa1336d28b98ea3bb.jpg?ver=1775798750","caption":"Kirat"},"sameAs":["http:\/\/jassweb.com"],"url":"https:\/\/jassweb.com\/solved\/author\/jaspritsinghghumangmail-com\/"}]}},"_links":{"self":[{"href":"https:\/\/jassweb.com\/solved\/wp-json\/wp\/v2\/posts\/19861","targetHints":{"allow":["GET"]}}],"collection":[{"href":"https:\/\/jassweb.com\/solved\/wp-json\/wp\/v2\/posts"}],"about":[{"href":"https:\/\/jassweb.com\/solved\/wp-json\/wp\/v2\/types\/post"}],"author":[{"embeddable":true,"href":"https:\/\/jassweb.com\/solved\/wp-json\/wp\/v2\/users\/1"}],"replies":[{"embeddable":true,"href":"https:\/\/jassweb.com\/solved\/wp-json\/wp\/v2\/comments?post=19861"}],"version-history":[{"count":0,"href":"https:\/\/jassweb.com\/solved\/wp-json\/wp\/v2\/posts\/19861\/revisions"}],"wp:attachment":[{"href":"https:\/\/jassweb.com\/solved\/wp-json\/wp\/v2\/media?parent=19861"}],"wp:term":[{"taxonomy":"category","embeddable":true,"href":"https:\/\/jassweb.com\/solved\/wp-json\/wp\/v2\/categories?post=19861"},{"taxonomy":"post_tag","embeddable":true,"href":"https:\/\/jassweb.com\/solved\/wp-json\/wp\/v2\/tags?post=19861"}],"curies":[{"name":"wp","href":"https:\/\/api.w.org\/{rel}","templated":true}]}}