VB 獲取文字內容問題！

現在是深夜，做個記號，明天再來。

VB 獲取文字內容的方式：

zhangdegong then

1 dim hello as variant 2 if 語句必須明確：

如果條件，那麼

elseend if

3、hello(1, 1) = zhangdegong 。

4. 如果=張德宮，那麼在張德宮。

你還在用VB6，我用的是VS2008，我還沒有發布。

你的程式中有很多我不知道的問題，比如變數？ 變數從何而來？ 張德宮、男人、大學、河北、立德盛、男人、大學、北津、萬里、女人、河北等到底是什麼？

如果=張德公，那麼準備好了的判斷是什麼？ 因此，無法為您修改！

存在很多問題：1.dim hello as variant 定義了乙個變數，但隨後使用了乙個陣列：hello（1， 1） 等，不會通過;

2. if 語句必須明確：

如果條件那麼必須！

否則是可有可無的。

如果需要，請結束！

3. hello（1， 1） = 張德宮，不知道張德宮是不是變數，如果是變數就沒有問題，如果是字串，就是有問題。

4. 同樣，如果 = 張德公，那麼張德公是乙個變數嗎？ 但特定字串的內容不會是可變的。

等等等等，再檢查一次！

else if 應該在一行上，而 end if 在最後丟失，當然它不會通過。

對於對話，每個 if 都沒有結束 if。

字串應加引號 （""），例如：="zhangdegong"，則未新增您的字串""

如果 ="zhangdegong" then...elseif = "lidesheng" then...elseif = "wanli" then...else

.end if

通過出售陣列進行拆分 這個橋廳被空格分成幾段 dim a（） as string a=split（text1，"那麼 a（4） 是 789 a（5） 是後敏感汽車的特徵

= right(,len(

要是你上面說就好了。

採用上乙個文字框內容的最後乙個字元。

right(, 1)

text1、text2、text3、text4 在屬性視窗的 text 屬性中：“no keyword”可以寫。

或在表單載入過程中：

沒有關鍵字"沒有關鍵字"

沒有關鍵字"沒有關鍵字"

表單中的四個文字框：

private sub text1_change()if = "關鍵字" then

沒有關鍵字"沒有關鍵字"

沒有關鍵字"end if

end sub

private sub text2_change()if = "關鍵字" then

沒有關鍵字"沒有關鍵字"

沒有關鍵字"end if

end sub

private sub text3_change()if = "關鍵字" then

沒有關鍵字"沒有關鍵字"

沒有關鍵字"end if

end sub

private sub text4_change()if = "關鍵字" then

沒有關鍵字"沒有關鍵字"

沒有關鍵字"end if

end sub

陣列控制項。

private sub text1_change(index as integer)

if text1(index) = "關鍵字" thenfor i = 0 to 3

if text1(i) <"關鍵字" then text1(i) = "沒有關鍵字"

nextend if

end sub

先將所有值分配為“無關鍵字”不是很好嗎？

你的問題比較籠統，資料庫有很多種型別？ 你說的是哪個版本的 VB？

另外，資料庫的執行在一兩句話中確實不清楚。

我們來談談最簡單的訪問資料庫！ 然後使用 vb6 中的資料控制項，選擇它，並設定屬性：

DatabaseName 屬性：連線到資料庫檔案 RecordSource 屬性：聯接資料表（可以使用 Select 語句返回記錄集）。

然後使用它：fieldname“） 來返回您所說的內容。