Persentage [modified] - Visual Basic Discussion Boards

hellow to all ..
i am working on a listview and i am looking for a way to make an item on the listview not Visible , i didn't find how to do this ...
anyone have any idea ?
thxx

You could always set the column width equal to zero.

Mike Lasseter

i can't set the nodes width equal to zero ....

Idividual items in the ListView cannot be made visible/invisible. Using the standard controls, the only way to make an item not show up is to removed it from the list.

Dave Kreskowiak
Microsoft MVP - Visual Basic

yaa i know but it is bad idea when u are using the nodes number and when u move one the count get mixed up ..

Are there any helper tools or addin that can make it easier to analyze and understand somebody else's source code written in VB.net and C#?

Example tools might be

1) a tool that generates flow chart of which method is getting called from which method;
2) a tool that displays the call stack with ALL the values at a given stage of program execution
3) A tool that shows from where all a particular variable is being accessed, being set.
4) A tool that shows file dependencies to point out which are the BASE files to start studying.
5) Any other tools. I am sure there can be other types of tools also.

Thanks,
Rajesh.

Thanks
hiren shah

This might be helpful.

http://www.aivosto.com/visustin.html[^]

The free version is limited but still useful.

I think tools such as Resharper have class browsing built in. But it's not free and is C# only.

I'm sure the other guys will suggest more tools.

Kevin

I am trying to make the guess the number game, but now I am confised as I don't get an aswer at all at the end, I don't know where the problem is, I run it and it goes tru the code, at the end it does not give a respose at all.

I am putting persetage in for hot,warm,warem eg.

I have put in code for a aswer

