|
In that case you could use one of two workarounds:
1. The AchoiceWasMade boolean, to check whether the selected index was changed by the user. That way you circumvent the event firing twice.
or
2. Change the display value to include a number, for example the way you did in the original problem description: John (1) and John (2).
So you make the display value unique, and it would only make things clearer for the user.
My advice is free, and you may get what you paid for.
|
|
|
|
|
I like your first option - If I cant get it to work, i'll have to use the second option.
Thanks for the replies.
|
|
|
|
|
No problem.
P.S. The SelectedIndexChanged event may also fire when you start your application.
My advice is free, and you may get what you paid for.
|
|
|
|
|
I found a solution that works perfectly - instead of using SelectedIndexChange event, I used SelectionChangeCommitted event to trigger my refresh. So now it only refreshes when I actually click on a item in the combobox - which is exactly what i want.
|
|
|
|
|
Hello Every body,
I am trying to send data to server using post method. but this is showing "The Remote Server Returned an error :(411) Length Required". When i used get method to send data, then it is just send only 255 character.
i read that, using post method you can send unlimited data.
my data may be 255 character and i am sending data as a parameter like below.
Try
myUri = New Uri("https://www.mywebsite.com/apis/ConfirmContactUpdated.cfm?APIServiceTag=" & APIServiceTag.Trim & "&APISessionTag=" & AutheniticateSession & "&APIContactTag=" & myds.Tables(0).Rows(i)("tbl_All_Contact_List.ServiceTag").ToString.Trim & "&APIContactUpdatedBoolean=False" & "&APIContactUpdatedDateTime=" & myds.Tables(0).Rows(i)("tbl_All_Contact_List.LastUpdate").ToString.Trim & "&APIUpdateNotesBoolean=True&APINotesLastChangedDateTime=" & myds.Tables(0).Rows(i)("tbl_All_Contact_List.NotesLastUpdate").ToString.Trim & "&APINotesText=" & myds.Tables(0).Rows(i)("Updated_Note").ToString.Trim)
Dim reader As StreamReader
request = DirectCast(Net.WebRequest.Create(myUri), HttpWebRequest)
request.Method = "POST" '"GET"
request.ContentLength = myds.Tables(0).Rows(i)("Updated_Note").ToString.Trim.Length + 100
Try
response = DirectCast(request.GetResponse(), HttpWebResponse)
reader = New StreamReader(response.GetResponseStream())
Catch ex As System.Exception
MsgBox(ex.Message.ToString)
End Try
Can anybody send me example with source code so that i can check where i m wrong. Or plese review this code.
I am using vb.net 2005.
Thakns in advancd.
Regards
DC
|
|
|
|
|
May be for you can be interesting to read this:
http://www.checkupdown.com/status/E411.html
|
|
|
|
|
hello,
First of all thanks for reply...
I have solve this problem and solution is
Dim oWeb As New System.Net.WebClient()
oWeb.Headers.Add("Content-Type", "application/x-www-form-urlencoded")
Try
Dim bytRetData As Byte() = oWeb.UploadData(myUri, "POST", requestBytes)
Catch ex As System.Exception
MsgBox(ex.Message.ToString)
Finally
oWeb.Dispose()
End Try
Regards
DC 
|
|
|
|
|
OK, I have multiple controls hidden on my form. I want to show them, based on the combo box selection. In other words if the user selects SelectedIndex 0, then I want to show the first row of controls, SelectedIndex 1, the first row and the second row of controls. I'm having trouble doing this in an efficient manner. I know I can just bludgeon the code into doing this by just typing my code over and over again, but I feel this can be achieved more efficiently and I'm looking for help. I'm new to programming and I'm trying to learn by building my own project. Thank you, here is an example of the code I have so far...
'Show the rows selected based on the number chosen by the user
Select Case CInt(cboFundSelector.SelectedIndex)
Case 0
lblUnits.Visible = True
lblPrice.Visible = True
txtNameofFund1.Visible = True
txtUnits1.Visible = True
txtPrice1.Visible = True
lblFund1Total.Visible = True
Case 1
lblUnits.Visible = True
lblPrice.Visible = True
txtNameofFund1.Visible = True
txtUnits1.Visible = True
txtPrice1.Visible = True
lblFund1Total.Visible = True
txtNameofFund2.Visible = True
txtUnits2.Visible = True
txtPrice2.Visible = True
lblFund2Total.Visible = True
|
|
|
|
|
Your best bet is to do this with a loop. Create some sort of template for rows of data, such as a gridview. Then once you know how many rows to show, iterate over that number of rows and make them visible.
Christian Graus
Driven to the arms of OSX by Vista.
Read my blog to find out how I've worked around bugs in Microsoft tools and frameworks.
|
|
|
|
|
Their are several ways to do this
1)
Use the Tag Property of the controls let's suppose Put "1" in controls where your case is 1
and put the following code
For Each Control As System.Windows.Forms.Control In Me.Controls
If TypeOf Control Is TextBox Then
If Control.Tag = "1" Then
Control.Visible = False
End If
End If
Next
2).
You can also use the GroupBox Control and can set its visibility to true and False if your controls are in one order/Sequence rather then doing whole controls
Best Of Regards,
SOFTDEV
Sad like books with torn pages, sad like unfinished stories ...
|
|
|
|
|
A better way would be to group the controls in different panels and toggle the visibility of panel according to the selection.
|
|
|
|
|
write a windows application that allows the user to enter
a seven-digit number in a multiple line textbox
when the user clicks the generate words button.I changed as much code I have yesterday but it is not generating words can anyone help me
[code]
Partial Class Form1
Inherits System.Windows.Forms.Form
Public Numbers(7, 3) As String
Public Phonenumber As Integer
Public output As String
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Numbers(0, 0) = "A"
Numbers(0, 1) = "B" '2
Numbers(0, 2) = "C" '2
Numbers(1, 0) = "D" '3
Numbers(1, 1) = "E" '3
Numbers(1, 2) = "F" '3
Numbers(2, 0) = "G" '4
Numbers(2, 1) = "H" '4
Numbers(2, 2) = "I" '4
Numbers(3, 0) = "J" '5
Numbers(3, 1) = "K" '5
Numbers(3, 2) = "L" '5
Numbers(4, 0) = "M" '6
Numbers(4, 1) = "N" '6
Numbers(4, 2) = "O" '6
Numbers(5, 0) = "P" '7
Numbers(5, 1) = "R" '7
Numbers(5, 2) = "S" '7
Numbers(6, 0) = "T" '8
Numbers(6, 1) = "U" '8
Numbers(6, 2) = "V" '8
Numbers(7, 0) = "W" '9
Numbers(7, 1) = "X" '9
Numbers(7, 2) = "Y" '9
End Sub
Private Sub GenerateButton_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles GenerateButton.Click
Dim phoneNumber As String = GetNumber()
'check if the number contains 0 or 1
While phoneNumber.Contains("0") Or phoneNumber.Contains("1")
phoneNumber = GetNumber()
End While
'create a hashtable to hold the digits
Dim arrayL As New Hashtable
Dim x As Integer = 1
For i As Integer = 65 To 90 Step 3
arrayL.Add(x, New Char() {Chr(i), Chr(i + 1), Chr(i + 2)})
x += 1
Next
Dim word As String = ""
'creates only 3 words out of the phonenumber
For i As Integer = 0 To 2
For Each s As String In phoneNumber
word = word & DirectCast(arrayL.Item(CInt(s)), Char())(i).ToString
Next
Next
output = PhoneNumberWordsListBox.Text
End Sub
Private Sub PhoneNumberTextBox_TextChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles PhoneNumberTextBox.TextChanged
Phonenumber = PhoneNumberTextBox.Text
End Sub
Private Function GetNumber() As String
Return PhoneNumberTextBox.Text()
End Function
End Class
[/code]
|
|
|
|
|
Please confirm that what you want to do is:
User types "123" into textbox (but 7 digits not 3)
Clicks button
Output is "one two three"
Is that correct?
Henry Minute
Do not read medical books! You could die of a misprint. - Mark Twain
Girl: (staring) "Why do you need an icy cucumber?"
“I want to report a fraud. The government is lying to us all.”
|
|
|
|
|
I have to generate a telephone number word not to spell the number
ex: 4247288 = HAIRCUT
|
|
|
|
|
That was not clear in any of your posts about this. If you had given that example you might have got some help.
BTW when posting code surround it with <pre>your code goes here</pre> tags, we don't use [code][/code] on CP. 
Now that your problem is clear, I will have to think about it. If I get any ideas I will post back to you. In the mean time others might have suggestions.
Henry Minute
Do not read medical books! You could die of a misprint. - Mark Twain
Girl: (staring) "Why do you need an icy cucumber?"
“I want to report a fraud. The government is lying to us all.”
|
|
|
|
|
Sorry about that. Thanks for your help. I think my for loop is not working and the words had to be generate in listbox
|
|
|
|
|
To try to understand what you want obtain, I need to know:
In this piece of your code:
Numbers(0, 0) = "A"
Numbers(0, 1) = "B" '2
Numbers(0, 2) = "C" '2
Numbers(1, 0) = "D" '3
Numbers(1, 1) = "E" '3
Numbers(1, 2) = "F" '3
Numbers(2, 0) = "G" '4
Numbers(2, 1) = "H" '4
Numbers(2, 2) = "I" '4
Numbers(3, 0) = "J" '5
Numbers(3, 1) = "K" '5
Numbers(3, 2) = "L" '5
Numbers(4, 0) = "M" '6
Numbers(4, 1) = "N" '6
Numbers(4, 2) = "O" '6
Numbers(5, 0) = "P" '7
Numbers(5, 1) = "R" '7
Numbers(5, 2) = "S" '7
Numbers(6, 0) = "T" '8
Numbers(6, 1) = "U" '8
Numbers(6, 2) = "V" '8
Numbers(7, 0) = "W" '9
Numbers(7, 1) = "X" '9
Numbers(7, 2) = "Y" '9
Do you forgotten the comment "'2" in the first line?
And do you forgotten the letter "Q" in the list?
Words must be without letter "Q"?
modified on Sunday, September 6, 2009 6:39 PM
|
|
|
|
|
there is no Q in the list my problem does't have a letter Q assign to any number and yes I did not comment in the first line I don't think it is a problem.
Thank you
|
|
|
|
|
Here are a few ideas to give you a start.
It is just a form with a TextBox (txtResult) and a Button (btnGenerate). I am using a TextBox because I am only doing 1 possibility (you wouldn't want me to deprive you of the fun of doing it yourself, now, would you?  ), but you are right ListBox is the way to go. In fact you might want to consider using 3 (or 4 if you allow for the possibility that some keys have 4 possibilities) ListBoxes.
Any way here is what I thought you might use.
Dim input As String = "4247288"
Dim characterLookup As Dictionary(Of Char, Char()) = New Dictionary(Of Char, Char())
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Me.FillCharacterLookup()
End Sub
Private Sub FillCharacterLookup()
characterLookup.Add("2"c, New Char() {"A"c, "B"c, "C"c})
characterLookup.Add("3"c, New Char() {"D"c, "E"c, "F"c})
characterLookup.Add("4"c, New Char() {"G"c, "H"c, "I"c})
characterLookup.Add("5"c, New Char() {"J"c, "K"c, "L"c})
characterLookup.Add("6"c, New Char() {"M"c, "N"c, "O"c})
characterLookup.Add("7"c, New Char() {"P"c, "Q"c, "R"c, "S"c})
characterLookup.Add("8"c, New Char() {"T"c, "U"c, "V"c})
characterLookup.Add("9"c, New Char() {"W"c, "X"c, "Y"c, "Z"c})
End Sub
Private Sub OutputResult()
Dim outArray(7) As Char
For index As Integer = 0 To input.Length - 1
outArray(index) = characterLookup(input(index))(0)
Next
Me.txtResult.Text = Convert.ToString(outArray)
End Sub
Private Sub btnGenerate_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnGenerate.Click
Me.OutputResult()
End Sub
If you put this code on a form, as described above, run it and click the Generate button you should get "GAGPATT" which is defined as the output from a Cow at an S & M party.
Henry Minute
Do not read medical books! You could die of a misprint. - Mark Twain
Girl: (staring) "Why do you need an icy cucumber?"
“I want to report a fraud. The government is lying to us all.”
|
|
|
|
|
thank very much, but I have to display 2187 combinations in a list box after user enter the phone number in textbox
|
|
|
|
|
rbjanaki wrote: thank very much, but I have to display 2187 combinations in a list box after user enter the phone number in textbox
I know that. This means that you are not allowing 'Q' or 'Z', otherwise there would be more than that.
The sample code I gave you was just to demonstrate a method of obtaining the characters for the keys entered. What you have to do is to figure out a way to obtain all the possible combinations (729 for each of the possible start letters, in your example "4247288", that is 729 words starting with 'G', 729 for 'H' and 729 for 'I')
Putting them in a ListBox is trivial instead of Me.txtResult.Text = Convert.ToString(outArray) use Me.lboxResult.Items.Add(Convert.ToString(outArray)).
As I said in my previous post "you don't really want me to deprive you of the fun of working out how to do it, do you?", besides, I doubt that you could afford my rates. 
Henry Minute
Do not read medical books! You could die of a misprint. - Mark Twain
Girl: (staring) "Why do you need an icy cucumber?"
“I want to report a fraud. The government is lying to us all.”
|
|
|
|
|
Henry Minute wrote: I will have to think about it
Yeah, I don't know where to get a haircut on a Sunday evening either.
|
|
|
|
|
Luc Pattyn wrote: Yeah, I don't know where to get a haircut on a Sunday evening either.
What a backward place you must live in.
I have a choice from 2,187 possibilities.
Henry Minute
Do not read medical books! You could die of a misprint. - Mark Twain
Girl: (staring) "Why do you need an icy cucumber?"
“I want to report a fraud. The government is lying to us all.”
|
|
|
|
|
Henry Minute wrote: I have a choice from 2,187 possibilities
Too bad, as I know how hard it is for you to make even simple decisions...
|
|
|
|
|
Luc Pattyn wrote: Too bad, as I know how hard it is for you to make even simple decisions...
True!
It gets worse, I have just realized that there could be more options than that. I forgot that some keys have 4 characters!
BTW I forgot to 5 your previous post. Putting it right now.
Henry Minute
Do not read medical books! You could die of a misprint. - Mark Twain
Girl: (staring) "Why do you need an icy cucumber?"
“I want to report a fraud. The government is lying to us all.”
|
|
|
|
|
General 
News 
Suggestion 
Question 
Bug 
Answer 
Joke 
Praise 
Rant 
Admin 
Submit an article or tip
![Badger | [badger,badger,badger,badger...]](https://codeproject.global.ssl.fastly.net/script/Forums/Images/badger.gif)
![Jig | [Dance]](https://codeproject.global.ssl.fastly.net/script/Forums/Images/jig.gif)