Search results for query: *

For loop1 = 1 To rec.RecordCount TDM = DoEvents() If lst.Text = 'abc'Then txtUserID.Text = rec.Fields("UserID") End If rec.MoveNext Next loop1 why use doevents() in this program?

i use Dim db As DAO.Database Dim rec As DAO.Recordset instead of Dim db As Database Dim rec As Recordset the code works well. why? what's the difference between DAo.database and database ?

Set rec = db.OpenRecordset("Users", dbOpenTable) from the test is the before syntax has error. the error information is realtime error '13' can anyone know why.

Dim db As Database Dim rec As Recordset Set db = OpenDatabase(App.Path & "\Database\UsersDB.mdb" _ , False, False, ";pwd=AdmiN") Set rec = db.OpenRecordset("Users", dbOpenTable) why before codes make error? anyone can tell me?

Private Sub Command1_Click() Set MyApp = CreateObject("Word.Application") Set doc = MyApp.Documents.Open("c:\1.doc") If doc Is Nothing Then MsgBox MyFileName & "can not open this file!" End If doc.Close / there is wrong, can not find...

the program below can not work. why ,and how to set a port number in win2000. thanks. server: Private Sub Form_Load() SockServer.LocalPort = 2000 SockServer.Listen End Sub Private Sub Form_Unload(Cancel As Integer) SockServer.Close End Sub Private Sub SockServer_Close()...

how can i know one cell is splited into two cells.or one cell and another cell merge into one cell.

help above word file, there is a sheet. my question is how can i know hwo many columns and rows in this file. and this is a regular sheet. columns* row= the total cell if it is not a regular sheet.how can i know in the n row, how many columns it has. thanks

i mean if there a word file,how can i know did it have a sheet or not.if it had, how many rows, columns and cells did it have. had better have the more complicated information , such as how many columns in 1 row ,or how many rows in N columns. thanks

A B C D E 1 2 3 4 10 (=SUM(A1:D1)) the upper it is a worksheet. in E1 is result of SUM(A1:D1). in the formular bar of E1 ,i can see "(=SUM(A1:D1)". my question is how can i get it in vb. in below code e2 is just the result of function. what i need the formular expression...

THANK YOU FOR YOUR ANSWER. I try replacing the "*" (asterisks) with "%" (percent signs).THAT 'S WORK. "txt¹©ӦɌ_ID" IS NOT WRONG STRING, IT IS CHINESE CHARACTERS AND FOR I USE CHINESE OPERATION SYSTEM,I AM VERY SORRY TO MAKE YOUR CONFUSED. THANK YOU AGAIN.

Private Sub cmdsearch_Click() Dim DB As New ADODB Set DB = CurrentProject.Connection Dim strtj As String strtj = " SELECT tblsupplier.SupplierID, tblsupplier.SupplierName, tblsupplier.Address, tblsupplier.Postal, tblsupplier.Tel, tblsupplier.Fax, tblsupplier.BP, tblsupplier.Email...

i have a question about on-line play. if i want to download these on-line play information,how can i do. you know ,we often can see some films review on-line, but we can not save it in our computer for future use.so , can anyone tell me how to do it. thank you very much.

i have created my own menu, but at beginnig of running time,i wish it can disable .if the user gives the right accountname and password ,then the menu can enable. who know how disable and enable one menu by vba in access.

i have finished a little programme and i want to give it a menu as below: main menu: ORDER MANAGE sub menu: ADD ,DEL, UPD how can i do it,can someone tell detailly? thank you! and Merry Christmas.I come from china,and today is 12/24.

firstly, thank for your answer. i have written a programme using access, and i want to add a menu for it. for example, i want to add a menu as below order----main menu add --- sub menu delete--- sub menu review--- sub menu and each sub menu can open a form. how to it concretely.

i want make a menu ,but i don't know how to do it.can u tell me?