-
It's late at night, make a mark, and come tomorrow.
-
vb's way to get the content in text:
zhangdegong then
1 dim hello as variant 2 if statement must be clear:
if condition then
elseend if
3、hello(1, 1) = zhangdegong 。
4. Also if = zhangdegong then in zhangdegong.
-
You're still using VB6, I'm using VS2008, and I haven't released it yet.
-
There are a lot of problems in your program that I don't know, such as variables? Where do the variables come from? What exactly is zhangdegong, man, university, hebei, lidesheng, man, university, beijin, wanli, woman, hebei, etc.?
if = zhangdegong then what is the judgment when you are ready? Therefore it cannot be modified for you!
There are a lot of problems: 1. dim hello as variant defines a variable, but then uses an array: hello(1, 1) and so on, which will not pass;
2. The if statement must be clear:
If condition then must!
else is dispensable.
end if required!
3. hello(1, 1) = zhangdegong, I don't know if zhangdegong is a variable, if it is a variable, it is no problem, if it is a string, it is a problem.
4. Similarly, if = zhangdegong then is zhangdegong a variable? But the content of a specific string will not be variable.
Blah blah blah, check again!
-
The esle if should be on one line, and the end if is missing at the end, of course it won't pass.
-
Each if doesn't have an end if for the conversation.
-
Strings should be quoted (""), for example: ="zhangdegong", your string is not added""
And if ="zhangdegong" then...elseif = "lidesheng" then...elseif = "wanli" then...else
.end if
-
Split by selling arrays This bridge hall is divided into segments by spaces dim a() as string a=split(text1,"Then a(4) is 789 a(5) is the character of the post-sensitive car
-
= right(,len(
If only you said above.
-
Take the last character of the content of the previous text box.
right(, 1)
-
text1, text2, text3, text4 in the text attribute of the properties window: "no keyword" can be written.
or in the form load process:
No keywords"No keywords"
No keywords"No keywords"
-
Four text boxes in the form:
private sub text1_change()if = "Keywords" then
No keywords"No keywords"
No keywords"end if
end sub
private sub text2_change()if = "Keywords" then
No keywords"No keywords"
No keywords"end if
end sub
private sub text3_change()if = "Keywords" then
No keywords"No keywords"
No keywords"end if
end sub
private sub text4_change()if = "Keywords" then
No keywords"No keywords"
No keywords"end if
end sub
-
Array controls.
private sub text1_change(index as integer)
if text1(index) = "Keywords" thenfor i = 0 to 3
if text1(i) <"Keywords" then text1(i) = "No keywords"
nextend if
end sub
-
Wouldn't it be nice to assign all the values "no keywords" first?
-
Your question is more general, there are quite a few types of databases? What version of VB are you talking about?
In addition, the operation of the database is really unclear in one or two sentences.
Let's talk about the simplest access database! Then use the data control in vb6, select it, and set the properties:
databasename property: connect to the database file recordsource property: join the data table (you can use the select statement to return the recordset).
Then use it: fieldname") to get back what you said.
Your ** is not good in itself, move slowly Unless it is directX programming, in other cases, please use timer instead of directly using loops, otherwise the CPU usage will be very high. >>>More
1. Solve all: Question 11 of the first picture.
1) Select C, event name. >>>More
Do your homework yourself.
Who knows why? Microsoft has decided so, is there a reason? >>>More
Functions, variable names, procedure names, etc., are not case-sensitive. >>>More
set ie=createobject("")"about:blank"
str="text") >>>More