Only direct film ... should be for the blog also does not support easy language, on the text effect is not good!!!
==========================================================================
. Version 2
The. Subroutine _ button 2_ clicked. local Variable field information table, field information, "4", EDB database supported field variables, the preceding 4 indicates that the type is a one-dimensional value, maximum 4 segment information: local variable name pinyin, text type. Local variable i, integer type. Local variable name, text type
' For each element of the field information array, the EDB stipulates that each of its elements contains three contents, namely: "Name", "type", "Maximum text length". field information table [1]. Name = "Name" field information table [1]. Type = 10 ' Here the 10 represents the text type, which can be directly assigned with the "#文本型" effect. field information table [1]. Maximum text length = 6
field Information table [2]. Name = "Phonetic" field information table [2]. Type = 10 field information table [2]. Maximum Text length = 3
field information table [3]. Name = "Age" field information table [3]. Type = 8 ' Here the 8 represents the time-date type and does not know the length, regardless of the maximum text length.
field information table [4]. Name = "Phone" field information table [4]. Type = 10 field information table [4]. Maximum text length = 11
Create a human database file (take the current directory () + "\ghost.edb", the field Information table) ' In a way that has the extension EDB. Open (Take the current directory () + "\ghost.edb",,,,,,) ' Open the database and the program automatically associates the open database as the current database. Name = "Close to Xi" i = 1 ' loop takes the initials of each word of the name out of the alphabet. Here only the name of the 3 words to be tested: the first (3,) name pinyin = name Pinyin + take text to the left (take the middle of the text (name, I, 2), 1), 1) ' "Pinyin" can only input one word at a time, its second parameter indicates that there is a multi-tone situation, generally Lose 1, ' take text in the middle ' and ' take text to the left ' note that the Chinese character is two characters, so when a word is taken out, the second parameter is usually used 1,3,5 ... The third parameter uses 2 to fetch two bytes and one word at a time. i = i + 2. Count the cycle end () plus record (name, name pinyin, [January 1, 1970], "4389090980") Close () ' No, close the database.
Basic operation of the Easy language database