Comments by 555336 (Top 73 by date)

Of course man, and believe me, it creates the text file if it does not exist even I used Append. I'm posting this to confirm from you all as I want all opinions.

I have not yet known the StreamWriter functions that's why I asked this quiestion.

I find it cool then if Appen can create as we may not implement a code to know if the file exist do not create or if not exists, create. I mean we may not use both Create and Append when one of them is doing both jobs.

I have a problem on Deployment, can you help me here?

http://www.codeproject.com/Questions/189310/Setup-and-Deployment-in-VB-net.aspx

where to insert that? in my form?

You mean add an icon to it? When I right click on both User's program menu and User's desktop, on the property?

By the way, I don't need an icon, but when I click on the icon after installing it, it is the folder where it is stored in the Program files in drive C which is opening.

I will not be able to implement it right now, but tell me, so Append also creates then even you have not put the Create in your code?

Yes I did implement my code for buttons. But as I said, when the user erase or delete with keyboard or mouse, the button does not return disabled as the field is blank when he does that.

The name checkboxes can be changed, I changed mine.

B

Nope does not work. I forgot to say that I have a pretext also on my textbox only.

But I'm a beginner and my program is very simple. Just a form to fill some fields and save to a text file that's all. But as you said, the code I implemented above is right, so I prefer to leave it like this.

I did this:

Using textfilestream As System.IO.TextWriter = System.IO.File.AppendText("C:\test.txt")
textfilestream.WriteLine("xxx")
textfilestream.Flush()
MessageBox.Show("xx")
End Using

Yes I included it and the warning disappeared. thank you.

i got the answer on MSDN. I just add Using and End using with and remove the DIM :) finally it works. Thank you all. Your answers also are good when I was searching.

Read the warning it is giving me in the question below.

How to do that? I'm new in Vb.net Here is my full code of it: Dim textfilestream As System.IO.TextWriter textfilestream = System.IO.File.AppendText("C:\Test.txt") textfilestream.WriteLine("xxxx") textfilestream.Flush() MessageBox.Show("You saved your work!")

here is the code:

Dim textfilestream As System.IO.TextWriter
textfilestream = System.IO.File.AppendText("C:Test.txt")
textfilestream.WriteLine("xxxxx")
textfilestream.Flush()

What you mean?

no you have not understood, i thought the numeric accepts only numbers that it is generated, but in reality when you are typing on it, it seems it is accepting . and '

here is my code, still have problem when the message box stops, it displays all the forms together. All I want is when the message box stops, then it display the first form then stop to display the second then stop to display the last. The first form must stay for 3 seconds on the screen, then after 3 seconds the second appears then after 5 seconds the last appears.


Private Sub frmblabla_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load

tmrnote.Start()


Private Sub tmrnote_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles tmrnote.Tick

Static iCount As Integer
If iCount < 10 Then MsgBox("I got you!", vbCritical, "LOL")
iCount = iCount + 1
tmrnote.Stop()
If iCount < 100 Then i1.Show()
iCount = iCount + 3
tmrnote.Stop()
If iCount < 100 Then i2.Show()
iCount = iCount + 5
tmrnote.Stop()
End Sub
End Class

but my interval in the timer's properties will remain 100 as default right?

but when it stops, i want to make another form to appear, how to do that?

IT WORKS NOW :) THANK YOU!

No its the same. Ok, I will explain well.

I have a combobox which has 3 items namely Red, Blue, Black and Green. When Red or Blue is selected, the maskedtextbox is disabled else it is enabled for the other colours if selected.

when I select Red or Blue, the maskedtextbox is disabled, good, but the problem is I still can't save as even disabled when selected these colours, i get the message box to prompt me to fill it.

i did mtxtime.maskcompleted = false and it works

but the problem, i have a combobox where a specific item is selected, the masktextbox should be disabled automatically. however, when im doing what you told me, it is not letting me save now as it is recognising that the masttextbox is blank even disabled.

