I have writen the code so you put the number of times you want to flip the "coin" and into a label the results show. I want it to show the % instead of the number of times that the side lands on.
This is what I have so far:
Private Sub value(ByVal count As Integer, ByVal tailscount As Integer, ByVal headscount As Integer, ByVal flip As Integer)
Dim FlipCount As Integer
Dim strflip As String
[CODE]...
I have an assignment to have a coin flip program, how do I produce 3 random coin flips?
View 2 RepliesI have a form that allows users to select file and then it reads the contents, parses the data and then executes a sql insert statement to add it to a database. What I am having issues with is showing real-time results. Currently, I have the import operation take place on the import form within the OnLoad event. The problem with this is it only shows the final results instead of the results real-time. Is there anyway to do this without creating a seperate thread and delegates?
View 1 Repliesi 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]....
is it possible to show a figure in one Label in another label through a button click event? for instance, i have a figure in label1 and i want to display that figure in a label of another form is it possible?
View 1 RepliesI am currently building a search page, which includes a textbox and two drop-down lists, a search button, and a datagrid. If results are found and displayed, I would like a label to display:
(e.g.) "24 results found for 'blue sky clouds' "
...where the integer represents the results count, and the keywords and/or drop-down list selections are included in the string.If no results are found I would like the label to display:(e.g.) "No results were found that match your selection. Please try again"I would also like the label to be invisible until a search occurs.
My name is Tim I'm having a problem getting my multiple selections from my list box to display in the results label and there is no examples in the text any how I'm thinking I need to use a loop to get it done. is this evern in the ball park?
Option Explicit On
Option Strict On
Option Infer Off
Public Class MainForm
[code].....
Im a beginner in visual basic 2010 im making my first project i created form3 for the search function so i created 2 checkbox to give the user the choice to choose to search by name or by date or by both of them and i created a button search then i created a datagridview to show up the results so im confused now how to start my project. should I start it with if checkbox1 checked then.... or what?
View 11 Replieslast year i have written a simple application with a listview filled by a sql-server with patient data.When the application opens, then the actual month is displayed. Now i get the db-entries from last year not from this year.Here is the function:
Private Function getPatienten()As DataSet
Dim selStr As String = "SELECT ID, Nachname, Vorname, Dauer, Fachbereich, Datum FROM tbl_station11 WHERE month(Datum) = month(GetDate()) ORDER BY Datum"
[code].....
I have written a code which adds some information to a database. No problem with that since the records get inside the database. My problem is that the record I added always shows up on my Search. I tried changing the variables so that none will have the same names between the two forms but it still shows.Example:
1. I added a record of a book which has an id of 1, name of Cisco, and total of 50. I added it thru the debug function.
2. I added a record of a book which has an id of 2, name of Link, and total of 30. This time, I added it directly on the database file itself.
2. I created a search button which will show records depending on the input of the user.If I type "1" for the ID, the first record will appear on the datagrid. If I type "2" for the ID, both records will appear. If I type "3" which I doesn't have any record with, the FIRST record will still appear. To summarize it, the record that I added through the program itself will always show up on the query results, no matter what I type into.
Dim command As New OleDb.OleDbCommand
Dim adapter2 As New OleDb.OleDbDataAdapter
Dim bkId, bkTtl As Integer
[code].....
populate a simple combobox with a query to a MySql database. I Just want the combobox to show the results of the query:
SELET DISTINCT models from Cars
I am using VB 2008 with Datasets, how can I achieve this?
What do i need to put in the search button so the words that i will put in the textboxes on the rightside will show the results on the left?thanks for the reply. i need some codes for pattern.. ll i found in google is searching in a datagridview. i dont know how to put them in textboxes.
Dim id As String
Dim title As String
Dim country As String
[code].....
When I launch VB Help and do a search it shows under "Local Help", "Exception from HRESULT:0x8004032E". It lists three results under "MSDN Online", but the large field to the left of it is entirely blank. If I double-click blindly in that blank area it brings up various topics as if they were listed there but invisible. Further, the region under "Contents" is also blank, as is the "Filter by:" field. If I click the down arrow by the "Filter by:" field it brings up an entirely blank menu. If I then click outside the menu box it brings up a message saying "The selected filter contains an error that prevents it from being applied.". What's wrong and how can I fix it?
View 1 RepliesI uses datagridview for show query results from database which may have 0 to x number of rows. So I made calculation to calculate size of underlaying form and my datagridview dependable on number of matched rows. Underlying form is transparent and all of that looks like user control what appears and works just fine. But here is one issue: Every time datagrid have to grow, black square in that area is showed before datagrid is filled, what is not nice and surely unwanted. Did datagridview have some mechanism to freeze it and show data when populating is finished?
Private Sub TextBox1_TextChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles TextBox1.TextChanged
Dim tw As Integer = 0
Dim n As Integer = 0
Dim sqlText As String
Dim reader As OdbcDataReader = Nothing
[Code] .....
How can I count Total of column from datagridview and show results in textbox Using VB 2005!
View 1 RepliesI'm making a program when the user clicks the button it displays the number of rolls it took to get snake eyes ( 1 on each dice) I have randomized it and in the Do loop it calculates until it gets the right code. I just need some help with the code that will display in a listbox the results that didn't get picked for snake eyes.
Here is my
Public Class Form1
Dim num1 As Integer
Dim num2 As Integer
[CODE]...
I want to (SQL) select from a table in an Oracle database, and show the results of the query in the VB application, in a Excel like manner (rows, columns, selectable, etc.). Or in a SQL developer manner. How can I do that? Browsed through a lot of tutorials and howtos on the internet, did not get anywhere. I think (and correct me if I am wrong) that it's gotta be something with DataGridView. But I don't know how to create and populate a datatable with the result of as Select statement, how to create a dataset.
View 3 Repliesthe problem is about user when click button coin and it will display the decimal number and suppose to be like this : 0.10 also , i have made code about notes amount like RM 1.00 and RM 5.00. [code] the problem is when i run the program and click the button it become like this: RM 1.2 not RM 1.20.i also attach some pic in the first pic the coin appear normally but after i click button RM 1.00 , it become like second pic.
View 3 RepliesI have read plenty websites and i can not find the solution...I dont know why, i have tried many algorithms and none of them work for me. Anyone knows where can i found some dynamic programming algorithm to solve the problem of the coin change?
View 5 RepliesI have read plenty websites and i can not find the solution...I dont know why, i have tried many algorithms and none of them work for me.Anyone knows where can i found some dynamic programming algorithm to solve the problem of the coin change?
View 2 RepliesHaving trouble getting this to work. Only one number shows in the label. I need all 10 to show in the label.
Dim list As New ArrayList
Dim selected(19) As Boolean
Dim thisnumber, i As Integer
[Code].....
I am working on Visual Basic Express and I am supposed to calculate the change from a transaction.
View 1 RepliesPublic Class Form1
'Click event for the Calculate button!
Private Sub btnCalculate_Click(ByVal sender As System.Object, ByVal e As System.EventArgs)
[code].....
I have another probably easy question to answer but i can't figure it out... I have made a little snake game with a score attached to it running through a timer that outputs to a label.
View 2 RepliesHow do i show the date in a label 2 months before today?[code]...
View 9 RepliesI need to format a Label to show numbers in a certain way. I had asked this before about textboxes so I looked into that first but it didn't do what I wanted.
[Code]...
Im working on a project containing a couple of forms. On the main form I want to labels in the status bar that show the X,Y location of the cursor when it moves over the form. I thought this code would do it but it doesnt work
Private Sub MainForm_MouseMove(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles Me.MouseMove
lblCursorX.Text = "X: " & e.X
lblCursorY.Text = "Y: " & e.Y[code].......
I have to work with network program with vb 2010. I'm trying to show the ReadLine stream in label text but it won't show.
Dim tcpCli As TcpClient = tcpList.AcceptTcpClient() 'claiming tcp listener to accept the tcp client
Dim ns As NetworkStream = tcpCli.GetStream ' assign ns as network stream and assign as client to get nw stream
[Code]....
I've got two forms. I have a combobox named 'cmbThrow' in the first form. I need to pass the numeric value of it to the second form and show it with a label.
View 12 Repliesi just want to ask how can i show information from my database into label..
Im using Visual Basic 2010 and . Net connector..
this is my sample codes and i dont know how to put it..
CN.ConnectionString = "Server=localhost; database=libsysdb; Uid= root; pwd=dbpass; Port=3306"
Dim myCommand As New MySqlCommand
[Code]...