|
guayony wrote: I can't figure out how to check the items back when I load the form.
What do you mean check the items back???
|
|
|
|
|
How do you make a button,
1)change the name displayed to the user when a user clicks it
2)make 10 images rotate in a picture box using timers.
Ex. button says 'move', user clicks, 10 images rotate to timer and button name changes to 'stop'. Users clicks 'stop', images stop rotating and button changes to 'move'?
I am using VS 2003
Skullie
|
|
|
|
|
On your form, add your picturebox, your button, an imagelist and a timer. In the code i will be giving you, everything is named to default (e.g. button1, picturebox1, imagelist1, timer1), you will have to rename these if your's are named different.
Do this in declarations:
Dim ICount As Integer = 0 ' declare the counter for our images
Form Load:
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load<br />
Me.PictureBox1.BackgroundImage = Me.ImageList1.Images.Item(0) ' Set the picture box to display the first image in the series<br />
Me.PictureBox1.BackgroundImageLayout = ImageLayout.Stretch ' Make the image stretched ''This is optional<br />
End Sub
Button Click:
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click<br />
If Me.Button1.Text = "move" Then ' if the timer isn't running and the text = "move" then<br />
Me.Button1.Text = "stop" ' change the text<br />
Me.Timer1.Enabled = True ' and start the timer<br />
Else ' if it is running and the text = "stop" then<br />
Me.Button1.Text = "move" ' change the text<br />
Me.Timer1.Enabled = False ' and stop the timer<br />
End If<br />
End Sub
Timer Tick:
<br />
Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick<br />
'index for images starts at zero, so on the tenth image the index will be 9, so we have to minus one to accomodate<br />
If ICount = Me.ImageList1.Images.Count - 1 Then 'Check if it's at the last image, and start again if so<br />
Me.PictureBox1.BackgroundImage = Me.ImageList1.Images.Item(0) ' change to first image<br />
ICount = 1 'set the count for the next image<br />
Else<br />
Me.PictureBox1.BackgroundImage = Me.ImageList1.Images.Item(ICount) ' if it's not the last image, go to next image<br />
ICount += 1 'set the count for the next image<br />
End If<br />
' the icount is an integer that is increased after each change, then each subsequent change will be the next image in series<br />
End Sub<br />
Posted by The ANZAC
|
|
|
|
|
Thank you so much,
There were a couple of things I was not doing. I didn't create an image list, I was trying to import through system.drawing... and I was placing that coded in the button_click event, not on form load. Your help is greatly appreciated. Obviously I am a newbie to vb.net!
Skullie
|
|
|
|
|
No Problem, happy to help. If your a newbie, maybe you should try some learning resources, i recommend this:
http://msdn.microsoft.com/vstudio/express/vb/learning/default.aspx[^]
It got me on my feet to start programming. You can watch all or just a few. There are some down the buttom that provide insight into the different controls available, when and how to use them. I suggest you check these out, each of them is only short (5-10 mins). The top ones take you through a whole project, each is about 20-50 mins.
Posted by The ANZAC
|
|
|
|
|
How do i use the richtext boxes in VB .NET so as to support graphic files like jpg, gif, etc.?
Also i need to save these richtextbox's data (including pictures and graphics) in MS-Access and need to retrieve it in the same pattern or form as it is entered....
I am using the Visual Studio 2005.
kindly help me out.
Nirav
|
|
|
|
|
Hi,
First off all, I'm new to programming. Yes, I'm a newbie.:-> Just made my first steps reading text files using StreamReader or FileOpen.
When I open an mp3 file in Notepad, the first couple of bytes are the id3 tag information. It's just plain text sepparated by an unknown character. I guess it's this unknown character () where the read chokes, cause I just can't read the file using FileOpen or StreamReader, not completely anyway. I took a look at the ID3v11 class I found around here. It seems to read the end of the file, but the tag is at the beginning. Right?
Using peaces of code of this class I get some text, but it's choped and incomplete.
Dim strFileName As String = "c:\test01.mp3"
Dim strTag As New String(" ", 3)
Dim strTitle As New String(" ", 30)
Dim strArtist As New String(" ", 30)
Dim strAlbum As New String(" ", 30)
' Open the file
Dim intFile As Integer = FreeFile()
FileOpen(intFile, strFileName, OpenMode.Binary, OpenAccess.Read, OpenShare.LockWrite)
FileGet(intFile, strTag)
FileGet(intFile, strTitle)
FileGet(intFile, strArtist)
FileGet(intFile, strAlbum)
TextBox1.Text = strTag & vbCrLf & strTitle & vbCrLf & strArtist & vbCrLf & strAlbum
FileClose(intFile)
What does this do 'As New String(" ", 3)'?
Why can't I read an mp3 file like Notepad does?
Please help a newbie out.
|
|
|
|
|
SilentBob101 wrote: I guess it's this unknown character () where the read chokes, cause I just can't read the file using FileOpen or StreamReader, not completely anyway.
You can't read the ID3 data as plain text, use a BinaryReader.
SilentBob101 wrote: It seems to read the end of the file, but the tag is at the beginning. Right?
There can be a ID3 version 1.x tag at the end of the file, and/or there can be a ID3 version 2.0 tag at the beginning of the file.
SilentBob101 wrote: Using peaces of code of this class I get some text, but it's choped and incomplete.
The 1.x version tag has limited field sizes, so if the data in the 1.x version tag is a copy of the data in the version 2.0 tag, it will be cropped if any text is longer than 30 characters.
SilentBob101 wrote: What does this do 'As New String(" ", 3)'?
It declares the string variable and creates a three character long string filled with spaces. The length of the string is only used to determine how much data to read from the file, initializing the string serves no other purpose at all in this case. To use the string length in this way comes from VB6, and doesn't really make sense in VB.NET. This code is either a straight conversion from VB6, or written by a former VB6 coder that hasn't learned much about VB.NET yet.
---
It's amazing to see how much work some people will go through just to avoid a little bit of work.
|
|
|
|
|
i have created a website but i am facing problem to create option "remember password on same computer"
if anyone have idea or code to use the same option please send me.
thank you!!!
contact me: ashish.0619@gmail.com
|
|
|
|
|
|
Sir/Madam,
Either u can use cookies or create a new file and dtore the username and password into that for the concerned user.
Hope this will help u.
Thanks and Regards
Pankaj
|
|
|
|
|
Ashish Porwal wrote: contact me: ashish.0619@gmail.com
NO !  go to hell with your email. if you didn't understand the interest of a forum, you have nothing to do here...
|
|
|
|
|
how to insert the data in MS access
ugandhar
|
|
|
|
|
well you can use quite lot of choices. you can directly add the row into database using sql or just using dataset
|
|
|
|
|
i created a project.Initially, i didnt change the webpage's name. it's by default the same as webform1.aspx.
the problem is:
=-=-=-=-==-=-=--=-
i did change the name of the webpage to students.aspx, and i debugged it. I got an error like:
Server Error in '/description/details' Application.
--------------------------------------------------------------------------------
The resource cannot be found.
Description: HTTP 404. The resource you are looking for (or one of its dependencies) could have been removed, had its name changed, or is temporarily unavailable. Please review the following URL and make sure that it is spelled correctly.
Requested Url: /description/details/WebForm1.aspx
experts,please help me! in this context.
thanks
tirumal
|
|
|
|
|
Use find and replace on the entire project for
WebForm1.aspx
Replace with
students.aspx
|
|
|
|
|
hello guys
i m new in drawing in vb.net
i want to to draw an ellipse
i found the following function supplied by MSDN
Public Sub FillEllipseRectangle(ByVal e As PaintEventArgs)<br />
<br />
<br />
Dim redBrush As New SolidBrush(Color.Red)<br />
<br />
<br />
Dim x As Integer <br />
Dim y As Integer <br />
Dim width As Integer = 20<br />
Dim height As Integer = 10<br />
Dim rect As New Rectangle(x, y, width, height)<br />
<br />
' Fill ellipse on screen.<br />
e.Graphics.FillEllipse(redBrush, rect)<br />
End Sub<br />
how can i call this function?? what about its parameter?(should i call PaintEventArgs)? ( am i stupid)?
note:x and y values can varies -the user chooses the locations
Regards
Ramy
|
|
|
|
|
besides that :
when the user clicks on a location, an ellipse will be drawn in this location showing him where he clicked
Regards
Ramy
|
|
|
|
|
Will the ellipse be the same size evey time or will the location determine the size?
|
|
|
|
|
let's begin with : the ellipse size is unchangeable(they can be predifined-hardcoded) ,
but the location of the ellipse is at the same place where the user has clicked...showing him where he clicked
Regards
Ramy
|
|
|
|
|
I have two different ideas:
1. Look at creating a custom cursor. I've never needed to create a cursor but it can't be that hard. Then add the new cursor to your project resources and on the on the mouse down event change the cursor and on the mouse release re-new the original cursor.
2. Create the ellipse as a transparent gif within your choice of graphics program, then, add it to your form within design view using the PictureBox control, setting visiable = false. On the mouse down event move the PictureBox to the mouse location and visiable = true, then, mouse release event visiable = false.
Basiclly every control the is displayed on your form has a Paint Event, (this is when the control is displayed) and it will create the PaintEventArgs. To use the function you've found on MSDN, you'd need to customize the form, more or less. If the above answers do NOT help you, please let me know, give me alit bit more information on what this ellipse that is displayed when the user clicks the form and I'll try and help you modify the form.
|
|
|
|
|
My friend,
i would like to thank you
coz the second method works good
So for so good for now,
will msg you later coz i need sght concerning that issue
thx any way
Regards
Ramy
|
|
|
|
|
sorry for bothering again...
Having a client & many servers S1---S17,
The role of the client is to connect simultaneously to these servers and collect data from them
Having a Map I should mark on it:
Location(X-Y pixels) of the server –the locations are already predefined
Ellipse or rectangle…filled with one of the RGB color depending of the collected data
Note more than one ellipse (indicating the location of the switch) can be filled on the map.
So what I m asking: can you help me with a function as the following
Public function (xlocation as integer, ylocation as integer, COLOR as ??)
Create an ellipse at xlocation and ylocation and fill it with COLOR
End function
Regards
Ramy
|
|
|
|
|
I can but I'm serving Jury Duty this week and trying to keep up with my dead-line at work in the evening. If your able to wait I'd be happy to help futher.
Sorry 
|
|
|
|
|
I've posted my source code[^] I'm hoping this is what your looking for and there's a ton of room for improvements.
Good luck. Tell me how it turns out.
|
|
|
|
|
General 
News 
Suggestion 
Question 
Bug 
Answer 
Joke 
Praise 
Rant 
Admin 
Submit an article or tip
