Ascii Codes
Are there ASCII numbers for Ctrl, Alt, and Delete? If not, is there anyway to tell when one of them is pushed?
Thanks
View Complete Forum Thread with Replies
See Related Forum Messages: Follow the Links Below to View Complete Thread
Ascii Codes
Does anyone know if the arrow keys have an ascii code? if not, how would i go about capturing if an arrow key was pressed?
Ascii Codes
hey i'd like to find a list of ascii codes for specific keys like home, end, delete, left-right-up-down arrows, space bar, Ctrl, Alt, etc ...
any hints ?
thanx.
Huby.
ASCII Codes?
how coul i find ascii codes for weird symbols? does anyone have a program to run a ton of ASCII codes through and list how to do them?
i need to find ascii codes for(may be repetes)
åßÇÐËfgHîJk|mñöþ¶®§tüVw×¥z€ƒ†‡‰ŠŒ™šœŸ¢£¤¥¦§©ª«¬®±°¹ºÀÁÂÃÅÆÇÈÉÊËÌÑÐÕ×ØÛ ÝÞ¿ßâæçëðøþýÿ
Ascii Key Codes
I am trying to input into a textbox only numbers. I also want the backspace key to work and the delete key to work. For some reason the decimal point is still working. I look in the help menu msdn and it said the key code for the decimal point is 110. Below is my code. Am I doing something wrong? Any help would be welcome. Thank You.....
Code:
Private Sub txtABDeg_KeyPress(KeyAscii As Integer)
Select Case KeyAscii
Case 8, 48 To 57 ' Backspace, 0-9
' It is valid
Case 46 ' Delete Key ????
End Select
End Sub
Ascii Key Codes
Hi.
Can anyone tell me what the ascii codes are for :
Up arrow,
Down arrow,
Left arrow,
Right arrow.
also I need to know the ascii codes for the 4 numerical keypad arrows.
Thanks.
SKM
Ascii Codes
I'm playing around with a DV keyboard that has a Shuttle/Jog function. It sends keystrokes to your program. I am using the
VB Code:
Private Sub Form_KeyPress(keyAscii as integer)
to intercept the keystokes. Since the keystrokes are ascii integer codes, I need the codes for ALT+F1......ALT+F7, CTL+F1......CTL+F7, Shift+F1......Shift+F7, and ALT+CTL+F1.........ALT+CTL+F7.
Is there a downloadable source that list all the various integer codes?
How To Get The Ascii Codes For This
can any one help. I have a keyboard with thos stupid little buttons accross the top, theones to open your email and so on. Well I lost the drivers and I dont know who made the keyboard so I want to have a bash at it my self, It cant be to difficult all i have to do is get the asciii codes of what is being pressed. I used a key logger to see what was happing when I pressed the button and this is the response {H}. anybody know how to get vb to intertitate this. I have already tried it but the buttons to even trigger the keypress event....This might be harder than I thought....Any Suggestions
Cheers
Key Codes -> ASCII?
Hi!
Is any way to convert a key code to the ascii numbers? I saw a API function, but I no longer have it.
------------------
Thanks,
John, 14 years old
Key Ascii/Key Codes
Just wondering if anyone knows of any sources to where
i could reference all Key Ascii and Key Codes.
Ascii Character Codes In VB
Related to my previous post, I am trying to write a program that creates html files. How can I get VB to write a quotation mark when it is part of a line such as:
<SCRIPT language="JavaScript">
in the VB code, it looks something like:
PRINT #1, "<SCRIPT language=" + ?? + "Javascript" + ?? + ">"
but I'm not sure how to code the ?? to print a quotation mark in the final external html file.
Thanks.
Ascii Codes In Strings
Wotcha, folks.
We've come across an anomoly on the DB I've written for my work.
We have a text field that asks for basic description of works. This string is then reproduced elsewhere in reports and information labels, etc.
The problem is, sometimes the string ends abruptly and performs a carriage return of its own accord.
For instance, in one label we have a string built from from various bits of information from a record, such as: Job Number, works date, works description, Price, etc. And it displays along the lines of
JOB: 1234 -- 01 Jun 05 -- Replace Dead Lock -- £ 95.00
However, there are times when the above string is cut short, and gives only this....
JOB: 1234 -- 01 Jun 05 -- Replace De
Now, this only happens on the 'Works Description' part of the string. 'Works Description' is originally entered and saved via a simple text box.
Here is an example of a 'Works Description' that screws up the string building as mentioned above. It's seen here as it was actually entered, return presses and all.
Change Dead Lock?
*S-r
1 Of Chubb Bs Latchlock
After the '?' it starts a new line, yet other carriage returns are completely ignored (as intended). There always seems to be a problem when the characters '?' and '*' are used near each other.
Is this because of some weird ascii coding I'm not aware of?
Am I doing the equivalent of a chr(13) & chr (10) here without even noticing it?
Does the above make any sense to anyone? I do seem to rant on when I'm perplexed.
Any help much appreciated.
Much ta.
Jack.
Characters For ASCII Codes
I am trying to print out the characters for the numeric ASCII codes (e.g., 65 = 'A') It is printing out the numbers but not the letters. I don't know what I am doing wrong...Here is my code:
Dim i As Integer
Cls
For i = 65 To 90
Chr$ (i)
Print i
Next i
Ascii Codes? Resolved
Does anybody know How to Stop people inputting text in a text box and only letting numbers in?
Keyboard ASCII Codes......
Im currently playing with SendKeys, and I was wondering if anyone knew the codes for the keyboard keys? Such as the Function keys, enter,tab, ctrl, alt ect ect...?
Thanks a bunch!
Each Key On Keyboard Has 3 Ascii Codes!
You all know that each key, how can I see
all the ascii codes for, say the key: "q" ??
(I want to press 'q' and get the 3 ascii codes in a message box)
Must be a way right?
Mansour.
aslamm@taldor.co.il
Ascii Codes - One Morehelp
Hi,
here the state1 is the combinatin of the 8bits as shown below.
State 1 = (ASCII code for State 1 byte)
B7 B6 B5 B4 B3 B2 B1 B0
0 1 X X X X X X
i want ot know the ascii code for the combination. here the bit7 and bit6 are alwsy 0 and 1. All the otehr 6 are variable.
Using the combinations, what are the ascii codes will result..
Any help.. or any source code..
P.V.Velan
Edited by - vadivelan_vbcity on 7/29/2004 2:59:08 AM
HTML Ascii Codes
I need to search and replace html ascii codes in ALOT of data.. for example
" = chr$(34) etc....
since there is alot of data this function needs to be as fast as possible.. whats teh best way?
/Anders
Insert Ascii Character Codes
Most people want to remove ascii codes for special characters but I want to replace the special characters in a Word document with their ascii codes. Is there any automated way to do this? Or do I have to search for the characters and replace with their ascii coade text string?
Have A Problem Reading The Ascii Codes
I have a problem reading the ascii codes. Well I am trying to read the languages like Greece and Chinese. On my form I have received incorrect words something like this:
Code:
???e?
I am trying to get my experience for months to find ways how I could read ascii codes for my application. Maybe I should get ascii table, languages script or support control but have already tried on LoadResString. They will do nothing and will do the same things as when I am reading on ini string. I still have no luck to make a successful. The ascii codes which it should read like this:
Code:
Αρχείο
Any idea how you can help me out with this??
Hope you guys have a better experience to help me out.
Thanks,
Mark
Extended ASCII Codes In Vb6 Editor
Hi,
I want to be able to print the following:
┌───┬────────┬────────┬────────╥───┬────────┬────────┬────────┐
│No. │Due Date │Received │ Amount ║No. │Due Date │Received │Amount│ ├───┼────────┼────────┼────────╫───┼────────┼────────┼────────┤
Ofcourse it looke all good in NOTEPAD. In notepad if I hold down the ALT key and punch in the ascii code of these charcters they come just fine. I am trying to do the same in the VB6editor and it is not working. I even tried using the Chr(196) or what ever the cod eis but still not getting the same result.
Any help will be greatly appreciated.
How To Use Ascii Codes In Regular Expressions?
I'm trying to make a reg expression accept a range of ascii codes, for example:
^(([a-z])*)$
would accept lower cause alphabet chars.
I tried a variation:
^(([chr(32)-chr(41)])*)$
Basically I want to accept ascii codes 32 to 41, but this expression doesn't work.
How do I tell VB that I want a range of ascii codes?
I'm using Expressions 5.5
How To NOT Use Unicode When Putting Together A String (using Chr(ascii) Codes)
my guess is this is a unicode issue.
Heres what i want to do, split a file with delimiter chr(255) & chr(216).
My string contains the data..
GARBAGEDATA & chr(255) & chr(216) & IMPORTANTDATA & chr(255) & chr(217)
i then split the file again with delim chr 255 & 217...
now ive got IMPORTANTDATA isolated.
but how can i reput the chr(255) & 216 to the beginning of IMPORTANTDATA, and reput chr 255 and 217 to the end?
i tried..
Put #1, 1, Chr(255) & Chr(216) & ***2(1) & chr(255) & chr(217)
when saving but naturally it doesnt work (***2(1) is the importantdata)
when i looked at the file with a hex viewer.. theres these characters 0800 CD0A before the chr(255) & chr(217)
Parsing Ascii Colour Codes (they Look Like This --> [1;31m) (STILL UNRESOLVED...)
Does anyone know of a way to parse incoming text for ascii colour codes ([1;31m for example which is red) so that all text that follows the code is a certain colour? I.E, the MUD server at the other end which sends me the text with the codes in it sends:
|[1;36m "[1;37mDream the dream and let it come true...[1;36m" [1;37m|
which should, when parsed, show the following:
| "Dream the dream and let it come true..." |
Any ideas? The source is downloadable from http://members.lycos.co.uk/vinarianl.../esmud_src.zip and the compiled version from http://members.lycos.co.uk/vinarianlegends/esmud.zip. If you can help, it'd be appreciated.
Oh, and while I remember, there's an annoying problem with that code where it adds a CrLf at the end of every line, but I don't want it to, because then you get loads of blank lines. If oyu run the prog, you'll see what I mena, but anyway, is there a way to search the incoming text line by line and remove the crlf fromthe end of each line? The server sends its text in UNIX format if that's any help... I got around that by using RTF boxes instead of normal text boxes, but it doubles the CrLf's rather than completely ignoring them. I'm confusing myself to...
Ben.
P.S. The source is based heavily on a tutorial from www.vbip.com, so no moaning about "Oh, you didn't write all of this", because I know I didn't, OK? I didn't know much about WinSocks until last night. *pokes*
ASCII Escape Codes (color) To HTML Syntax
The past couple days I was home sick and had time to sit at the computer and not really have to work. So I went looking for one of my favorite MUD games from like 20 years ago (back in the BBS days before the internet). I was amazed at how easy it was to find and found it up and running at a popular place. It runs via Telnet (as expected) and I could play without any problems. Of course, I hated having to use the TelNet window and people in the game suggested various MUD interfaces that have been built. Being a programmer I felt no need to have to download some program somebody else made (especially since some wanted to pay to use) so I knew there was not much to it so I opened VB and literally within a few minutes I had my own interface up and running using Winsock for the connection and a browser window to display the text of the game (of course the ability record and playback macros and buttons for assigning quick actions). But luckily for me the game/site allows for the option to play the game without ascii escape character codes thus just sending the text. But I would like to allow it to read them and convert those codes to HTML syntax instead if I opt to tell the game to use them.
I was just curious, has anybody put together a routine to convert such codes already? Searching online has not turned up anything yet. I know with time I can work it all out but why reinvent the wheel if somebody has already done it.
Clint LaFever (aka: DaVBMan)
Edited by - DaVBMan on 3/9/2006 9:53:28 AM
How To Pass Printer Codes (ASCii Values) To Dotmatrix Printer?
I want to pass printer code values to dotmatrix printer.
here some of the printer codes listed below
Printer Operation:
Decimal ASCII Description
7 BEL Beeper
17 DC1 Select printer
19 DC3 Deselect printer
how to pass vlues values using printer.print object.
Ascii Codes For "ARROW KEYS"??
Does anyone know the ascii codes for the arrow keys so that i can move characters around on the form. It would be really appreciated if someone could tell me. I'm kind of new at vb programming. Just learning this year at school. THANKS A BUNCH!
Extended Ascii/unicode String Conversion To Stanard Ascii
I encountered problems when sending certain characters from Windows VB to IBM Mainframe Cobol/DB2 such as
‘(left single quote) or ’(right single quote). All the characters after the extended ascii got cut off. I don't have problems when sending '(single quote).
Is there any vb functions to convert it? Or maybe changing the
XEOLEDB mapping below would fix it (sample code below)?
{L"DESCRIPTION4", NULL, 68,STANDARD_COL_FLAG, 56, DBTYPE_BSTR, 0,0,0},
I am not familiar with IBM Mainframe and the service connecting VB to it. My only solution right now is to use the replace function but I am afraid there will be a performance problem.
thanks
clark
Convert Ascii Constant To Ascii Value With Program
How would I go about doin the following? If a string contains "vbKeyF1", how would i get vbKeyF1's ASCII value equivalent (ie: 112) to be written in another string?
Edited by - Marce22 on 10/10/2003 7:04:38 PM
Key Codes
What are the key codes for W A S D?
Codes!
WARNIGN SOME BIGG CODES IS coming up!
this is my code so far in mah first game : PACMAN...and believe it or not i am doing all that great!..but neways ummm my food part works only thing is i want it to be more effecient as in it should jus disappear as Soon as trhere is a contact with PACMAN...and i haven;t worked on walls as yet......ne ideas bout tht??....IM NOT USING BITBLT...so forget it!
here it is
Code:
Dim OLDPOSX As Long 'hold the X-position of image before updating
Dim OLDPOSY As Long ' hold the Y-position of image before updating
Dim OLDPOSX2 As Long 'HOLDS THE X-POSITION ALONGWITH THE WIDTH
Dim OLDPOSY2 As Long ' HOLDS THE Y-POSITION ALONGWITH WITH THE HEIGHT
Dim WALLCOL As Boolean ' FOR THE WALL
Dim FOOD As Boolean ' FOR THE FOOD
Dim DEAD As Boolean 'FOR COLLISION WITH THE GHOST
Dim PHASE As Integer 'VARIABLE TO KEEP DIRECTION OF PACMAN'S MOUTH
Dim COUNTER As Integer
Dim LIVES As Integer
Private Sub form_load()
PicPacm(0).Visible = True
PicPacm(1).Visible = True
LIVES = 3
End Sub
Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer)
'TO MOVE THE PAC MAN
Select Case KeyCode
Case vbKeyLeft
PicPacm(7).Visible = True
PicPacm(6).Visible = True
PicPacm(0).Visible = False
PicPacm(1).Visible = False
PicPacm(2).Visible = False
PicPacm(3).Visible = False
PicPacm(4).Visible = False
PicPacm(5).Visible = False
PicPacm(7).Left = PicPacm(7).Left - 100
PicPacm(6).Left = PicPacm(6).Left - 100
PicPacm(1).Left = PicPacm(1).Left - 100
PicPacm(0).Left = PicPacm(0).Left - 100
PicPacm(2).Left = PicPacm(2).Left - 100
PicPacm(3).Left = PicPacm(3).Left - 100
PicPacm(4).Left = PicPacm(4).Left - 100
PicPacm(5).Left = PicPacm(5).Left - 100
PHASE = 6
Case vbKeyUp
PicPacm(4).Visible = True
PicPacm(5).Visible = True
PicPacm(7).Visible = False
PicPacm(6).Visible = False
PicPacm(0).Visible = False
PicPacm(1).Visible = False
PicPacm(2).Visible = False
PicPacm(3).Visible = False
PicPacm(7).Top = PicPacm(7).Top - 100
PicPacm(6).Top = PicPacm(6).Top - 100
PicPacm(1).Top = PicPacm(1).Top - 100
PicPacm(0).Top = PicPacm(0).Top - 100
PicPacm(2).Top = PicPacm(2).Top - 100
PicPacm(3).Top = PicPacm(3).Top - 100
PicPacm(4).Top = PicPacm(4).Top - 100
PicPacm(5).Top = PicPacm(5).Top - 100
PHASE = 4
Case vbKeyRight
PicPacm(1).Visible = True
PicPacm(0).Visible = True
PicPacm(4).Visible = False
PicPacm(5).Visible = False
PicPacm(7).Visible = False
PicPacm(6).Visible = False
PicPacm(2).Visible = False
PicPacm(3).Visible = False
PicPacm(7).Left = PicPacm(7).Left + 100
PicPacm(6).Left = PicPacm(6).Left + 100
PicPacm(1).Left = PicPacm(1).Left + 100
PicPacm(0).Left = PicPacm(0).Left + 100
PicPacm(2).Left = PicPacm(2).Left + 100
PicPacm(3).Left = PicPacm(3).Left + 100
PicPacm(4).Left = PicPacm(4).Left + 100
PicPacm(5).Left = PicPacm(5).Left + 100
PHASE = 0
Case vbKeyDown
PicPacm(3).Visible = True
PicPacm(2).Visible = True
PicPacm(1).Visible = False
PicPacm(0).Visible = False
PicPacm(4).Visible = False
PicPacm(5).Visible = False
PicPacm(7).Visible = False
PicPacm(6).Visible = False
PicPacm(7).Top = PicPacm(7).Top + 100
PicPacm(6).Top = PicPacm(6).Top + 100
PicPacm(1).Top = PicPacm(1).Top + 100
PicPacm(0).Top = PicPacm(0).Top + 100
PicPacm(4).Top = PicPacm(4).Top + 100
PicPacm(5).Top = PicPacm(5).Top + 100
PicPacm(2).Top = PicPacm(2).Top + 100
PicPacm(3).Top = PicPacm(3).Top + 100
PHASE = 2
End Select
'FOR THE WALLS
'For j = 0 To 12
'If < imgWall(j).Left Or oldposX1 > (imgWall(j).Left + imgWall(j).Width) Or OLDPOSY2 < imgWall(j).Top Or oldposy1 > (imgWall(j).Top + imgWall(j).Height) Then
' WALLCOL = True
' Else
' WALLCOL = False
'End If
'Next j
'CONDITION FOR THE BOOLEAN OPERATOR
'For i = 0 To 7
' If WALLCOL = True Then
' PicPacm(i).Top = PicPacm(i).Top - 80
' End If
'Next i
X1 = PicPacm(0).Left
X2 = PicPacm(0).Left + PicPacm(0).Width
Y1 = PicPacm(0).Top
Y2 = PicPacm(0).Top + PicPacm(0).Height
If PicPacm(0).Visible = True And PicPacm(1).Visible = True Then
X1 = X1 + 80
X2 = X2 + 80
ElseIf PicPacm(6).Visible = True And PicPacm(7).Visible = True Then
X1 = X1 - 80
X2 = X2 - 80
ElseIf PicPacm(2).Visible = True And PicPacm(3).Visible = True Then
Y1 = Y1 + 80
Y2 = Y2 + 80
ElseIf PicPacm(4).Visible = True And PicPacm(5).Visible = True Then
Y1 = Y1 - 80
Y2 = Y2 - 80
End If
'FOR FOOD
For i = 0 To 11
If X1 >= imgFood(i).Left And X1 <= imgFood(i).Left + imgFood(i).Width And Y1 >= imgFood(i).Top And Y1 <= imgFood(i).Top + imgFood(i).Height Then
imgFood(i).Visible = False
ElseIf X1 >= imgFood(i).Left And X1 <= imgFood(i).Left + imgFood(i).Width And Y2 >= imgFood(i).Top And Y2 <= imgFood(i).Top + imgFood(i).Height Then
imgFood(i).Visible = False
ElseIf X2 >= imgFood(i).Left And X2 <= imgFood(i).Left + imgFood(i).Width And Y1 >= imgFood(i).Top And Y1 <= imgFood(i).Top + imgFood(i).Height Then
imgFood(i).Visible = False
ElseIf X2 >= imgFood(i).Left And X2 <= imgFood(i).Left + imgFood(i).Width And Y2 >= imgFood(i).Top And Y2 <= imgFood(i).Top + imgFood(i).Height Then
If Y1 >= imgFood(i).Left And Y1 <= imgFood(i).Left + imgFood(i).Width And imgFood(i).Visible = True Then
imgFood(i).Visible = False
ElseIf Y2 >= imgFood(i).Left And Y2 <= imgFood(i).Left + imgFood(i).Width And imgFood(i).Visible = True Then
imgFood(i).Visible = False
End If
End If
Next i
lblSco1.Caption = COUNTER
If lblSco1.Caption = 12 Then
MsgBox "YEH!!......WAY TO GO!"
Unload frmLev1
Unload FrmIntro1
End If
'FOR THE COLLISION WITH BLUE GHOST
For i = 1 To 7
If PicPacm(i).Left >= ImgGhost.Left And PicPacm(i).Left <= ImgGhost.Left + ImgGhost.Width And PicPacm(i).Top >= ImgGhost.Top And PicPacm(i).Top <= ImgGhost.Top + ImgGhost.Height Then
DEAD = True
LIVES = LIVES - 1
ElseIf PicPacm(i).Left >= ImgGhost.Left And PicPacm(i).Left <= ImgGhost.Left + ImgGhost.Width And PicPacm(i).Top + PicPacm(i).Height >= ImgGhost.Top And PicPacm(i).Top + PicPacm(i).Height <= ImgGhost.Top + ImgGhost.Height Then
DEAD = True
ElseIf PicPacm(i).Left + PicPacm(i).Width >= ImgGhost.Left And PicPacm(i).Left + PicPacm(i).Width <= ImgGhost.Left + ImgGhost.Width And PicPacm(i).Top >= ImgGhost.Top And PicPacm(i).Top <= ImgGhost.Top + ImgGhost.Height Then
DEAD = True
ElseIf PicPacm(i).Left + PicPacm(i).Width >= ImgGhost.Left And PicPacm(i).Left + PicPacm(i).Width <= ImgGhost.Left + ImgGhost.Width And PicPacm(i).Top + PicPacm(i).Height >= ImgGhost.Top And PicPacm(i).Top + PicPacm(i).Height <= ImgGhost.Top + ImgGhost.Height Then
If PicPacm(i).Top >= ImgGhost.Left And PicPacm(i).Top <= ImgGhost.Left + ImgGhost.Width And ImgGhost.Visible = True Then
DEAD = True
ElseIf PicPacm(i).Top + PicPacm(i).Height >= ImgGhost.Left And PicPacm(i).Top + PicPacm(i).Height <= ImgGhost.Left + ImgGhost.Width And ImgGhost.Visible = True Then
DEAD = True
End If
End If
Next i
If DEAD = True Then
MsgBox "GAME OVER!"
DEAD = False
PicPacm(0).Visible = True
PicPacm(1).Visible = True
PicPacm(2).Visible = False
PicPacm(3).Visible = False
PicPacm(4).Visible = False
PicPacm(5).Visible = False
PicPacm(6).Visible = False
PicPacm(7).Visible = False
PicPacm(0).Left = 360 And PicPacm(o).Top = 3240
PicPacm(1).Left = 360 And PicPacm(1).Top = 3240
PicPacm(2).Left = 360 And PicPacm(2).Top = 3240
PicPacm(3).Left = 360 And PicPacm(3).Top = 3240
PicPacm(4).Left = 360 And PicPacm(4).Top = 3240
PicPacm(5).Left = 360 And PicPacm(5).Top = 3240
PicPacm(6).Left = 360 And PicPacm(6).Top = 3240
PicPacm(7).Left = 360 And PicPacm(7).Top = 3240
tmrGhost.Enabled = True
lblLives.Caption = LIVES
End If
Exit Sub
For i = 1 To 7
If DEAD = True Then
PicPacm(i).Left = 360
PicPacm(i).Top = 2520
End If
Next i
End Sub
Private Sub tmrGhost_Timer()
tmrGhost.Enabled = True
ImgGhost.Left = ImgGhost.Left + 50
If ImgGhost.Left >= 6210 Then
ImgGhost.Left = 2040
End If
End Sub
'Private Sub tmrGhost1_Timer()
'NUM = Int(99 - 50 + 50) * Rnd + 50
'tmrGhost1.Enabled = True
' picPurp.Top = picPurp.Top - NUM
End Sub
Private Sub tmrMouth_Timer()
' FOR THE MOUTH OF THE PACMAN...CURRENTLY NOT WORKING
For PHASE = 0 To 6 Step 2
tmrMouth.Enabled = True
If PicPacm(PHASE).Visible = True Then
PicPacm(PHASE + 1).Visible = True
PicPacm(PHASE).Visible = False
Else
PicPacm(PHASE + 1).Visible = False
PicPacm(PHASE).Visible = False
End If
End Sub
2 Codes?
Alright.. for my game. i need items like most games. but i Play Ultima Online on a Sphere Emulator. i want to make my items with the Sphere Coding because i am quite good at it. or develope my own language that the server control would use.
My game has a few questions. How do i set it to be online where players see each other and can interact? How do i make a Console thing that runs the server that the game is played on. andhow do i make it read off special coding made in notepad? and i need to Make some DLL's which i forget how to do. and i need Major help! lol... if i can get these answers and some decent tutorials that would be great. thanks
Alt Codes
I've got a frustrating little problem. I have an Excel spreadsheet in which I use a data validation option containing the ▲ (alt 30) and ▼ (alt 31) symbols. Point is that I want to use those symbols in VBA as well, but VBA does not seem te recognise them. Does anyone have any idea how to incorporate these symbols in VBA?
About VBA Codes....
Hi there. I got a small VBA code to do some checking and simple calculation for dates.
C D
12/7/200415/7/2004
21/7/200425/7/2004
Code:
dim LB as date
dim k as integer
dim cnt as integer
dim diff as double
LB = textbox1.text
Worksheets("Sheet1").Activate
Range("C1").Select
Do while Activecell <> " "
cnt = cnt + 1
Activecell.Offset(1,0).Range("A1").Select
Loop
LB is defined as an enquired date. The codes will scan through Column "C" to check
(1) If the LB falls in the leave period (i.e. LB < = range("D" & cnt).value and LB > range("C" & cnt).value); and
(2) If the LB falls between the two leave periods (i.e. LB > range("D" & cnt).value and
LB < range("C" & cnt + 1).value.
If (1) is true, pop up Msgbox "Enquired date is within the leave period!"
If (2) is true, count the no. of the days from the enquired date (e.g. LB) back to the end-date of the leave period (e.g. from LB = 20/7/2004 (dd/mm/yyyy) back to 15/7/2004 ("D1") in this case).
Can anyone please advise me of the valid codes for the above purpose?
Cheers.
2 Codes Need Help
I need help with 2 easy issues that are not working.
I need to write two visual basic codes.
1. to print a selected area from an auto filter. The code I have now prints all the pages blank, aswell as the selected area, I only want the selected area.
2. I have included an exit button, but when I click exit I do not want to be asked to save changes. I want the program to close without saving, and without the save daliog.
Any help is wonderfull.
Thanks
I apologize if this question should be in a different forum heading, first time here, and if so where should I ask it.
Thanks
Codes
hi to expert,
I have the following 'C' codes. I wished to convert to VB codes but i faced a lot problems. Can help me solve this codes.Tks
_________________________________________________
Slidex = Cs / M1
m = Slidex / Cb
cdist = f * (m + 1) / (m * 1000)
For I = -1 To 1
M2 = M1 * (Cd + I) / Cd
Slidex = 10 * Cs / M2
H(I + 2) = Slidex * ((cdist * 1000) / (f - 1) / 10)
Next I
Print " Viewing distance (m) Calibration bar (cm)"
For I=-1 TO 1
Print Using " #,# ###,###";cd+I;H(I+2)
Next I
______________________________________________________
Thank you very much
Justin
RTF Codes
Does anybody know where I can find info on the RTF codes? I had a look but none of the ones I found made a lot of sense. Alternatively, if someone knows how colourtables and setting colour of certain text works in RTF then please tell me.
Thanks.
Asc Codes?
Im making a code encrypting program. and it uses the last keys ASC code. BUT it seems "a" and "A" have the same asc code? is there any alternative instead of ASC (code and command) that has one number PER character. for example the ALT system. you press ALT+any number, and a certain character comes up, case sensetive, and there are several thousand.
please help me
Thanks! /Jonathan
Web Codes
can i use the webrowser to view my Html code? If i have the code
<font color=red> Hello World!</font>
how can i view it in my project.
Need Some Help With Codes Here
Private Sub lblCheckAge_Click()
YourName = txtName.Text
If YourName = "" Then
MsgBox "Please enter Name", 16, "Name missing"
Else
YourDOB = InputBox(YourName & " ,in which year were you born?")
If IsNumeric(YourDOB) Then
YourAge = Year(Now) - YourDOB
MsgBox "You are " & YourAge & " years old"
Else
MsgBox "Please enter number only", 16, "Illegal Input"
End If
That was my general code statement but The Else can't be combined with If, Then. So any idea how to join it so that it actually works?
If i changed the Else to End if....The Msgbox showing the error will appear but then the input box will show after that. So i need to make it in such a way that only when the user keys in a name then he'll be able to proceed to the input box....
Thanks to those who answer my question
Old Codes
Hi,
I have an old code written in QuickBasic that needs to be re-written in VB. The problem is, the QB program handles interrupt:
e.g.
Code:
Call INTERRUPTX(&H25, InReg, OutReg)
I have no idea how to handle this in VB.
Another problem is this code:
Code:
DEF SEG = VARSEG(DataStorage)
POKE VarPtr(DataStorage) + I - 1, ThisByte
I know that these statements are lost in VB. I can't figure out the VB equivalent or even a work-around.
Please help me. Codes, links, tips, or whatever that will help.
Thanks.
Codes
hey. Can you people all help me, that know VB or VB6 really good. what are some cool codes i can use?? for VB. Just so i can jot some notes down on codes, Just some easy codes. if possable. Thanks.
Key Codes
Hey
I use the string
Code:
If KeyCode = VbKeyA Then
'command line for if
End If
Can you please give me the keycodes for the following buttons:
Number 0-9 on the TOP of the keyboard (not the numpad) What i would need to do to use the following characers: ! " £ $ % ^ & * ( ) _ + } { ~ @ : ? > < , . / ; ' # ] [ | ` The "Home" button Page Up Page Down Backspace Return (enter) Numpad return (enter) Insert Print Screen Scroll Lock Caps Lock Num Lock Pause/Break
Thanks in advance guys
|
TRACKER
