Tek-Tips is the largest IT community on the Internet today!

Members share and learn making Tek-Tips Forums the best source of peer-reviewed technical information on the Internet!

  • Congratulations strongm on being selected by the Tek-Tips community for having the most helpful posts in the forums last week. Way to Go!

Search results for query: *

  1. MaxRaceSoftware

    Printing Problem

    Heres the actual code i'm using and trying to PRINT with DIM Cnt AS INTEGER DIM Y AS INTEGER, X AS INTEGER, Num AS INTEGER DEF SEG = &HB800 Num = FREEFILE OPEN "LPT1:" FOR OUTPUT AS #Num WIDTH #Num, 100 PRINT #Num, "" FOR Y = 2 TO 25 '-----50 or 25, depending on screen height FOR X = 1...
  2. MaxRaceSoftware

    Printing Problem

    printer.PRINT "Hello" printer.PRINT CHR$(12) printer.ENDDOC Thanks Buff1 the CHR$(12) worked !! but now the Page Prints out immediately, but then the Red Flashing Light on the HP Printer comes on "after" the page is printed a small step in the right direction ?? :) now you have to push the...
  3. MaxRaceSoftware

    Read Characters from a File

    Hum... Smells like homework. Search the VB related forums/faq's for "read" "file" "input" and you will find a few threads/examples that should help you. ========================================================= i wish i was young enough to have homework :) LOL and the "Search" usually hardly...
  4. MaxRaceSoftware

    How do I play MPEG video in my application?

    some of the code below might be of use to you ?? VERSION 5.00 Object = "{22D6F304-B0F6-11D0-94AB-0080C74C7E95}#1.0#0"; "MSDXM.OCX" Object = "{F9043C88-F6F2-101A-A3C9-08002B2F49FB}#1.2#0"; "COMDLG32.OCX" Begin VB.Form CCS_Play ClientHeight = 7590 ClientLeft = 1095 ClientTop...
  5. MaxRaceSoftware

    Printing Problem

    i thought by now a lot of people/programmers would have run into this same problem ??..and someone would have had a quick & easy fix already :) tested on 6 different computers ( Win95, Win98,ME, XP-Pro so far) all with various models of HP printers the only one working perfectly everytime is...
  6. MaxRaceSoftware

    Read Characters from a File

    How can you read for example the first 10 Characters of a Text File ?? Thanks MaxRace Software - Larry Meaux ET_Analyst for DragRacers Support Israel - Genesis 12:3
  7. MaxRaceSoftware

    Printing Problem

    a computer program (.EXE) i wrote, prints out a report immediately on some computers..but on other computers the Print goes into action immediately..then stops..then Red Light flashes on Printer...if you then press the red button, printing resumes normally and the page is printed and ejected...
  8. MaxRaceSoftware

    Visual Basic source code on Internet ?

    http://story.news.yahoo.com/news?tmpl=story&u=/afp/20040214/tc_afp/us_it_computer_software_040214233524 just found article , it wasn't VB programming language MaxRace Software - Larry Meaux ET_Analyst for DragRacers Support Israel - Genesis 12:3
  9. MaxRaceSoftware

    Visual Basic source code on Internet ?

    someone told me they saw a few days ago on TV newscast that MS original source code was somehow uploaded to server , and code was being downloaded across Internet ?? was that VB.Net or VB6 ?? it was supposed to be MS's actual source code to actual programming language ?? or just...
  10. MaxRaceSoftware

    ComboBox setting Focus after Mouse Click

    If text1(0).Visible and text1(0).Enabled then text1(0).SetFocus -------------------------------- Many thanks CCLINT !!!!!!!!! That works and i gave you a Star !! Thanks MaxRace Software - Larry Meaux ET_Analyst for DragRacers Support Israel - Genesis 12:3
  11. MaxRaceSoftware

    Copy/Paste Control Arrays

    i can still continue to add Control Arrays on the Form one at a time ...i've added over 50 more since the problem, complies to .EXE no problems, works correctly, on different OS and different computers tested so far just can't Copy/Paste "GROUPS" of TextBox Control arrays correctly...
  12. MaxRaceSoftware

    ComboBox setting Focus after Mouse Click

    CCLINT , thats what i tried too , but get an error message and its a regular VB6.0 ComboBox control heres the actual code along with your suggestion, but doesn't work Private Sub Combo1_Click(Index As Integer) Select Case Index Case 0 Text1_HelpLine = "Select the Body Type that...
  13. MaxRaceSoftware

    ComboBox setting Focus after Mouse Click

    CCLINT ; this works with KeyDown , but i'm looking for a way to accomplish the same effect when the User uses a Mouse-Click on the ComboBox ...any other ideas or tips ?? Private Sub Combo1_KeyDown(Index As Integer, KeyCode As Integer, Shift As Integer) Select Case KeyCode Case vbKeyEscape...
  14. MaxRaceSoftware

    ComboBox setting Focus after Mouse Click

    CCLINT (Programmer) , thats the 1st thing i tried, but , i get an Error message , when running that code Private Sub Combo1_Click() Text1.SetFocus End Sub "Invalid proceedure call or argument" MaxRace Software - Larry Meaux ET_Analyst for DragRacers...
  15. MaxRaceSoftware

    ComboBox setting Focus after Mouse Click

    how can i set Focus to a TextBox Control after clicking on a selection in a ComboBox MaxRace Software - Larry Meaux ET_Analyst for DragRacers Support Israel - Genesis 12:3
  16. MaxRaceSoftware

    Copy/Paste Control Arrays

    i've written a VB6.0 program that uses Control Arrays and "all" the Controls on the Form are Control Arrays also using PictureBox arrays as a type of "Page/Container" that have multiple PictureBoxes that each contain groups of Label, ComboBoxes, and TextBox Contol arrays...
  17. MaxRaceSoftware

    Controls limitions in a form

    Ahhuang , 1 more thing ..you will find out "Copying/Pasteing" groups of Control Arrays ; such as , TextBoxes , that VB6.0 will "REVERSE" the new pasted Control Array Index "ORDER" .........also , the 3D effects of TextBox bottom shadow color will change...
  18. MaxRaceSoftware

    Controls limitions in a form

    Ahhuang , a partial example of using Control Arrays use the new "INDEX as Integer" that will appear in your Subs ------------------------------------------------------ Private Sub Text1_KeyDown(Index As Integer, KeyCode As Integer, Shift As Integer) Select Case KeyCode Case...
  19. MaxRaceSoftware

    TextBox SelLength Problem

    this is what i had/tried last night that doesn't work ! Private Sub Text1_GotFocus() Text1.SetFocus Text1.SelStart = 0 Text1.SelLength = Len(Text1) End Sub ----------------------- since i had only 1 TextBox , i thought VB6 would cause Text1 to stay in FOCUS , but it doesn't , without...
  20. MaxRaceSoftware

    TextBox SelLength Problem

    Private Sub Text1_KeyPress(KeyAscii As Integer) If KeyAscii = vbKeyReturn Then KeyAscii = 0 Label1.Caption = Text1 Text1.SetFocus '<---Forgot to type in this Line Text1.SelStart = 0 Text1.SelLength = Len(Text1.Text) End If End Sub ======================= the above works now , with only 1...

Part and Inventory Search

Back
Top