--------------- FIDO MESSAGE AREA==> TOPIC: 178 VISUAL BASIC Ref: F2F00010 Date: 02/11/98 From: EILEEN LOUISE Time: 06:57am \/To: BARRY FLETCHER (Read 4 times) Subj: QuickBasic 2 VisualBasic What are the standard ActiveX controls that come with Microsoft Visual Basic Version 5.0 Learning Edition? Answer: The Learning edition of Microsoft Visual Basic contains a number of ActiveX controls (referred to as standard ActiveX controls) that allow you to add advanced features to your applications. The following 5 standard ActiveX Controls are included with Microsoft Visual Basic 5.0 Learning Edition. Common dialog: Provides a standard set of dialog boxes for operations such as opening and saving files, setting print options, and selecting colors and fonts. Data-bound combo box: Provides most of the features of the standard combo box control, plus increased data access capabilities. Apex data-bound grid (DBGrid): DBGrid is a spreadsheet-like bound control that displays a series of rows and columns representing records and fields from a Recordset object. Data-bound list box (DBList): DBList provides most of the features of the standard list box control, plus increased data access capabilities. Microsoft FlexGrid: MSFlexGrid is similar to the DBGrid control, but has additional formatting, grouping, and binding features, as well as customization options. --- eileen@technologist.com * Origin: We Gladly Feast On Those Who Would Subdue Us (1:326/431) --------------- FIDO MESSAGE AREA==> TOPIC: 178 VISUAL BASIC Ref: F2F00011 Date: 02/11/98 From: EILEEN LOUISE Time: 06:59am \/To: RUUD SCHOPPEMA (Read 4 times) Subj: screen Hi Ruud, Quoting Ruud Schoppema to Eileen Louise on Saturday February 07 1998 EL>> a little experimenting with setfocus or refresh or doevents EL>> should find you a solution. RS> Mmm, the setfocus didn't work here. But refresh was refreshing!! it's hard to tell without seeing code which might work, depending on what is causing the lack of draw. --- eileen@technologist.com * Origin: We Gladly Feast On Those Who Would Subdue Us (1:326/431) --------------- FIDO MESSAGE AREA==> TOPIC: 178 VISUAL BASIC Ref: F2F00012 Date: 02/11/98 From: EILEEN LOUISE Time: 07:08am \/To: RUUD SCHOPPEMA (Read 4 times) Subj: txtbox-lstbox Hi Ruud, Quoting Ruud Schoppema to ALL on Saturday February 07 1998 RS> I have a lstbox full with names. The user can export the names by RS> clicking. But there is a way using a textbox. Like using the helpfile RS> of vb5. Just type ig the letter "T" and the bar of the lstbox goes to RS> the name starting with "T" on so on. RS> Can someone explain it again to me with the program code i rarely use listboxes, but a combobox set to dropdown list does this automatically in VB5. --- eileen@technologist.com * Origin: We Gladly Feast On Those Who Would Subdue Us (1:326/431) --------------- FIDO MESSAGE AREA==> TOPIC: 178 VISUAL BASIC Ref: F2F00013 Date: 02/11/98 From: EILEEN LOUISE Time: 07:11am \/To: ALL (Read 4 times) Subj: Synchronized Combo Boxes gee, we haven't done much coding in here lately. so i dug through a bit and picked something small and weird but useful. in. this project has a bunch of forms that host a pair of dropdown list combos. each pair is an even [ie cmbLookup(0)] for name and odd [ie cmblookup(1)] for account #. the combos themselves are filled from an array(x,1) where the first combo stores in element 0 and the second in element 1. some creative yet pedestrian code synchronizes the two. the click event fires the synchronization, so that whenever one is selected, the other is set. it also traps the last selection so as not to send the click into an endless loop. i will add some comments now. Private Sub cmbLookup_Click(Index As Integer) 'et Dim s, iNotIndex Static sLastVal /* this prevents the cascade loop */ If Trim(cmbLookup(Index).Text) = sLastVal Then Exit Sub /* this decides if we are name or account, whatever the actual index */ If Index Mod 2 = 0 Then iNotIndex = Index + 1 Else: iNotIndex = Index - 1 End If /* these functions set the boxes and are shown below */ s = GetElement(gavPayors, Trim(cmbLookup(Index).Text), Index Mod 2, iNotIndex Mod 2) sLastVal = s cmbLookup(iNotIndex).ListIndex = GetComboPos(cmbLookup(iNotIndex), s) End Sub what gets passed in the getelement call is a pointer to the array, the text of the selected combo box, and the base index values (0 and 1) in their currently respective presentation. Function GetElement(av, sToken, iSeekElement, iRetElement) As String Dim i, s /* here we run a vanilla search through the array. this was hurry up code, a more intelligent sort search (like a hash) might be in order for very large lists, but this will easily run a couple hundred in non-noticable time because it's all in memory */ For i = LBound(av, 2) To UBound(av, 2) If Trim(av(iSeekElement, i)) = sToken Then s = av(iRetElement, i) Exit For End If Next i GetElement = Trim(s) End Function /* this returns the corresponding string for the other combo, which we then run an api call for. */ Public Function GetComboPos(cb As ComboBox, s1) As Long Dim lItem lItem = SendMessageString(cb.hwnd, CB_FINDSTRING, -1, s1) GetComboPos = lItem End Function i didn't bother with the declarations and constants for sendmessage, as they are readily available. --- eileen@technologist.com * Origin: We Gladly Feast On Those Who Would Subdue Us (1:326/431) --------------- FIDO MESSAGE AREA==> TOPIC: 178 VISUAL BASIC Ref: F2F00014 Date: 02/10/98 From: BUCKY CARR Time: 07:49am \/To: HERMAN BURGERS (Read 4 times) Subj: Binary Saved Format BC> Is there a freeware util that will undo this binary VB file? HB> No idea, HB> but use VB2 or 3: HB> a. there was a free learning VB2 copy around some time ago, that HB> was officially distributed free of charge. No compiling to P-Code, HB> but for reading/saving a file that would do :-) HB> b. find someone who will do that for you. Thanks for the offer, but I've decided to use pcAnywhere for that part of the project. --- PPoint 2.00 * Origin: Vanishing Point 7198460140 Trinidad CO (1:15/7.1) --------------- FIDO MESSAGE AREA==> TOPIC: 178 VISUAL BASIC Ref: F2F00015 Date: 02/10/98 From: BUCKY CARR Time: 07:51am \/To: EMMANUEL BERLEMONT (Read 4 times) Subj: Little big problem... EB> I don't find the way to set the format of the data (eg: scientific EB> notation, decimal places) contained in these fields * only * for the EB> viewing of them in the DBgrid - i can't use the Round function when EB> I'm loading the datas in the different fields because the values of EB> these number will be used for some further calculations. How about using the Format() function? Find it under "user defined formats" in the online help. --- PPoint 2.00 * Origin: Vanishing Point 7198460140 Trinidad CO (1:15/7.1) --------------- FIDO MESSAGE AREA==> TOPIC: 178 VISUAL BASIC Ref: F2F00016 Date: 02/10/98 From: BUCKY CARR Time: 07:53am \/To: BARRY FLETCHER (Read 4 times) Subj: QuickBasic 2 VisualBasic BF> 1) How different is Quickbasic to VisualBasic? How much will I have to BF> learn or unlearn? You'll LOVE VB compared to QB. The visual (GUI) interface will require complete rewriting, but the behind-the-scenes running code will 99% work unchanged. Some keywords are not available anymore, such as SWAP. QB is a top --> down language. VB is more "interrupt" driven (only they call them "events". BF> 2) Are there any programs which will convert QuickBasic programs to BF> VisualBasic? I know graphics and text functions will be different. But BF> this program is over 56K long and I only want to rewrite the sections BF> that I think VisaulBasic will do it self (like Put up Menus, Text BF> Boxes and BF> Buttons that I had to write some intresting code for...) Should mostly be okay. What you will probably find is that as you get into using VB you'll want to improve your program since you won't have the memory constraints that you have under QB. BF> 4) What are the differences and limitations between all the current BF> versions of VisualBasic? (And before someone says Email Microsoft or BF> look at the Microspend website, I don't have internet access (for a BF> while anyway)). All? If you are firmly in Win95/NT, then ditch the 16 bit world. In that case, go directly to VB5 which is 32 bit only. VB4 will allow 32 bit *or* 16 bit, but not both at the same time. I doubt you'll regret the move to VB. --- PPoint 2.00 * Origin: Vanishing Point 7198460140 Trinidad CO (1:15/7.1) CD> By the way, another question bothering me is how to create a windows CD> helpfile (*.HLP) For now, you'll need the HCW (Help Compiler Workshop) and depending on how you create the RTFs (rich text files) required as the text source for the compiler, you'll need to have version 4.02 of the Help Compiler. If you have VB4 Pro, an earlier version of the HCW is on that CD but is not automatically installed on your HD when you install VB. The HCW isn't perfect, but it is pretty good. The author said that it is likely that VB6 and beyond will use some sort of HTML system for help files. --- PPoint 2.00 * Origin: Vanishing Point 7198460140 Trinidad CO (1:15/7.1) --------------- FIDO MESSAGE AREA==> TOPIC: 178 VISUAL BASIC Ref: F2F00017 Date: 02/11/98 From: BUCKY CARR Time: 07:43am \/To: CEES DIDDEN (Read 4 times) Subj: READ and DATA CD> By the way, another question bothering me is how to create a windows CD> helpfile (*.HLP) For now, you'll need the HCW (Help Compiler Workshop) and depending on how you create the RTFs (rich text files) required as the text source for the compiler, you'll need to have version 4.02 of the Help Compiler. If you have VB4 Pro, an earlier version of the HCW is on that CD but is not automatically installed on your HD when you install VB. The HCW isn't perfect, but it is pretty good. The author said that it is likely that VB6 and beyond will use some sort of HTML system for help files. --- PPoint 2.00 * Origin: Vanishing Point 7198460140 Trinidad CO (1:15/7.1) --------------- FIDO MESSAGE AREA==> TOPIC: 178 VISUAL BASIC Ref: F2G00000 Date: 02/10/98 From: FABRICE LAMY Time: 12:31am \/To: ALL (Read 4 times) Subj: COnf Desactivee ce jour Yo ! Salut toi ; All! Mes chers users cette conf sera desactive ce jour de PE2 ! Si vous la lisez ben signalez le moi, que je la ractive ! Ne vous genez pas, si vous etes lecteur je la prendrai encore ! REPONSE EN PRIVATE seulement et pas dans la conf ! ATTENTION ProEtud2 BBS a chang de Numro 04-93-22-93-05 ou 04-93-22-92-35 ******************************************* __ /-----\ __ Smacks. -))) (__\/ _____ \/__) =( \___/ )= arice. \ ___ / E-Mail : flamy@hol.fr | / _ \ | ... Tagline en grve -)))) --- FMail 1.02+ * Origin: ProEtud2 BBS chang de numro : (33) 493 229-235 (2:323/24) --------------- FIDO MESSAGE AREA==> TOPIC: 178 VISUAL BASIC Ref: F2H00000 Date: 02/10/98 From: RUUD SCHOPPEMA Time: 05:57pm \/To: ALL (Read 4 times) Subj: round off Hello! A single shows 12.3355. But I want it 12.34 How can I round it off at a max of 2 numbers behind the point. Greetings, Ruud Schoppema, Nijmegen, Holland. rudine@wxs.nl --- * Origin: RudinE (2:284/604.1)