My code gets a list of words from a txt file and chooses the words randomly. However, the same word can appear more than once and i need to know how to stop this from happeningHere is the code:
Dim aryName As String() = Nothing
aryName = File.ReadAllLines(Application.StartupPath & "Randomfnames.txt")
Dim randomWords As New List(Of String)
[code].....
I'm looking to use a timer to change an image for a set number of times & then exit. Am trying the code below but although the TextBox check works the Image skips directly to the second from last & goes no further.
[Code]...
Okay, so basically I'm trying to have my application randomly select items from a (multiselect) listbox. I want the user to enter the amount of items they would like randomly selected and it should all happen at the same time. I have the random shuffle down but it only selects one song each time you click the button. How can I loop this code as many times as the user specifies in the textbox?
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As
Dim shuffle As New Random
Main.songlist.SelectedIndex = shuffle.Next(0, Main.songlist.Items.Count - 1)
[code].....
i am trying to make a coin toss program where you toss a coin a certain number of times then repeat it a certain number of times.
the problem i have is "heads(counter2)" the word "heads" has a blue error line under it how do i sort the error out and also is all the code right
Public Class Form1
Dim tosses, repeat, heads As Integer
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
[code]....
I have this program generating a firstname and lastname from a file. When I run this program I enter information in three textboxes. The first two are the salary low and high(salary1.text, salary2.text) and the last one is the number of "copies"(copies.text) that I want.. When I put a number such as 10 in the text box it outputs some of the same names. The firstname file has around 100 records and the lastname file has about 1000 records Why is it generating the same name The problem is even worse if I do something like 1000 copies.. it outputs the same thing 8 times and then does something different another 8 times
Public Class Form1
Dim sex As String
Function randomfirstname()
Dim infile As IO.StreamReader
[code]....
Public Class frmSelect
Private Sub btnEnd_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnEnd.Click
Me.Close()
End Sub
[CODE]..............
THATS my code and when i change my num to 20 it does not print 150?
I have already a Pretest loop that counts the number that the user inputs and displays a message. I need to change the Pretest loop code so it will count down instead of up from the number of times entered by the user.I have already coded this:
vb.net Public Class frmMain Private Sub btnExit_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles btnExit.Click Me.Close()End Sub Private Sub txtNumTimes_KeyPress(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyPressEventArgs) Handles txtNumTimes.KeyPress
[Code]...
Public Class Form1
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Dim timeN As DateTime
Dim timeF As Date = #7/11/2009 12:43:20 PM#
Dim timeR As TimeSpan
timeN = DateAndTime.Now
timeR = ?????
End Sub
End Class
TimeN is system time. TimeF is a fixed date and time. All I need is the number of seconds between fixed and system(now) for timeR (and counting).
i am using a combo-box to add different grades to a column in a datagrid and i am using a loop to check if the sum the total number of sum i have made when ever i select a a grade from the combo-box.This is because i want to only add six grade and not more than six but the code i am using is giving me problems This is my code.This code is adding the total grade for me bur i want to check with a loop that will only allow the adition of only six different grade but when i run my program and begin to select the grades it just give me a message form my message box 'This is calculating the grades of an applicant
Private Sub cmbgrade_TextChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles cmbgrade.TextChanged
If Me.cmbgrade.Text = "A" Then
Me.txttotalaggregate.Text = (CInt(Me.txttotalaggregate.Text) + 1).ToString
End If
[code]....
This text book i have is not very good at all. the exercise's at the end of each chapter ask u to code projects without first covering the basic of what u will need do to code them. (Programming in Visual Basic 2008 Julia Case Bradley + Aninta C. Millspaugh)
Design and code a project to calculate the amount due and provide a summaray of rentals. All movies rent for $1.00 and all customers receive a %10 discount. The form should contain input for the member number and the number of movies rented. INside a groupbox display the rental amount, the 10 percent discount, and the amount due. inside a second groupbox, display the number of customers served and the total rental income.(afterdiscount).Include buttons for Calculate, clear, print and exit. The clear button clears the information for the current rental but does not clear the sumarry information. A print button allows the user to print the form. Do not allow bad input data to cancel the program; instead display a message to the user.[code]...
I have an SQL database with a single table with several colunmns. I want to count how many times a certain number appears in one of the columns. E.g. I have the following:
A B C
8 4 6
0 9 3
1 4 6
4 7 1
I want to count the number of times 4 is used in column B. I have looked at using the following, but not sure if this is even the right approach:
Dim db as New MainTblDataSet
Dim BCount = Aggregate B In db.MainTbl Into Count(B.B = num)
where num=the number I am counting the instances of (4 in this case).
The hope is that BCount will equal 2, but it returns 0 every time.
Basicly my instructor said that we have to make a program that will count how many times we enter a number into an inputbox, he also said we had to use a while loop. [code]
View 4 RepliesOn the ping method, how do you increase the number of times it pings? I'd like it to ping 80 times at once.
View 4 RepliesIs there a way to loop words for a number of times (like i want to loop a word for only 10 times....How would I go by doing that?)
Quote:
Originally Posted by EXample Like I want to have a textbox and If i put 10 in the textbox It would loop the word ten times or is I put 20 in the textbox it would loop 20 times ..and ..etc...and ...etc...
I need a random number of 6 (1 ,6), and to loop it 3 times. I tried this but it gives me error for - if myRandom.next(1,6) Then:
Dim myRandom As Random()
For i As Integer = 1, 3
If myRandom.next(1, 6) Then
End If
Next
Also I need to know the code for putting a picture into a picture box.
I know it sounds strange but let me it explain. It has a purpose, but really all I'm looking for is the item with the most duplicates.I know it's possible and I've had a few ideas already, though none were successful or practical.What I'm doing here that requires this is creating an intuitive search for clients in a database. You type in a single field and click search. Behind scenes each keyword broken down from the single input field is searched through the table of clients, hitting each column and returning matches. the results are large in numbers, but truly it's the client that appears the same number of times as there are keywords.
View 1 Repliesi made a tool which detects arrow keys .When i click up it shows the word up in text box when i click down arrow it shows down word vice versia.
My problem is i want to count the number of times i clickd an arrow and want to save it in text doc with time and date
How can I count the amount of times a character appears in a string?
The assignment is to create a program with 2 text boxes, label, and a button. We then need to type a phrase into the first text box, and a character in the second. Then click the button and then the label will display the output of how many times the character in the second text box appears in the first.
I have all the above setup except for how to display the amount of times the character appears in the first text box, here's a picture:
I'm trying to run a simple select statement using an ADO recordset. But the resulting recordset returns 3 times the number of rows. For example the query should return 20 rows but is repeating 2 more times and returning 60 rows. When I run the query in Oracle it returns 20 rows.
Here's the code.
sSql = "Select * from Sector"
cnnOracle.Open("DRIVER={Microsoft ODBC for Oracle};SERVER=REPDATA.world;UID=auser;PWD=auser;")
[Code]....
input = "my mother is a great lady" output = A -3, B - 0, C - 0, D - 1, E - 2
I wanted to count the number of times letter A - E is in the input string.
count the number of times when a user enters a character followed by , and I want to count , number of times. So far here is what I have if you also know a little about the split function can you check to see if what I have is right?
Private Sub Strat0_LostFocus()
Dim q1 As New rdoQuery
Dim LO As Integer
[code]....
I am trying to count the number of times a specific character is in a string. The problem is when I run the program the letter doesn't advance from "d" in the string "debugging" and doesn't display the number of time the character "g" is found.
Private Sub Button2_Click(sender As System.Object, e As System.EventArgs) Handles Button2.Click
Dim letterCount As Integer
[code].....
I need to know to limit the number of times a radio button can be used. Maybe the number of times the radio button has been used can be stored in an XML file, and when the user wants to reset the counter all they would have to do it delete this file. I really don't know, that's why I'm asking you. But,the program will append a string every time a button is clicked with a radio button selected, I just need to know how to, for instance only allow RadioButton2 to be used in this manner say... 15 times.
View 5 RepliesI have a list of 100 assets that are pulled from AS400 and shown on a gridview alongside a dropdown box with 6 possible status and a textbox.
If the user selects a status other than "Found" (whether it's "Not Found", "Scrapped", "Sold", "Transferred","Other"), the user cannot leave the textbox empty. They must insert a comment into the textbox. Once the user is done he clicks "Save" and if, let's say, the status is "Sold" and the textbox is empty for all assets then a Message Box pops up saying "Please fill the textbox".
The problem is, the message box pops up 100 times (or once for every asset that has the error).
1) What can I do so that the message box only appears once even when 100 assets have the error?
2) Also, when the message box appears and I click "OK" the information the user had filled up to that point gets erased.
SAVE CLICK EVENT
Protected Sub Save_Click(ByVal sender As Object, ByVal e As EventArgs) Handles Grabar.Click
Dim comando As String = ""
[Code].....
I am trying to write a random number function that can just be called from my main module to generate different random numbers. I have tried this several different ways and I am having odd results. Approximately 19 times out of 20 the numbers come back exactly the same, but approximately 1 in 20 they come back as two different numbers. Im using Visual Basic Studio 2008. Here is the code I have so far, or rather, the current version of my many tests I have been running to try and figure it out. Sometimes it takes many runs of the program before the two seperate numbers apear.I've been researching it and have come up with nothing so far.I know I could put them in the module section as two different randoms and it works, but I get extra points if i use a couple classes in my program.This is the main module.
Module Module1
Sub Main()
Dim randomNumOne As New RandNum[code]...........
I am trying to code something with nested for loop with the following format:
[CODE]...........
However when the program hits the last value of 'For loop 1', the nested for loops seem to only trigger once instead of the number of times that i specified.
Private Sub populatedgv1()
'setup temptable to store Server data
Dim m_table As New DataTable
[CODE]........................
I want to make a autotyper and I was wondering how would I make The words I am writing in the textbox be set to a number of times? EX.- say I want to write a word only 10 times instead of it keep repeating..
View 9 RepliesI need a textbox where you can add a number and if you press a button that it will repeat the function of the button the number of times as in the textbox.
View 9 RepliesI have set up text boxes for user to pick a number 1-20 and to enter a word as well. Then, press submit button. What's supposed to display in result textbox is the word that many number of times. For example if the number is 5 and the word is hello, then "hellohellohellohellohello" should appear. I don't know how to complete my For...Next function to append the word to the result.
Public Class Ch6ex1
Private Sub btnsubmit_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnsubmit.Click
[CODE].....................
The List Box has three candidates and a record Button. Every time the record button is hit I need it to add those button clicks for each candidate that is selected in the List Box. My code keeps counting all the clicks no matter which candidate I am selecting in the List Box. How can I differentiate between each selected item in the List Box. Here is an image of how the application should look: [URL] Public Class Form1
[Code]...