725 Posted Topics
Re: I helped someone w/a "pig.latin" thread a while ago. Hope it helps. :) [URL="http://www.daniweb.com/software-development/vbnet/threads/347345"]http://www.daniweb.com/software-development/vbnet/threads/347345[/URL] | |
Re: See if this helps. [B]1 ListBox, 1 Button[/B] [CODE] Private Sub Button1_Click(sender As System.Object, e As System.EventArgs) Handles Button1.Click Dim fbd As New FolderBrowserDialog If fbd.ShowDialog = Windows.Forms.DialogResult.OK Then With ListBox1.Items .Clear() getDirectoryList(fbd.SelectedPath, ListBox1) MsgBox("Found.Directory(ies).Count: " & .Count) End With End If End Sub Private Sub getDirectoryList(ByVal selCoolFolderPath As String, … | |
Re: >There is other approach? In your project's Properties/Application tab, locate the "Shutdown Mode:" and set it for "When last form closes". | |
Re: See if this helps. [B]1 Button[/B] [CODE]Public Class Form1 Private sTemp1, sTemp2 As String Private Sub Button1_Click(sender As System.Object, e As System.EventArgs) Handles Button1.Click sTemp1 = "" : sTemp2 = "" Dim fbd As New FolderBrowserDialog With fbd .Description = "Select a folder to copy the content FROM..." If .ShowDialog … | |
Re: See if this helps. [CODE]Public Class Form1 Private WithEvents myCoolTimer1 As New Timer With {.Interval = 100, .Enabled = True} Private Sub Form1_KeyUp(sender As Object, e As System.Windows.Forms.KeyEventArgs) Handles Me.KeyUp If e.KeyCode = Keys.Escape Then Me.Close() '// .Close app. on ESC key. End Sub Private Sub Form1_Load(sender As System.Object, e … | |
Re: [CODE] For Each ctl In New TextBox() {TextBox1, TextBox2, TextBox3} ctl.Clear() Next[/CODE] | |
Re: [CODE]If lstInvisibleTv.Items.Count = lstInvisiblePc.Items.Count +1 Then[/CODE] :) | |
Re: Since "new" to vb.net, see if this helps. [B]1 ListBox, 1 PictureBox[/B] ...and a Folder with a few images. [CODE]Public Class Form1 '// set this Folder to your ImagesFolder. Private myCoolImgsFolder As String = Environment.GetFolderPath(Environment.SpecialFolder.Desktop) & "\.TEMP\just.because\" Private Sub Form1_Load(sender As System.Object, e As System.EventArgs) Handles MyBase.Load With PictureBox1 '// … | |
Re: See if this helps for starters. [B]New Project(2 Buttons, 1 Label, 4 RadioButtons)[/B] [CODE]Public Class Form1 #Region "===----===----===----===----- DECLARATIONS -----===----===----===----===" Public myCoolQuestionsAndAnswersFile As String = Environment.GetFolderPath(Environment.SpecialFolder.Desktop) & "\QandA.txt" '// your File. Private arlQandA As New ArrayList '// store all File.Lines in. Private iSelectedQuestion, iCorrectAnswer As Integer '// set the CurrentQuestion … | |
![]() | Re: Is this for a windows.application or a web.based application? If windows.based, see if this helps. [URL="http://www.daniweb.com/software-development/vbnet/threads/345710/1468687#post1468687"]http://www.daniweb.com/software-development/vbnet/threads/345710/1468687#post1468687[/URL] |
[CODE] With bulbPrgSave1, bulbPrgSave2 .Value = 50 End Wit[/CODE] What would I need to create something as the above and set values to 2+ ProgressBars? A Structure? Property? | |
Re: See if this helps. Place on Form1. [CODE] Private Sub Button1_Click(sender As System.Object, e As System.EventArgs) Handles Button1.Click With Form2 '// shorten code. .TabControl1.SelectedTab = .TabPage2 '// select Tab. .ShowDialog() '// display as MsgBox, not giving access to previous Form until closed. End With End Sub[/CODE] | |
Re: See if this helps. [URL="http://www.daniweb.com/software-development/vbnet/threads/310090/1328780#post1328780"]http://www.daniweb.com/software-development/vbnet/threads/310090/1328780#post1328780[/URL] | |
Re: >>e.g Start with a capital. [CODE] With TextBox1 .Text = StrConv(.Text, VbStrConv.ProperCase) End With[/CODE] | |
Re: I was able to [URL="http://www.codeorder.net/"]load a Form in WebBrowser[/URL].:D (apologies for being off.topic) | |
Re: >>which software i download vb6? or vb studio?... [URL="http://www.microsoft.com/download/en/details.aspx?displaylang=en&id=16057"]Microsoft Visual Studio 2010 Professional Trial - ISO[/URL] | |
Re: See if this helps. [URL="http://www.daniweb.com/software-development/vbnet/threads/328209/1401427#post1401427"]http://www.daniweb.com/software-development/vbnet/threads/328209/1401427#post1401427[/URL] | |
Re: Hope [URL="http://www.codeorder.net/pages/tutorial%20chapter/modules.html"]this [/URL]might provide some light on the matter as well. | |
Re: I do not believe that there is such a Property, unless you create one.:) See if this helps otherwise. [B]3 Panels (including Labels and TextBoxes as your attached images)[/B] [CODE]Public Class Form1 Private iWidth As Integer = 0 '// used to resize. Private Sub Form1_Resize(ByVal sender As Object, ByVal e … | |
Re: See if this helps. [CODE] With ListView1 '// shorten code. If Not .Items.Count = 0 Then '// check if items in ListView. Dim sNameSearch As String = InputBox("Type in the name of the member to search for.", "Search for gym member") '// search ListView for item. Dim foundItem As ListViewItem … | |
Re: [CODE] Dim myCoolBirthday As Date = DateTimePicker1.Value.Date '// selected value from DateTimePicker. Dim currentDate As Date = Today '// value of current date. Dim myAge As Integer = currentDate.Year - myCoolBirthday.Year '// subtract years from current date. MsgBox("My age: " & myAge & vbNewLine & "Just don't tell anyone. :)") … | |
Re: Overlooking your code, I think this might help your little finger from scrolling so much and the rest of the world from not using the electricity to load similar code over and over again. [CODE] Private Sub clearBoxes() boxButton1.Text = "" boxButton2.Text = "" boxButton3.Text = "" boxButton4.Text = "" … | |
Re: I am not quite clear of what you are trying to achieve, except that you want to double click an item in a Listview and get the values of a item and subitems in a row. If I am on the right path, the following code snippet should help. [CODE]Public … | |
Re: Do you mean to run the links/buttons that you added to the .DocumentText? | |
Re: What are loading/logging customers into? A ListView? .If a ListView, easy. Just use one Timer and on each Timer.Tick, loop thruough all items in the ListView and subtract time from time.remaining until at "0". The Timer will do it's own thing and you can always add more time to the … | |
Re: I'm really not sure since I do not bother w/db programming yet, although see if [URL="http://www.daniweb.com/software-development/vbnet/threads/334903/1431047#post1431047"]this [/URL]helps. .That thread link, saves an image to a .txt file and reads it back. Could be possibly done the same w/db, not just a TEMP .txt file, although not sure. Good luck. | |
Re: I would use the _TextChanged Event. [CODE] Private Sub TextBox1_TextChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles TextBox1.TextChanged Dim t As String = TextBox1.Text '// Remaining code here. End Sub[/CODE] | |
Re: Only way I would assume to determine if a file is corrupt, is to compare the contents to it's original file content. Just opinion. | |
Re: Also, check out [URL="http://www.daniweb.com/software-development/vbnet/threads/348154/1478546#post1478546"]this thread[/URL] in case you just need the FileNames, not FullPaths to display in ListBox. | |
Re: [CODE]Dim myStartupFolderPath As String = Environment.GetFolderPath(Environment.SpecialFolder.Startup)[/CODE] | |
Re: Use the _TextChanged event of the ComboBox instead of a Timer. [CODE] Private Sub ComboBox1_TextChanged(ByVal sender As Object, ByVal e As System.EventArgs) Handles ComboBox1.TextChanged '// search code here to populate items. End Sub[/CODE] >>...one would be to display the first and last name in the combo-box if this is possible... … | |
Re: [B]shivya[/B], [B]debasisdas[/B] is quite correct since you did not supply sufficient information regarding your question. To calculate salary, I can start w/hourly wages, overtime, weekends pay, vacation time on/off, bonuses, etc.. You need to supply the required info for your question, not disrespect the ones that offer to help. Question … | |
Re: Seems that you are not storing/saving the updated text. Either save it or store it in a String. [B]2 TextBoxes[/B] (use TextBox1 to type in commands) [CODE]Public Class Form1 Private sUpdateOfTxt2 As String = "updating content" '// stores updated text of TextBox2. Private Sub TextBox1_TextChanged(sender As System.Object, e As System.EventArgs) … | |
Re: See if this helps. [CODE]Public Class Form1 Private isTab1Selected As Boolean = False Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load TabControl1.SelectedIndex = 1 '// select Tab2. End Sub Private Sub TabControl1_SelectedIndexChanged(ByVal sender As Object, ByVal e As System.EventArgs) Handles TabControl1.SelectedIndexChanged With TabControl1 If .SelectedIndex = … | |
Re: See if this helps. [CODE] Dim x As String = "some message" MsgBox(x) '// original String. x = StrReverse(x) MsgBox(x) '// reversed String.[/CODE] | |
Re: See if this helps. [URL="http://www.daniweb.com/software-development/vbnet/threads/342633/1454705#post1454705"]http://www.daniweb.com/software-development/vbnet/threads/342633/1454705#post1454705[/URL] ![]() | |
Re: [CODE] Dim sDate As String = Date.Now.ToString("dd/MM/yyyy - hh:mm tt") MsgBox(sDate)[/CODE] | |
Re: Use the .Tag Property of the selectedTab when navigating to a site, to store the URL in. When switching between tabs, retrieve the .Tag of the selectedTab and display it in your TextBox. Hope this helps. | |
Re: See if this helps. [CODE]Imports System.IO Public Class Form1 Private myFile As String = Environment.GetFolderPath(Environment.SpecialFolder.Desktop) & "\The HONG KONG Test.txt" '// your file. Private arX() As String = Nothing '// String Array to real File into. Private sFileContent As String = Nothing '// String to rewrite content back to file … | |
Re: [CODE] If Not reader.HasRows Then MsgBox("Data does not exist") Else MsgBox("Data Exists") Exit Sub '// skip all remaining code in the Sub. End If[/CODE] | |
Re: See if this helps. [B]Form99:[/B] [CODE]Public Class Form99 Public selForm As Form = Nothing Private Sub frm99_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load Me.TextBox1.Text = CType(selForm.Controls("TextBox1"), TextBox).Text Me.TextBox2.Text = CType(selForm.Controls("TextBox2"), TextBox).Text End Sub End Class[/CODE] [B]All other Forms:[/B] [CODE] With Form99 .selForm = Me .Show() End With[/CODE] | |
Re: Refresh how? Clear values in TextBoxes/Controls or just [iCODE]Me.Refresh()[/iCODE]? | |
Re: q.q.(quick question) Do you only need to kill.processes if your app. is active or can it run in the background and kill.processes if certain keys are pressed? | |
Re: [CODE]Public Class frm99 Public sNameOfForm As String = Nothing Private Sub frm99_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load MsgBox(sNameOfForm) End Sub End Class[/CODE] And for all other Forms: [CODE] Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click With frm99 .sNameOfForm = Me.Name .Show() … | |
Re: [QUOTE=lolafuertes;1629493] Synthax for a method: [CODE]Sub Methodname ' ' Place your method here ' End Sub[/CODE] ...[/QUOTE] [B]lolafuertes[/B], in your previous post, you mentioned "Sub [B]Method[/B]name". Being a hobbyist programmer, I really have no use to learn all those fancy words, I just learn what I need to learn. Since … ![]() | |
Re: See if this helps. [CODE]Public Class Form1 Private Sub Form1_KeyDown(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyEventArgs) Handles Me.KeyDown If e.Alt AndAlso e.KeyCode = Keys.C Then MsgBox("tada") End Sub Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load Me.KeyPreview = True '// keep focus of Keys on … | |
Re: See if this helps. [CODE]Public Class Form1 Private myFile As String = Environment.GetFolderPath(Environment.SpecialFolder.Desktop) & "\New.txt" Private arFileContent() As String = Nothing Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click If File.Exists(myFile) Then arFileContent = File.ReadAllLines(myFile) '// load file lines into Array. Kill(myFile) '// delete file. MsgBox(arFileContent(0)) … | |
Re: [CODE] If i > 10 Then Nextform.Show() Timer1.Stop() Me.Close '// Close current Form. End If[/CODE] | |
Re: Confusing question; care to share more in depth detailed info? | |
Re: You more than likely have to login into PayPal, navigate to the proper page, then extract data if the page has the balance on it. .This can easily be done with a WebBrowser. |
The End.