Private Sub btnCheckGuess_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnCheckGuess.Click<br />
<br />
Dim intPlayerGuess As Integer 'Declare variable to store guess<br />
<br />
Static intNoOfGuesses As Integer 'Declare variable to keep track<br />
<br />
'of the number of guesses made<br />
<br />
If txtInput.Text.Length > 0 Then 'Make sure player typed something<br />
<br />
If IsNumeric(txtInput.Text) = True Then 'Ensure input is numeric<br />
<br />
'Convert String input to Integer data type<br />
<br />
intPlayerGuess = Int32.Parse(txtInput.Text)<br />
<br />
btnCheckGuess.Enabled = True 'Enable Check Guess button<br />
<br />
'See if player’s guess is correct<br />
<br />
If intPlayerGuess = intRandomNumber Then<br />
<br />
txtInput.Text = "" 'Clear the TextBox control<br />
<br />
intNoOfGuesses += 1 'Increment variable by one<br />
<br />
'See if player enabled verbose messaging<br />
<br />
If chkVerbose.Checked = True Then<br />
<br />
txtOutput.Text = "Congratulations!" & ControlChars.CrLf & ControlChars.CrLf & "You have won the Guess a Number Game. " & ControlChars.CrLf & ControlChars.CrLf & "Number of guesses made = " & intNoOfGuesses<br />
<br />
Else<br />
<br />
txtOutput.Text = "Congratulations! You Win."<br />
<br />
End If<br />
<br />
intNoOfGuesses = 0 'Reset variable to zero<br />
<br />
txtInput.Enabled = False 'Disable TextBox control<br />
<br />
'Update the display of the total number of games won<br />
<br />
txtGamesWon.Text = txtGamesWon.Text + 1<br />
<br />
'Disable the Button labeled Check Guess<br />
<br />
btnCheckGuess.Enabled = False<br />
<br />
'Enable the Button labeled New Game<br />
<br />
btnNewGame.Enabled = True<br />
<br />
'Enable all Radio buttons<br />
<br />
rbnControl10.Enabled = True<br />
<br />
rbnControl100.Enabled = True<br />
<br />
rbnControl1000.Enabled = True<br />
<br />
'Enable the two reset buttons<br />
<br />
btnDefaults.Enabled = True<br />
<br />
btnReset.Enabled = True<br />
<br />
'Post statusbar message<br />
<br />
stbControl.Text = "Game Ready!"<br />
<br />
End If<br />
<br />
'More<br />
<br />
If (intPlayerGuess) * 100 / intRandomNumber < intRandomNumber Then<br />
<br />
answer = answer<br />
<br />
End If<br />
<br />
'Less<br />
<br />
If intPlayerGuess > intRandomNumber * 100 / intPlayerGuess Then<br />
<br />
answer = answer<br />
<br />
End If<br />
<br />
'Getting Hot<br />
<br />
If answer > 96 Then<br />
<br />
txtInput.Text = ""<br />
<br />
intNoOfGuesses += 1<br />
<br />
If chkVerbose.Checked = True Then<br />
<br />
txtOutput.Text = "You are Hot." & ControlChars.CrLf & ControlChars.CrLf & "Number of guesses taken so far = " & intNoOfGuesses<br />
<br />
Else<br />
<br />
txtOutput.Text = "Hot"<br />
<br />
End If<br />
<br />
End If<br />
<br />
'Getting warmer<br />
<br />
If answer > 80 Then<br />
<br />
txtInput.Text = ""<br />
<br />
intNoOfGuesses += 1<br />
<br />
If chkVerbose.Checked = True Then<br />
<br />
txtOutput.Text = "You are Getting Warmer." & ControlChars.CrLf & ControlChars.CrLf & "Number of guesses taken so far = " & intNoOfGuesses<br />
<br />
Else<br />
<br />
txtOutput.Text = "Warmer"<br />
<br />
End If<br />
<br />
End If<br />
<br />
'Getting warm<br />
<br />
If answer > 64 Then<br />
<br />
txtInput.Text = ""<br />
<br />
intNoOfGuesses += 1<br />
<br />
If chkVerbose.Checked = True Then<br />
<br />
txtOutput.Text = "You are Getting Warm." & ControlChars.CrLf & ControlChars.CrLf & "Number of guesses taken so far = " & intNoOfGuesses<br />
<br />
Else<br />
<br />
txtOutput.Text = "Warm"<br />
<br />
End If<br />
<br />
End If<br />
<br />
<br />
<br />
'Getting Cold<br />
<br />
If answer > 48 Then<br />
<br />
txtInput.Text = ""<br />
<br />
intNoOfGuesses += 1<br />
<br />
If chkVerbose.Checked = True Then<br />
<br />
txtOutput.Text = "You are Getting Cold." & ControlChars.CrLf & ControlChars.CrLf & "Number of guesses taken so far = " & intNoOfGuesses<br />
<br />
Else<br />
<br />
txtOutput.Text = "Cold"<br />
<br />
End If<br />
<br />
End If<br />
<br />
'Getting Colder<br />
<br />
If answer > 32 Then<br />
<br />
txtInput.Text = ""<br />
<br />
intNoOfGuesses += 1<br />
<br />
If chkVerbose.Checked = True Then<br />
<br />
txtOutput.Text = "You are Getting Colder." & ControlChars.CrLf & ControlChars.CrLf & "Number of guesses taken so far = " & intNoOfGuesses<br />
<br />
Else<br />
<br />
txtOutput.Text = "Colder"<br />
<br />
End If<br />
<br />
End If<br />
<br />
'Getting YsCold<br />
<br />
If answer > 16 Then<br />
<br />
txtInput.Text = ""<br />
<br />
intNoOfGuesses += 1<br />
<br />
If chkVerbose.Checked = True Then<br />
<br />
txtOutput.Text = "You are Getting YsCold." & ControlChars.CrLf & ControlChars.CrLf & "Number of guesses taken so far = " & intNoOfGuesses<br />
<br />
Else<br />
<br />
txtOutput.Text = "YsCold"<br />
<br />
End If<br />
<br />
End If<br />
<br />
'Correct<br />
<br />
If answer = intRandomNumber Then<br />
<br />
txtInput.Text = ""<br />
<br />
intNoOfGuesses += 1<br />
<br />
If chkVerbose.Checked = True Then<br />
<br />
txtOutput.Text = "That is it, you got it, good Work." & ControlChars.CrLf & ControlChars.CrLf & "Number of guesses taken so far = " & intNoOfGuesses<br />
<br />
Else<br />
<br />
txtOutput.Text = "You are a winner"<br />
<br />
End If<br />
<br />
End If<br />
<br />
Else<br />
<br />
txtInput.Text = "" 'Clear the TextBox control<br />
<br />
'Display error if player fails to provide numeric input<br />
<br />
If chkVerbose.Checked = True Then<br />
<br />
txtOutput.Text = "Sorry but you entered a non-numeric guess. Please try again and be sure to enter a number this time."<br />
<br />
Else<br />
<br />
txtOutput.Text = "Numeric input required. Try again."<br />
<br />
End If<br />
<br />
End If<br />
<br />
Else<br />
<br />
txtInput.Text = "" 'Clear the TextBox control<br />
<br />
'Display error if player fails to provide input<br />
<br />
If chkVerbose.Checked = True Then<br />
<br />
txtOutput.Text = "Sorry but to play you must enter a number. Please enter higher number and try again."<br />
<br />
Else<br />
<br />
txtOutput.Text = "No input provided. try again."<br />
<br />
End If<br />
<br />
End If<br />
<br />
txtInput.Focus() 'Set focus to the TextBox control<br />
<br />
End Sub