i did mtxttime.maskcompleted = ""

is it good?

lol thank you I did it before you replied lol. i used my brain :)

yes...have to show that to my lecturer.

is in this problem lol

i will contact you soon by your email, because i have to discuss that with my lecturer about your codes etc... in fact many friends are the same boat, o doubt our lecturer must intervene now.

if the code above is good, then it is the same dear.. All i want is if the Search has not found any results, at least it could display all letters and sentence which are related.

yes...it would be great if we contact through email.

By the way, I think i have not put some details in my explanation, well normally, if the search query cannot find a result, atleast it gives a messagebox saying "We have not found your results but we are giving you some suggestions", then it gives all letters and sentences related to the search

well, I tested it, for example if im searching the word 'Love' in my text

wait wait wait dear...i think its good...im testing it again then tell you...

ok I made a new project, where a form
Now where to insert the SoundexLibrary.vb?

i have read your codes dear... if you can, just tell me what you included in the form in terms of objects and i will rebuit the application again and paste the code in VB 2005.

oh no lol, i have VB 2005 and it is not opened! :( by the way, can you just paste the code here?

Well, I changed it...here the code below and tell me if it is good because it is the same as results.

Dim wordsSearch() As String = txtSearch.Text.ToLower.Split(" ")
Dim lines() As String = IO.File.ReadAllLines("c:\test.txt")
Dim PointsArray(lines.Length - 1) As Integer
Dim wordToSearch As String

'Set all values to 0
For count2 As Integer = 0 To PointsArray.Length - 1
PointsArray(count2) = 0
Next

'Search in text
For x As Integer = 0 To lines.Length - 1
Dim words() As String = lines(x).Split(" ")
For a As Integer = 0 To wordsSearch.Length - 1
wordToSearch = wordsSearch(a)
For y As Integer = 0 To words.Length - 1
If 0 <= words(y).Length - wordToSearch.Length And (words(y).Length - wordToSearch.Length) < 2 Then 'The length of the word may be 1 element 1 longer (e.g. a "." or a "?")
Dim counter As Integer = 0
For z As Integer = 0 To wordToSearch.Length - 1

If words(y).Substring(z, 1) = wordToSearch.Substring(z, 1) Then
counter += 1
If words(y).length - 1 = z Then
End If
Next
If counter > wordToSearch.Length - 2 Then
PointsArray(x) += 1
End If
End If
Next
Next
Next

'Make a list with all the lines
Dim ArrayLines(lines.Length - 1) As Integer

For x As Integer = 0 To lines.Length - 1
ArrayLines(x) = x
Next

'Sort: 'Implemented from wiki - http://nl.wikipedia.org/wiki/Bubblesort
Dim i As Integer
Dim v As Boolean
Dim j As Integer
Dim temp As Integer
Dim temp2 As Integer
Dim count As Integer = PointsArray.Length - 1

i = 0
v = True
Do While i < count - 1 And v = True
v = False
j = 0
Do While j <= count - i - 1
If PointsArray(j) > PointsArray(j + 1) Then
temp = PointsArray(j)
PointsArray(j) = PointsArray(j + 1)
PointsArray(j + 1) = temp
'Sort also the array with the lines....
temp2 = ArrayLines(j)
ArrayLines(j) = ArrayLines(j + 1)
ArrayLines(j + 1) = temp2
v = True
End If
j = j + 1
Loop
i = i + 1
Loop

'Now, we can show the result (Say, only the first 5)
Dim results As Integer = PointsArray.Length - 6
If results < 0 Then
results = 0
End If
For i = PointsArray.Length - 1 To results Step -1
If PointsArray(i) = 0 Then 'If the line has no "points"
Exit For
End If
txtNew.Text += "Line nr. " + ArrayLines(i).ToString + " :" + lines(ArrayLines(i)) + vbNewLine
Next

Ok thank you I will do it in the next hours then will tell you.

Ok I will add it in some minutes. Im having a break. I will tell u then.

Yes I tried the code by pasting directly and no errors found but i dont know where to insert a code or modify the current one to search the text in my text file and where to insert the code to display the results in my textbox

The solution 3 seems good for me, but don't know where to insert the code to search the text file in my drive c and to display the results in the textbox. What you think of Soundex? I just read it 15 minutes ago.

Hi Henry thank for posting, as I said I'm new in VB since 2 weeks, by the way can you help me how and where to insert the code where to search from my text file in drive C? and also where to insert the code to appear the results on a text box?

If I change 0 to -1, you mean everything on the code must change?

By the way I'm new in VB since 2 weeks. So understanding these codes fluently is quite difficult for me. Can I have your email? I have 2 small problems related to search items, I can give you my email.

it says "Split" is not a member of an array, underline by the blue colour, only this, why?

this sentence is underlined: IO.File.ReadAllLines("c:\test.txt").Split

I'm getting the blue underline on the section where you stated "line.count" and "words.count". sorry im new in VB and it it is telling me that they are not a member in array. what should i insert so that the blue underline is removed?

Can you implement it with an array for me? Im new in VB.

Yes...I did see this tutorial, the onlu thing is that this code will be in the btnOK event where the user has to click on it and get the results, but the only problem I'm having, I dont know know how to do a code for the textbox where the user will put a word then click on the button to search.

that

Well the word "love" is only an example, the user can search other words also! I don't know how to put the coding.

Imagine there is search box (textbox), and below there are a search button
Thank you!

ok I will post it soon. thanks man

If I didn't try, I would not post it here man!

I want a code with string arrays.

Hi, by the way I have already managed and I did it. Thank you for your time and help friend. However, Im having immense difficulties doing a search box.

Well, I have to do a search textbox, which will be based on two categories of search.

When a user makes a query, he has to get results from a text file in the drive C.

I included a combobox with two items namely: Product and All categories.

How to do a code, when the user will select "Product" on the combobox, he has to get the results on a richtextbox included in the form? The search box also should have a feature where if the the user mmakes a misspelling mistake, he will get the results as well.

Can you help me in terms of streamreader on itt as it must read the text file in the drive C.

Thank you

:) By the way, do you know how to create a search box in Visual Basic? I want the search box based on streamreader. In proper terms, when I will input a text, it has to read on a text file in drice C. I know the streamreader code but don't know the code to do a search.

