- Upvotes Received
- 0
- Posts with Upvotes
- 0
- Upvoting Members
- 0
- Downvotes Received
- 1
- Posts with Downvotes
- 1
- Downvoting Members
- 1
7 Posted Topics
If this doesn’t help you, please explain your question in more detail [CODE] Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click Dim fbd As New FolderBrowserDialog If fbd.ShowDialog = Windows.Forms.DialogResult.OK Then Console.WriteLine("Selected FolderPath: " & fbd.SelectedPath) IO.File.Create(fbd.SelectedPath & "\Test.txt") Console.WriteLine(fbd.SelectedPath & "\Test.txt Created") End If End …
[CODE] Private Sub TextBox1_[B]KeyPress[/B](ByVal sender As System.Object, ByVal e As System.Windows.Forms.KeyPressEventArgs) Handles TextBox1.KeyPress [B]If e.KeyChar = Chr(13) Then TextBox1.Visible = False[/B] End Sub[/CODE]
Make sure that all your Country DropDownItems CheckOnClick is True [CODE] ' M A I N M E N U S T R I P ' File (mnuFile) ' ' ' Exit (mnuExit) ' Country (mnuCountries) ' ' ' South Africa ' ' ' Afghanistan ' ' ' New Zealand …
' Working with and around the bug ' Remove some code redundancy with a function [CODE] Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click Dim cd As New ColorDialog If cd.ShowDialog = Windows.Forms.DialogResult.OK Then ChangeTextboxForeColor(txt1, cd.Color) ChangeTextboxForeColor(txt2, cd.Color) ChangeTextboxForeColor(txt3, cd.Color) End If End Sub Private Sub …
[CODE] Public Class Form1 Dim Count As Integer Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click Count = 10 ' Edit this value With Timer1 .Interval = 1000 ' 1 sec .Enabled = True ' Start Timer End With End Sub Private Sub Timer1_Tick(ByVal sender As …
Remember to step backwards through the controls, otherwise you will get index out of range error. This code also test if the current control is a TextBox for when you have different controls in that panel1 container. [CODE] For i As Integer = Panel1.Controls.Count - 1 To 0 Step -1 …
vb.net: I have a task to take the given xsd file and use that to validate my generated xml file. But now this xsd file has complex type attributes and I cant get to append this complex type to my declared xmlnode. [U]My Code:[/U] [CODE]Dim namespaceURI As String = "http://www.blabla.za" …
The End.
L0u3