Free Games Forum: Game Technology: Visual Basic / VB: My first "client"


	FORUM HOME	SEARCH POSTS	WHO'S ONLINE	LOG IN	RULES / FAQ REPORT SPAM

Free Games Forum: Game Technology: Visual Basic / VB:
My first "client"

Print Thread

The chael
Newbie

Apr 2, 2006, 8:24 PM

Post #1 of 6 (459 views)
Shortcut

My first "client"	Can't Post

Who would like to try it for me? It has an auto talker and a calculater but unfortunatly no world switcher... yet (i am new to this). here is the link: http://www.thefilehut.com/userfiles/novacode/NovaClient%20Beta.zip

do your best to find any bugs in it ;) oh and, I am not sure what type of file this is, it may be .exe but if it is I promise there are no viruses or nothing, ill even post the code for the whole thing if you want reassurance.

Jaymzanator
Enthusiast

Apr 2, 2006, 11:41 PM

Post #2 of 6 (455 views)
Shortcut

Re: [The chael] My first "client" [In reply to]	Can't Post

that was a good project; i trust that you have made it on vb.net

if this is your first web/maths project you have done well to produce a well thought out peice of software rated 8.6/10 there were a few problems with it; ill tell you about them in the constructive criticism

constructive criticism:

1) contained error handling

solution:

put this code at the top of all of the subs for the Maths part of the client

Code

    
  
On Error GoTo errorhandler1 'this tells the app to handle the error

then put your maths e.g. outtext = val(texta) * val(textb)

the after the maths write this

Code

    
  
Exit Sub  
  
errorhandler1:  
  
Dim msgtitle As String  
  
msgtitle = ("Nova Client")  
  
MsgBox("Math error occured", MsgBoxStyle.Critical, (msgtitle))  
  
Exit Sub  
  
End Sub

(17:20) Taz:
and tazg is lol'in at you all the way from canada
(17:21) James:
lol canadians

(This post was edited by Jaymzanator on Apr 2, 2006, 11:52 PM)

The chael
Newbie

Apr 3, 2006, 12:19 AM

Post #3 of 6 (448 views)
Shortcut

Re: [Jaymzanator] My first "client" [In reply to]	Can't Post

oh, thank you for this code Angelic

EDIT: pity I can't use it lol, I get errors, alot of them, could you post an example of the code already added to the origanal code?

(This post was edited by The chael on Apr 3, 2006, 12:28 AM)

Jaymzanator
Enthusiast

Apr 4, 2006, 8:05 PM

Post #4 of 6 (437 views)
Shortcut

Re: [The chael] My first "client" [In reply to]	Can't Post

http://www.badongo.com/file/427842

(17:20) Taz:
and tazg is lol'in at you all the way from canada
(17:21) James:
lol canadians

The chael
Newbie

Apr 5, 2006, 9:08 PM

Post #5 of 6 (426 views)
Shortcut

Re: [Jaymzanator] My first "client" [In reply to]	Can't Post

yes, that works, thanks. I would use that on an ordinary calculator.However I figured out a useful way to do they same thing your error handler is doing, blocking strings from a textbox:

Code

  
 
Private Sub TextBox5_KeyPress(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyPressEventArgs) Handles TextBox5.KeyPress 
 
If Not Char.IsDigit(e.KeyChar) AndAlso Not Char.IsControl(e.KeyChar) Then 
 
e.Handled = True 
 
End If 
 
End Sub

This doesn't let you enter letters at all which is good. Problem is it doesn't allow decimal places, but then, my calculator is in a RS2 client and you do not get 4.5gp or anything like that in RS.

There is something you could help me with though, and it just means 'tweaking' your error handler a bit. At the minute it displays an error message when you click calculate (or similar) and you had a string in either box. How could the code be changed so that it brought up the message when a user entered a letter in one specified textbox? (this would before the time delay box in the auto typer). I am asumming it would be a KeyDown / KeyPress event. I would need to be able to enter decimal places in this btw.

Jaymzanator
Enthusiast

Apr 6, 2006, 12:40 AM

Post #6 of 6 (425 views)
Shortcut

Re: [The chael] My first "client" [In reply to]	Can't Post

eek. i how how to process an error in vb6, but vb8 is different; it doesnt say what the error code is

it is hard to have your custom descriptions im not sure if this will work because this is code off of a vb5 project

(overflow)

Code

 ErrorHandler1:	dim errDesc as string	errDesc = Err.Description	msgbox "Error Encountered: " & errDesc

(17:20) Taz:
and tazg is lol'in at you all the way from canada
(17:21) James:
lol canadians

Print Thread

Search for (options)

Web Design by Web Ideas - Page loaded in: 0.18 s on (CGI/1.1)