VB Capture vs. Capture, how VB intercepts the content of another program

y = "China's largest distance basic education service institution and online learning community provide distance education tutoring to primary and secondary school students across the country. "Top 10 Online Educational Institutions". Four middle school synchronization, audio-visual classroom, ** assessment, famous teacher Q&A, mutual help and mutual learning, parent school and other middle school columns, Olympiad Chinese mathematics, happy composition, happy English and other primary school courses.

Let middle school students learn synchronously with the students of Tsinghua University-Beijing No. 4 Middle School, let primary school students learn on a personalized and interesting platform, focus on improving students' learning ability in interest, and let parents accept the latest family education concepts, receive expert guidance, and grow together with their children. The online learning community allows children to receive education and counseling from famous teachers, and to learn, discuss and communicate with their classmates, so as to create a green and safe online environment for students. "

x = left(y, instr(y, "—") -1)z = replace(y, x, "")v = split(z, "，")(3)

Commonly used string manipulation functions.

asc(x), chr(x): convert character codes [format]:

p=asc(x) returns the character code of the first character of the string xp=chr(x) returns the character whose character code is equal to x.

2.len(x): Calculates the length of the string x.

Format]:p=len(x).

Note]: The length of the empty string is 0, and the space character is also counted as a character, although a Chinese character occupies 2 bytes, it is also counted as a character.

Example]:1) Let x="" empty string).

len(x) output is 0

2) Let x="abcd".

len(x) outputs 4

3) Make x="vb tutorial".

len(x) outputs 4

3.mid(x) function: reads the character [format]:in the middle of the string x

p=mid(x,n)

From the nth character of x, all subsequent characters are read.

p=mid(x,n,m)

Start with the nth character of x and read the next m characters.

4.replace: replaces some specific strings in a string with other strings[formatting]:

p=replace(x,s,r)

Description]: Replace the string s in string x with the string r, and then return.

5.strreverse: inverts the string.

format]:p=strreverse(x).

NOTE]: Returns the inverted string with the x parameter.

6.ucase(x), lcase(x): convert the case of English letters [format]:

p=lcase(x)

Convert uppercase letters in x-strings to lowercase.

p=ucase(x)

Convert lowercase letters in x strings to uppercase.

Note]: Except for English letters, other characters or Chinese characters will not be affected.

7.instr function: looks for strings.

Format]:p=instr(x,y).

Find out where y appears from the first character of x.

p=instr(n,x,y)

Find where y appears from the nth character of x.

Description]:1) If y is found in x, the return value is the position where the first character of y appears in x.

2) instr(x,y) is equivalent to instr(1,x,y).

3) If the string length, or x is an empty string, or y cannot be found in x, 0 is returned.

4) If y is an empty string, 0 is returned.

Use it first? Split addresses.

This is followed by the get arguments. Each parameter is separated by &.

So in the use & split once.

After this split, they are all one-to-one pairs.

Parameter names and values are concatenated with =.

Split it again with the = sign.

You can get a list of all the variables and their values.

dim istr as string

msgbox val(split(istr, "=")(1)) " " & val(split(istr, "=")(2))

There are many ways to do this.

With the three functions of mid(), left(), and right(), you should know that Chinese is also counted as one byte in vb! But the storage is two bytes!

mid (string to be intercepted, start point, end).

Use hooks to listen to the output of this program.

Just write one in C++ Delphe

Very simple. However, VB is difficult to implement.

To give you a hint, you can remove the first three id=s of this string to get the ones you want.

For example, a string is placed in the variable a="id=1214124"

a = replace(a, "id=", ""A at this point is what you want.

substr= mid(string,p,36 )'Returns the specified number of characters in the string.

Will this work?

private sub lastthree()dim str as string = "1234567"

Get the last three digits of characters.

dim lastthree1 as string = , 3)dim lastthree2 as string = , 2)msgbox(lastthree1 & " " & lastthree2)

end sub

Either way is fine.

Place a pictruebox in your main window set to visable = false

Then, you can set the screenshot [timer] once a minute, and all of the above is pediatric.

private declare function bitblt lib "gdi32" (byval hdestdc as long, byval x as long, byval y as long, byval nwidth as long, byval nheight as long, byval hsrcdc as long, byval xsrc as long, byval ysrc as long, byval dwrop as long) as long

Write in your timer event.

Or the window device context is copied in picturebox1.

Save the image as a file.

That's it, you can do it. If you don't understand, I'll give you the specifics**. After all, it's much better to do it yourself.

'The value of the text box can be replaced by a variable.

The four text boxes t0 are ID card information, t1 takes the pre-province characters, t2 takes the characters between the province and the city, and t3 takes the characters between the city and the county.

The main thing is computing"The position of the province, city, and county in an indefinite-length string"

One take"Province"Preceding character.

mid(, 1, instr(, "Province") -1)'Take the character between province to city to t2

mid(, instr(, "Province") +1, instr(, "City") -instr(, "Province") -1)

Take the city to county character to t3

mid(, instr(, "City") +1, instr(, "County") -instr(, "City") -1)

Since the content to be fetched is varied, it is necessary to:"Province"、"City"、"County"There are basically two ways to match the search with fixed characters and so on

1.Handle functions with simple strings.

Use instr() to find it first"Province"、"City"、"County"and then remove with mid()."Province"with"City"The name of the city in the middle, as well"City"with"County"The name of the county in between.

2.Match the province with a regular expressionCity and City*?County, after taking out the character details as required, just deal with the requirements, if you are not familiar with regular expressions, use the first method.