Hey friend, I did it, yes, I managed and finally got the good code by playing on the event. Look what I put:

End Select

Does not work dear, my codes below:


End Select

I must get this code because I will use the same procedure when I will do a form which will include 3 categories of search in one. And what's disturbing, there is no tutorial on how to do a search box on youtube and internet. The search should take information from the streamwriter text file. I think I will do it by the streamreader method, but don't know to do a search. I'm so poor in programming.

Thank you

Oh no sorry dear, even when I write only one item, it disables the masktextbox completely.

Hel

Well here are properties for combobox and maskedtextbox below:

Combobox: cboType
Maskedtextbox: txtCost

I included what you said, but it is is still enable when choosing an item in t



Why it is not functioning?

Well I have a combobox with 3 items namely: Product Size and Cost.

I have also a maskedtextbox.

If I select "Product" and "Size" on the combobox, I want to disable the maskedtextbox from filling, how must I do it?

THANK YOU IT WORKS. Can you help me in a last problem?

Visual Basic

Hello, I tried the above examples and they work thank you. But there is a problem, I have included a combobox, numecicupanddown and a maskedtextbox as well.

However, I am having difficulties when doing the coding for the three above. For example, my combo box is 'cboDrawer', so when I do:

If Not cboDrawer.Text = " " Then
btnSave.Enabled = True
End If

it does not work, as there is no 'Text' after I put the 'cboDrawer.' compared to the other textboxes. For numericupanddown and maskdtextbox also the same.

How to do that?