{"id":109,"date":"2013-12-03T13:43:37","date_gmt":"2013-12-03T18:43:37","guid":{"rendered":"http:\/\/passionwind.com\/techref\/?p=109"},"modified":"2013-12-03T13:43:37","modified_gmt":"2013-12-03T18:43:37","slug":"generate-random-string","status":"publish","type":"post","link":"http:\/\/techref.camellarry.com\/?p=109","title":{"rendered":"Generate Random String"},"content":{"rendered":"<p><a href=\"http:\/\/passionwind.com\/techref\/wp-content\/uploads\/2013\/12\/randomstring.jpg\"><img loading=\"lazy\" decoding=\"async\" class=\"alignnone size-medium wp-image-110\" alt=\"randomstring\" src=\"http:\/\/passionwind.com\/techref\/wp-content\/uploads\/2013\/12\/randomstring-300x114.jpg\" width=\"300\" height=\"114\" \/><\/a><\/p>\n<p>&nbsp;<\/p>\n<div><span style=\"font-family: 'courier new', courier;\">Imports System.Text<\/span><\/div>\n<div><span style=\"font-family: 'courier new', courier;\">\u00a0<\/span><\/div>\n<div><span style=\"font-family: 'courier new', courier;\">Public Class Form1<\/span><\/div>\n<div><span style=\"font-family: 'courier new', courier;\">\u00a0<\/span><\/div>\n<div><span style=\"font-family: 'courier new', courier;\">\u00a0 Private Sub Button1_Click(sender As System.Object, e As System.EventArgs) Handles Button1.Click<\/span><\/div>\n<div><span style=\"font-family: 'courier new', courier;\">\u00a0 \u00a0 Dim s As String = &#8220;ABCDEFGHIJKLMNOPQRSTUVWXYZ0123456789abcdefghijklmnopqrstuvwxyz&#8221;<\/span><\/div>\n<div><span style=\"font-family: 'courier new', courier;\">\u00a0 \u00a0 Dim r As New Random<\/span><\/div>\n<div><span style=\"font-family: 'courier new', courier;\">\u00a0 \u00a0 Dim sb As New StringBuilder<\/span><\/div>\n<div><span style=\"font-family: 'courier new', courier;\">\u00a0<\/span><\/div>\n<div><span style=\"font-family: 'courier new', courier;\">\u00a0 \u00a0 For i As Integer = 1 To 8<\/span><\/div>\n<div><span style=\"font-family: 'courier new', courier;\">\u00a0 \u00a0 \u00a0 Dim idx As Integer = r.Next(0, 61)<\/span><\/div>\n<div><span style=\"font-family: 'courier new', courier;\">\u00a0 \u00a0 \u00a0 sb.Append(s.Substring(idx, 1))<\/span><\/div>\n<div><span style=\"font-family: 'courier new', courier;\">\u00a0 \u00a0 Next<\/span><\/div>\n<div><span style=\"font-family: 'courier new', courier;\">\u00a0<\/span><\/div>\n<div><span style=\"font-family: 'courier new', courier;\">\u00a0 \u00a0 TextBox1.Text = sb.ToString<\/span><\/div>\n<div><span style=\"font-family: 'courier new', courier;\">\u00a0 End Sub<\/span><\/div>\n<div><span style=\"font-family: 'courier new', courier;\">End Class<\/span><\/div>\n","protected":false},"excerpt":{"rendered":"<p>&nbsp; Imports System.Text \u00a0 Public Class Form1 \u00a0 \u00a0 Private Sub Button1_Click(sender As System.Object, e As System.EventArgs) Handles Button1.Click \u00a0 \u00a0 Dim s As String = &#8220;ABCDEFGHIJKLMNOPQRSTUVWXYZ0123456789abcdefghijklmnopqrstuvwxyz&#8221; \u00a0 \u00a0 Dim r As New Random \u00a0 \u00a0 Dim sb As New StringBuilder \u00a0 \u00a0 \u00a0 For i As Integer = 1 To 8 \u00a0 \u00a0 \u00a0 [&hellip;]<\/p>\n","protected":false},"author":1,"featured_media":0,"comment_status":"open","ping_status":"open","sticky":false,"template":"","format":"standard","meta":{"jetpack_post_was_ever_published":false,"_jetpack_newsletter_access":"","_jetpack_dont_email_post_to_subs":false,"_jetpack_newsletter_tier_id":0,"_jetpack_memberships_contains_paywalled_content":false,"_jetpack_memberships_contains_paid_content":false,"footnotes":"","jetpack_publicize_message":"","jetpack_publicize_feature_enabled":true,"jetpack_social_post_already_shared":false,"jetpack_social_options":{"image_generator_settings":{"template":"highway","default_image_id":0,"font":"","enabled":false},"version":2}},"categories":[9],"tags":[12,15,29,45,58,74,77,78,80],"class_list":["post-109","post","type-post","status-publish","format-standard","hentry","category-vb-net","tag-net","tag-application","tag-example","tag-microsoft","tag-programming","tag-tutorial","tag-vb-net","tag-visualbasic","tag-windows"],"jetpack_publicize_connections":[],"jetpack_featured_media_url":"","jetpack_sharing_enabled":true,"jetpack_shortlink":"https:\/\/wp.me\/p9t3oE-1L","_links":{"self":[{"href":"http:\/\/techref.camellarry.com\/index.php?rest_route=\/wp\/v2\/posts\/109","targetHints":{"allow":["GET"]}}],"collection":[{"href":"http:\/\/techref.camellarry.com\/index.php?rest_route=\/wp\/v2\/posts"}],"about":[{"href":"http:\/\/techref.camellarry.com\/index.php?rest_route=\/wp\/v2\/types\/post"}],"author":[{"embeddable":true,"href":"http:\/\/techref.camellarry.com\/index.php?rest_route=\/wp\/v2\/users\/1"}],"replies":[{"embeddable":true,"href":"http:\/\/techref.camellarry.com\/index.php?rest_route=%2Fwp%2Fv2%2Fcomments&post=109"}],"version-history":[{"count":3,"href":"http:\/\/techref.camellarry.com\/index.php?rest_route=\/wp\/v2\/posts\/109\/revisions"}],"predecessor-version":[{"id":253,"href":"http:\/\/techref.camellarry.com\/index.php?rest_route=\/wp\/v2\/posts\/109\/revisions\/253"}],"wp:attachment":[{"href":"http:\/\/techref.camellarry.com\/index.php?rest_route=%2Fwp%2Fv2%2Fmedia&parent=109"}],"wp:term":[{"taxonomy":"category","embeddable":true,"href":"http:\/\/techref.camellarry.com\/index.php?rest_route=%2Fwp%2Fv2%2Fcategories&post=109"},{"taxonomy":"post_tag","embeddable":true,"href":"http:\/\/techref.camellarry.com\/index.php?rest_route=%2Fwp%2Fv2%2Ftags&post=109"}],"curies":[{"name":"wp","href":"https:\/\/api.w.org\/{rel}","templated":true}]}}