Visual Basic

Thanks :) S.S. Ahmed ss_ahmed1@hotmail.com http://glowbutton.faithweb.com

Can you post the code? Or email it to me and i'll try to help - o_be@hotmail.com

The reason ".ShowWhatsThis" and no ".Show" happened because you mustn't of called the "form" function. ie: Command1 function has no argument of .Show, closest match is .ShowWhatsThis Thankz, Drew

Change the recordsource during runtime. you might have to modify your datacontrol to use sql statement instead of a table. Confusios say "Man who run in front of car get tired, Man who run behind car get exhausted."

Read this article, this might give you a clue: http://www.codeproject.com/useritems/datareport.asp S.S. Ahmed ss_ahmed1@hotmail.com http://glowbutton.faithweb.com

Have a look at the code below, this is one way of loading a DLL in VB. Use the loadlibrary function to load the dll. Private Declare Function LoadLibrary Lib "kernel32" Alias "LoadLibraryA" _ (ByVal lpLibFileName As String) As Long Private Declare Function LoadString Lib "user32" Alias "LoadStringA" _ (ByVal hInstance As Long, ByVal wID As Long, ByVal lpBuffer As String, _ ByVal nBufferMax As Long) As Long Private Sub Form_Load() Dim hInst As Long, lResult As Long, x As Long Dim LCID As Long, sLcid As String Dim resString As String * 255 Dim sCodePage As String sCodePage = String$(16, " ") Label1.AutoSize = True Label1.Caption = "" LCID = GetThreadLocale() 'Get Current locale sLcid = Hex$(Trim$(CStr(LCID))) 'Convert to Hex ' Display decimal value of the LCID (Hex in Parentheses) Form1.Caption = "LCID " & LCID & " (" & sLcid & ")" x = GetLocaleInfo(LCID, LOCALE_IDEFAULTANSICODEPAGE, _ sCodePage, Len(sCodePage)) 'Get code page sCodePage = StripNullTerminator(sCodePage) ' Load dll with string table resource. ' Might need to change path for the resdll. hInst = LoadLibrary("resdll" & sLcid & ".dll") ' Get string with ID 101. lResult = LoadString(hInst, 101, resString, 255) With Label1.Font .Name = "Lucida Sans Unicode" .Size = 14 .Charset = GetCharSet(sCodePage) 'Convert code page to charset End With ' Display the localized string. Label1.Caption = resString End Sub S.S. Ahmed ss_ahmed1@hotmail.com http://glowbutton.faithweb.com

I have found a way to achieve dropping on the desktop. Look at shell extensions part VI on this site. /Jerry

Private Sub Command2_Click() Text1.Text = text1.text & "L2" End Sub private sub cmdClearText1_click() text1.text="" end sub

What kind of hardware is it? You'd be better off talking to the hardware companys support or doing an internet search for this kind of information. Michael :-)

Visit Microsoft's .NET sites, start at: http://www.microsoft.com/net/ and http://msdn.microsoft.com/vstudio/nextgen/default.asp Multithreading is a design feature of the CLR, the Common Language Runtime, which is an integral part of .NET. All managed .NET languages are using the CLR, including Visual Basic, which is the main reason why its syntax had to change quite a bit from VB6 (to the better though).

Not sure if this will help as it is really old but search MSDN Lib for Q72918 in the title.

Don't try to use VB; unless you are looking for a headache. Use C++ instead.

Since you mention Excel I’m guessing you’re using VBA. Look to see if VBA supports DoEvents. If it does then put that in your loop w/ some sort of form is not modal which you update from w/in the loop.

you have to declare your type in a module.