Jump to content
Xtreme .Net Talk

Mike Bailey

Avatar/Signature
  • Posts

    60
  • Joined

  • Last visited

About Mike Bailey

  • Birthday 04/16/1969

Personal Information

  • Visual Studio .NET Version
    Visual Studio .NET Professional

Mike Bailey's Achievements

Newbie

Newbie (1/14)

0

Reputation

  1. Thank you that suld do it.
  2. Can anyone pleas tell me how to get a pic from a web cam useing Visual Basic.net
  3. Check this site out http://www.systemwebmail.com/aboutme.aspx
  4. I found that you must add it manually at the top of the page Imports System.Web.Mail
  5. I�m trying to add a reference to system.web.mail to a project to be able to send email but I can�t find it in the add reference. [edit]We don't need twenty question marks. All it does is crowd the post. -Derek[/edit]
  6. How do you add custom made cursers to a VB project
  7. I was looking at your code and wanted to know how you would handle user name and pass word? I�M building a program for fun and want it to send email. My email server is Comcast. To point to that for outgoing mail is Mail.comcast.net for incoming mail is Smpt.comcast.net then there is a username and password how would that be handled in your code??????
  8. Can anyone tell me how to go about capturing an image from a web cam? I would like to have the web cam video in a label or picture box or what ever and click a button and have that image captured. Then I will have that image emailed. Thanks for any help Mike Bailey
  9. YaHoooooooo I just wanted to say thank you to all those who helped. I now have a fairly good understanding of one dimensional array�s. Here is my completed code for those interested. Comments and suggestions on better or more efficient ways of doing this are welcome 'Global Dim HighGrade As Integer = 0 Dim av_grade As Integer = 0 Dim LowGrade As Integer = 100 Dim GradeTotal As Integer Dim Grade(100) As String Dim score As Integer Dim I As Integer Private Sub btnAdd_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnAdd.Click For I = 0 To 100 Grade(I) = InputBox("Enter Score") If Grade(I) = "" Then Exit For End If If Val(Grade(I)) < 0 Then Exit For End If GradeTotal += Val(Grade(I)) Next av_grade = GradeTotal / I End Sub Function CalcGrade() Dim x As Integer For x = 0 To I - 1 If Val(Grade(x)) > HighGrade Then HighGrade = Val(Grade(x)) End If If Val(Grade(x)) < LowGrade Then LowGrade = Val(Grade(x)) End If Next End Function Private Sub btnCalc_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnCalc.Click CalcGrade() Me.lblAboveAve.Text = HighGrade Me.lblBelowAve.Text = LowGrade HighGrade = 0 av_grade = 0 LowGrade = 100 GradeTotal = 0
  10. all problems solved thanks for all the help everyone : :D
  11. No the problem is when it loop thru the array it is reading the value as 0 witch leads me to believe that it isn�t reading the value at all. The reason I know it is reading a value of 0 is; I set break points on the function when I run through it the HighGrade variable doesn�t change. How ever the LowGrade variable witch is initialized to 100 changes to 0.
  12. What is wrong with this? I jsut cant seem to figuer it out. Dim HighGrade As Integer = 0 Dim av_grade As Integer = 0 Dim LowGrade As Integer = 100 Dim GradeTotal As Integer Dim Grade(100) As String Dim score As Integer Dim I As Integer Private Sub btnAdd_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnAdd.Click [b]'This part Works fine[/b] For I = 0 To 100 Grade(I) = InputBox("Enter Score") If Grade(I) = "" Then Grade(I) = -1 ElseIf Val(Grade(I)) < 0 Then Exit Sub End If Next End Sub [b]'Here is where I'm haveing truble. I don't know what is wrong[/b] Function CalcGrade() Dim x As Integer For x = 0 To I If Val(Grade(I)) = 0 Then Exit Function If Val(Grade(I)) > HighGrade Then HighGrade = Val(Grade(I)) If Val(Grade(I)) < LowGrade Then LowGrade = Val(Grade(I)) End If End If End If Next End Function Private Sub btnCalc_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnCalc.Click CalcGrade() Me.lblAboveAve.Text = HighGrade Me.lblBelowAve.Text = LowGrade [b]'I was hoping this would set the varebel back to oreginal[/b] HighGrade = 0 av_grade = 0 LowGrade = 100 End Sub End Class
  13. Never mind i got it just had to think about it a little harder. Thanks for all the help.
  14. Ok thanks. The easy things never come easy for me. I have one last question. I would like to write a function that will loop thru the array checking each value. So that I can get the highest grade entered and the lowest and then and average. I will figure everything out my self but can you tell me how to check values in the array with a loop?
×
×
  • Create New...