-- modified at 3:15 Monday 11th September, 2006

Bluärgh! Please use the pre tag when posting larger blocks of code. It's virtually unreadable in that form.

---
b { font-weight: normal; }

i am frm kolkata
i am working in vb.net2.0 version.
can u help me with code that how can i populate the datagridview in edit mode which will open in another form when one selects the row of a datagridview.

cheers.... Rose | [Rose]

Taniya Banerjee

hi,

At runtime i want to map keybord key to my application function
by reading text file line by line (for e.g. F1=showMessage)
"showMessage" function is there in my mdi application

Can you give me example in vb or c# .net

Thanks
hiren shah

Private Sub Form1_KeyDown(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyEventArgs) Handles Me.KeyDown
End Sub

KeyPreview

property of a form has to be set to

True

i need to maximize form by another form in the same project

kilany

Let one form to set the other's WindowState to Maximized.

Best,
Jun

may you give me the code ...

kilany

I am not sure, but not everyone will give you the answers straight away. Internet research is some thing you learn to use as part of your learning experience. Google.com, Google groups are helpful.

make your own method to handle maximise.

Me.WindowState = FormWindowState.Maximized

how i can read data from textbox (notepad) which has alot of data by form in vb.net

so
1- first i need to select the file
2- reading data
3- arrange data and store the arrangment data in sql

kilany

Mr kilany wrote:
how i can read data from textbox (notepad) which has alot of data by form in vb.net

so
1- first i need to select the file
2- reading data

try this:
http://www.vbforums.com/showthread.php?t=423925

It is coded in VS2005 but basically you need to import

system.io

open a stream and then make sure you close it after you finish reading. I am not sure what type of data is being read. I am unable to comment on storing/arranging part.

If you want to ask the user for where the file is stored, use file dialogues.

Hope that helps.

thanx alot man,

the most important thing that the open and search function included in vb.net , may you give me the topic which is related to open textpad and reading data from it to let me you search engines, and if you have any links related to this supject please care for me, because i have a project which use VB>NET and should read from notepade and search some things inside it,
thanx second time ........

kilany

I am not sure what you are trying to do here. But if you are trying to read and write from/to text files then try the first two results from this search:

http://www.google.co.nz/search?q=read+text+vb.net&start=0&ie=utf-8&oe=utf-8&client=firefox-a&rls=org.mozilla:en-US:official

Streamreaders/streamwriters are what you are after. Make sure that streams are closed after reading/writing.

Hi How can I Make Encryption And Decryption for a Text (String) By any way ?!

you could write your own algorithm to encrypt the msg, a simple idea is:
use 001 to represent A, 010 to B, 011 to C ......

if you want it more complex and secure, you could refer to the RSA key pairs, to build your algorithm.

Cheers,Kev

Google results for "vb.net string encryption"[^].

Dave Kreskowiak
Microsoft MVP - Visual Basic

try this:

Function Encrypt(ByVal strval$, ByVal blndec As Boolean) As String
Dim str, str1, str2, str3, str4 As String
Dim int1, int2, int3 As Integer

str1 = strval$
int1 = Len(str1)
int2 = 1

Do While int2 <> (int1 + 1)
str2 = Mid(str1, int2, 1)
If blndec = True Then
int3 = Asc(str2) + 3 'Decrypt
Else
int3 = Asc(str2) - 3 'Encrypt
End If
str3 = Chr(int3)
str4 = str4 & str3
int2 = int2 + 1
Loop

Encrypt = str4

End Function

geboy

In a Windows application, the print button on the CrystalReportViewer control toolbar opens the standard print dialog box.

I want ask if I can print directly on the printer using the print button without opens the standard print dialog box?