11,868 Topics
 | |
| | Hi there, I am a beginner and need your kind support to build an application in VB6. I want to know how to attach a VOLUME CONTROL to a MMcontrol of VB6 in the form. Please reply to [email removed] Thanks and atb. |
| | how can i read a file to StdPicture? and draw it on memory HDC? Public Sub LoadImage(strPath As String) Dim myPic As New StdPicture Set myPic = LoadPicture(strPath) NewImage myPic.Width, myPic.Height BitBlt MemoryHDC, 0, 0, Width, Height, myPic.Handle, 0, 0, SRCCOPY 'i get only a black background color End Sub  |
| | Hello guys i want to convert this string to boolean and i'm passing this string in if condition my Str = "row(0).ToString.Contains(""ABC"")" it should return me boolean result as the condition follows I'm Making use of this in Uipath  |
| | i use the RtlFillMemory(): Call RtlFillMemory(ByVal DataPtr, DIBInf.bmiHeader.biSizeImage, &H80) the '&H80' is the mid-grey color.... what are the others colors code? |
| | with CreateDIBSection() we create an array of DIB's pixels .. but it's a copy and not a pointer :( when i change 1 pixel or draw a rectangle, i must re-create the DIB's and then draw the result. Private bmpPtr() As Long ReDim bmpPtr(ImageWidth * ImageHeight - 1) hBitmap = … |
| | on VB6 i have these code for create a memory DC: Public Sub CreateMemoryBitmap(ByVal Width As Long, ByVal _ Height As Long) If (ImageWidth > 0 Or ImageHeight > 0) Then DeleteMemoryBitmap ImageWidth = Width ImageHeight = Height ' Create the device context. hdc = CreateCompatibleDC(ByVal 0&) If (hdc = … |
| | i can create a DDA algoritm.. but pixel a pixel. so what is the best speed for it? IncrementPixel = 2 For RayAngle = StartAngle To EndAngle Step IncrementAngle Distance = 0 Wall = 0 RayActualX = RayX RayActualY = RayY IncrementStepSin = Sin(RayAngle) * IncrementPixel IncrementStepCos = Cos(RayAngle) * … |
| | when editing it does it well on the screen but it doesn't save the data correctly example Option Explicit Private Type molde_agenda id As String nombre As String * 40 imagen As String * 250 End Type Dim Datos As molde_agenda Dim DatosTemp As molde_agenda Dim FileFree As Integer Dim …  |
| | i did these code for create RayCasting: Option Explicit Private Declare Sub Sleep Lib "kernel32.dll" (ByVal dwMilliseconds As Long) Private Const PI As Double = 3.14159265358979 Dim LevelMap(12) As Variant Dim CamWidth As Long Dim CamHeight As Long Dim CamHalfHeight As Long Dim RayCastingPrecision As Long Dim PlayerX As Double … |
 | Hello all I've been using it for years SQL SERVER 2014 Standard and language VB6 programming, but only this time get the following error: Run-time error '-2147467259 (80004005)': [DBNETLIB][ConnectionWrite (WrapperWrite().]General network error Has any of you guys ever experienced this?? what is this caused by?? thanks for the enlightenment Regards, |
| | VB6 : is possible convert radians to pixels? the WindowViewe is 200 pixels. so i need draw 200 lines between PlayerAngle(100 pixels) to 200. but how can i convert pixels to Radians... the PlayerAngle is the 100 pixel(the half of WindowViewe) Private Sub rayCasting() Dim rayAngle As Double Dim IncreRayAngle … |
| | I need to read the id of the datos.txt file datos.txt file information: 1 a dreamstime_3361539.jpg 1 b dreamstime_7231733.jpg 2 c dreamstime_19009914.jpg 2 d dreamstime_66340321.jpg 3 r F100010793.jpg 3 t music-girl-1366-768-5394.jpg 3 p orig_shutterstock_5515123.jpg when i put the value in text2.text in 1 it has to come out 1 a …  |
| | I'm doing an inventory application in a random file, everything works fine, but I need to delete the record through combobox. I don't know what I'm doing wrong. It loads the data to the textboxes and when deleting the specific record it is not deleted The program is made in … |
| | So I had to get a new hard drive for my laptop and when I installed visual studios 2022 I noticed that Data Sources was missing everything. I took a screen shot to perhaps explain it better to you guys. I've tried looking online how to restore it and can't … |
| | Hi Last 15 years i am using billing software ( visual basic 6 )...Now i need to attach barcode scanner..Can anybody help me to add.. Database is Ms Access  |
| | Hi I am creating a employee management system with ms access and VB6. I need code for marking and view attendance. Can anyone help me ? |
| | Hi, I'm Arcon. I have a problem when saving records, it saves a record and when it saves another it overlaps the first record when reading records with its id it does not read it to me correctly thank you |
| | Hello, I have 2 questions, i'm not sure if it's even possible but if I'm wrong please correct me. So, i need to run my .exe file in cmd via vb6, is it possible? And second,if it's possible to run, how can I find the path and the name of … |
| | Hello everyone, I'm not sure if it's even possible, but I'm curious if it's possible to find my .exe file if it's uploaded to mediafire.com(for example) I know if the file is on my computer I can use `App.Path & "\" & App.EXEName & ".exe"`, |
| | Can I get the answer how can call center solutions benefits my retailing business?  |
| | Im trying to populate Listbox with Columns but I didn't get success. Below is my code. I populated Listbox with text file: on users.txt: 1|Jhon|street 3|12/03/1985 2|Peter|strt2|29/09/2009 3|Scoby|street 1|11/02/2001 Here is my code to populate , as you can see there's delimiter "|". Public Sub Pathway(way As Variant) 'SET DATABASE … |
| | I was trying to make an app On Android Studio. During the making of the app on Android studio, it gives an error. The error was about the Gradle bundle failing. I neglected this error while creating. I thought this might be due to the slow process and net speed. … |
| | hi I'm new to coding, I'm have a Visual Basic project for the memory game. it basically lets the player flips over 2 cards, if those 2 cards match, they disappear, if they don't, they flip back. the game end when all the cards disappear. I have completed the code … |
| | Please can I use my normal computer camera to scan and decode a Qr code? |
| | Hi everyone, Can someone help me about Vb6? I have 2 data reports that is connected into 1 data environment. my 1st data report works fine but the second one displays invalid data source. help me please. |
| | A small airline has just purchased a computer for its new automated reservations system. You have been asked to develop the new system. You’re to write an application to assign seats on each flight of the airline’s only plane (the capacity of the plane is 10 seats of the same … |
| | I want to filter the datagridview on Search button click,i am using 3-tier architecture,the grid should be updated with the search result |
 | how can i configure ip address, submask, getway, DNS1 and also DNS2 please help me i use this code but DNS not added what is the actual code for add all with DNS1 &2 Please help me Protected Sub Button1_Click(ByVal sender As Object, ByVal e As EventArgs) Handles Button1.Click Button2_Click(sender, …  |
| | ciao a tutti, qualcuno mi può dare una mano...vorrei fare un form con un pulsante che al click inserisce i dati in un db access, avrei bisogno del codice per la connessione al db, e lo statement per il pulsante grazie  |
| | My code is this. Dim strSQL As String, strSQL2 As String Dim db As Connection, rst As ADODB.Recordset Set db = New Connection db.CursorLocation = adUseClient db.Open "PROVIDER=Microsoft.Jet.OLEDB.4.0;Data Source=C:\River Syde RMS\RiverSyde.mdb;" strSQL = "SHAPE {SELECT * FROM Sales where Date1=#" & DTPicker3.Value & "#" Set rst = New ADODB.Recordset If … |
The End.