Welcome, Guest |
You have to register before you can post on our site.
|
Online Users |
There are currently 4 online users. » 1 Member(s) | 1 Guest(s) Bing, Google, MorrissgoX
|
Latest Threads |
Looking for Adventure? Fi...
Forum: Random Discussion
Last Post: iHOMEz
11-16-2024, 09:18 PM
» Replies: 0
» Views: 491
|
Prettys Womans in your to...
Forum: Random Discussion
Last Post: iHOMEz
10-30-2024, 07:45 AM
» Replies: 0
» Views: 773
|
Prettys Womans in your ci...
Forum: Random Discussion
Last Post: iHOMEz
10-26-2024, 10:50 AM
» Replies: 0
» Views: 805
|
Beautiful Womans from you...
Forum: Random Discussion
Last Post: iHOMEz
10-19-2024, 02:48 PM
» Replies: 0
» Views: 906
|
Prettys Womans in your ci...
Forum: Random Discussion
Last Post: iHOMEz
10-06-2024, 05:00 PM
» Replies: 0
» Views: 1,064
|
Womans from your city - V...
Forum: Random Discussion
Last Post: iHOMEz
07-28-2024, 10:26 AM
» Replies: 0
» Views: 1,438
|
Supreme Сasual Dating - A...
Forum: Random Discussion
Last Post: iHOMEz
06-14-2024, 11:28 AM
» Replies: 0
» Views: 1,860
|
Beautiful Womans in your ...
Forum: VB.NET
Last Post: iHOMEz
06-09-2024, 09:23 PM
» Replies: 0
» Views: 1,674
|
Hangman in Rust
Forum: Other
Last Post: brandonio21
02-04-2018, 11:14 AM
» Replies: 2
» Views: 20,674
|
How to: Search files from...
Forum: VB.NET
Last Post: brandonio21
11-25-2017, 12:55 PM
» Replies: 1
» Views: 15,983
|
|
|
Problem with Syntax Highlighting? |
Posted by: brandonio21 - 04-02-2011, 03:58 PM - Forum: Programming Help
- Replies (2)
|
|
Hey guys. Here's a question for ya guys...
Code: Dim listbox1 As New ListBox
listbox1.Items.Add("<br/>")
Dim int As Integer = 0
Dim line As String = RichTextBox1.GetLineFromCharIndex(RichTextBox1.SelectionStart)
For Each item In listbox1.Items
If RichTextBox1.Lines(line).Contains(item) Then
Dim instance As Integer = RichTextBox1.Find(item, RichTextBox1.SelectionStart - CInt(item.ToString.Length), RichTextBox1.SelectionStart)
If instance > 0 Then
RichTextBox1.SelectionStart = RichTextBox1.SelectionStart - CInt(item.ToString.Length)
RichTextBox1.SelectionLength = item.ToString.Length
RichTextBox1.SelectionColor = Color.Blue
End If
End If
Next
RichTextBox1.SelectionStart = ss
RichTextBox1.SelectionLength = sl
RichTextBox1.SelectionColor = Color.Black
My coding selects an item from the list box and tries to color the words in the currently selected line, however, it often colors characters that come after the instance. Why is this happening?
|
|
|
Pleese help Brandonio21 |
Posted by: RushingRussian - 04-01-2011, 12:23 AM - Forum: Programming Help
- Replies (2)
|
|
i made an encrypter function which encrypts text by replacing the letters with some random binary numbers i want to make something more advanced which is included in vb.
I looked on youtube but didnt find anything advanced but easy PLZ HELP. <!-- s:roll: --><img src="{SMILIES_PATH}/icon_rolleyes.gif" alt=":roll:" title="Rolling Eyes" /><!-- s:roll: --> <!-- s:roll: --><img src="{SMILIES_PATH}/icon_rolleyes.gif" alt=":roll:" title="Rolling Eyes" /><!-- s:roll: --> <!-- s:roll: --><img src="{SMILIES_PATH}/icon_rolleyes.gif" alt=":roll:" title="Rolling Eyes" /><!-- s:roll: --> <!-- s --><img src="{SMILIES_PATH}/icon_e_biggrin.gif" alt="" title="Very Happy" /><!-- s -->
Code: Public Function encrypt() As String
Dim letat, letspace, a, b, c, d, e, f, g, h, i, j, k, l, m, n, o, p, q, r, s, t, u, v, w, x, y, z As String
Dim outcome As String
letat = "@"
letspace = " "
a = "a"
b = "b"
c = "c"
d = "d"
e = "e"
f = "f"
g = "g"
h = "h"
i = "i"
j = "j"
k = "k"
l = "l"
m = "m"
n = "n"
o = "o"
p = "p"
q = "q"
r = "r"
s = "s"
t = "t"
u = "u"
v = "v"
w = "w"
x = "x"
y = "y"
z = "z"
outcome = TextBox1.Text
outcome = Replace(outcome, letat, "0100101101100110000010011010000")
outcome = Replace(outcome, letspace, "10111011010110010100111110011011010101100100000110010100101100010110000100100000101011101010001010")
outcome = Replace(outcome, a, "1110000001111000111001110001010101011110110010010000100100010110111011010110000111101110100")
outcome = Replace(outcome, b, "1101110010011001110001100110110001001011000101010100000100001111110101111110111000111000010")
outcome = Replace(outcome, c, "00011000100100111001100001111010001010000001011100000101110000110010111110010101010110111110011100100")
outcome = Replace(outcome, d, "0000011000010010")
outcome = Replace(outcome, e, "1110110001101110100111111010001101000011100100101011101110100000101001001010011101000100101010100100")
outcome = Replace(outcome, f, "1001001010011100")
outcome = Replace(outcome, g, "1111011011100000")
outcome = Replace(outcome, h, "0100000001101110")
outcome = Replace(outcome, i, "0101110000000111")
outcome = Replace(outcome, j, "1001000111010000")
outcome = Replace(outcome, k, "0010100011010000")
outcome = Replace(outcome, l, "1000000001111010")
outcome = Replace(outcome, m, "1010110000100011")
outcome = Replace(outcome, n, "1011111000100111")
outcome = Replace(outcome, o, "0000000000000000")
outcome = Replace(outcome, p, "0011110101001000")
outcome = Replace(outcome, q, "0001110011011011")
outcome = Replace(outcome, r, "0000111010001010")
outcome = Replace(outcome, s, "1012020201102")
outcome = Replace(outcome, t, "11101010001110110110101011000101010100000001110110101011110101111100100101101000001011000101001")
outcome = Replace(outcome, u, "1110101100001011")
outcome = Replace(outcome, v, "1011111001110000")
outcome = Replace(outcome, w, "1000110010010001")
outcome = Replace(outcome, x, "1001111010000011")
outcome = Replace(outcome, y, "0101100001010110")
outcome = Replace(outcome, z, "1011111010010001")
encrypt = outcome
Return encrypt
End Function
|
|
|
World of Warcraft Launcher Progress |
Posted by: xolara - 03-20-2011, 08:50 AM - Forum: VB.NET (Visual Basic 2010/2008)
- Replies (2)
|
|
I have so far uploaded 3 parts of my launcher to youtube
Quote from me on RaGEZONe (first post)
Quote:Hey if you are in need of a wow launcher for your server i might have one for you
I am currently programming a launcher that is completely customizeable
This is what it features
- Realm Lists
- Own Background
- Language Change
- Settings
- Lock your settings for a unique WoW Launcher (This option lets the owner of the server lock the settings, means Realms,Settings and background so it wont be changeable by the user of the launcher)
- Live News (This you setup yourself )
There will be no Adverts to me or to anything else
It dosnt cost you anything but your interest
Progress:
I am currently only coding the program not working on the design yet
you can see an early view of the program (It has allready changed alot since then)
Quote from me on RaGEZONe (second post)
Quote:This is for Testing purpose for you to send me some feedback
All negative posts keep them to your self
Design isnt done and neither is the coding but it soon will
<!-- m --><a class="postlink" href="http://dl.dropbox.com/u/12582973/wowlauncher.zip">http://dl.dropbox.com/u/12582973/wowlauncher.zip</a><!-- m -->
This is how it looks like now
it is still in development!!!
Part 1
<!-- m --><a class="postlink" href="http://www.youtube.com/watch?v=MykwbP30B_M">http://www.youtube.com/watch?v=MykwbP30B_M</a><!-- m -->
Part 2
<!-- m --><a class="postlink" href="http://www.youtube.com/watch?v=rX7Bqo7u4Do">http://www.youtube.com/watch?v=rX7Bqo7u4Do</a><!-- m -->
Part 3
<!-- m --><a class="postlink" href="http://www.youtube.com/watch?v=TPObQ7-Sy6c">http://www.youtube.com/watch?v=TPObQ7-Sy6c</a><!-- m -->
Read more from Ragezone at: <!-- m --><a class="postlink" href="http://forum.ragezone.com/f114/wow-launcher-server-736281/">http://forum.ragezone.com/f114/wow-laun ... er-736281/</a><!-- m --> (its a forum for Private Servering and stuff)
Quote from ManCent from RaGEZONe
Quote:you know this is a awesome idea. if you create a website to let the user who owns a private server to login and update the sever name realmlist and what not!
from the web that would inject into the database where the client pulls the data to every one who has your launcher.
Then make it a pay system say 9.99 for a year service.
You would want to also add a port check to the php file where the client reads to make sure the server is online and able to allow the player to login.
Also add some more code to read data where patch notes are if its a 2.3.4 server or a 4.0.6 server the client would know what patch your wow client is and read data from website database where patch, and if server is private public ect..
Good job.. If your interested in making this the way I described I would be willing to help! PM me
|
|
|
need help with codes |
Posted by: FILIP - 03-18-2011, 06:48 AM - Forum: Programming Help
- Replies (4)
|
|
is it a web or something there you can see all or some of the codes in visual basic 2008 exspress <!-- s:?: --><img src="{SMILIES_PATH}/icon_question.gif" alt=":?:" title="Question" /><!-- s:?: -->
|
|
|
PHP Programming... =D |
Posted by: Duckman - 03-17-2011, 06:40 AM - Forum: Computing
- Replies (4)
|
|
Anyone really good with it and would be interested being another programmer(s)... just a thought and would like to hear if you are.
Leave comments here, I'll check back as much as I can or shoot me an e-mail, <!-- e --><a href="mailto:XDuckman@gmail.com">XDuckman@gmail.com</a><!-- e -->, or text (325) 200 2564
|
|
|
|