10,991 Topics

Member Avatar for
Member Avatar for Joaquim_5

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 = …

Member Avatar for SCBWV
0
250
Member Avatar for Joaquim_5

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) * …

Member Avatar for rproffitt
0
112
Member Avatar for arcon

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 …

Member Avatar for AndreRet
0
130
Member Avatar for Joaquim_5

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 …

Member Avatar for AndreRet
1
637
Member Avatar for fx.eko

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,

Member Avatar for antonio78
1
187
Member Avatar for Joaquim_5

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 …

Member Avatar for Joaquim_5
0
164
Member Avatar for arcon

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 …

Member Avatar for pritaeas
0
124
Member Avatar for arcon

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 …

Member Avatar for arcon
0
123
Member Avatar for antony2002

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

Member Avatar for Kh Hamsafar
0
41
Member Avatar for om_138

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 ?

Member Avatar for SCBWV
1
146
Member Avatar for arcon

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

Member Avatar for SCBWV
0
294
Member Avatar for NewAccount

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 …

Member Avatar for rproffitt
0
32
Member Avatar for NewAccount

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"`,

0
38
Member Avatar for Paras_4
Member Avatar for willianrc

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 …

Member Avatar for SCBWV
3
1K
Member Avatar for Thao_14

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 …

Member Avatar for Reverend Jim
0
92
Member Avatar for lawalishaq204
Member Avatar for Reverend Jim
0
102
Member Avatar for eson dc

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.

Member Avatar for rproffitt
0
31
Member Avatar for nouran_2

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 …

Member Avatar for rproffitt
0
110
Member Avatar for Farwa_3

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

0
21
Member Avatar for JModak

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, …

Member Avatar for markanderson_1
0
231
Member Avatar for andrea.fornaro

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

Member Avatar for Dani
0
74
Member Avatar for fnjomwas

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 …

Member Avatar for Dani
0
141
Member Avatar for NewAccount

Hello everyone, I wrote data arrays at the end of the exe with delimiter. After I compiled, the app it didn't work on Chinese Windows, only on English, I want to configure the app to work on Chinese windows as well, I know it will work if I change the …

Member Avatar for rproffitt
1
283
Member Avatar for zebnoon

Hye there I have to create a Report which get Get Data from Forms controls.Please help with any simple example. thx

Member Avatar for kelvinmunyui814
0
2K
Member Avatar for heylol

Hey can someone please tell me how to assign keys to buttons, I tried with a code but it only works once or it only works when I have to press the button on the screen and then use the key but it only works once Can someone please help …

Member Avatar for rproffitt
0
55
Member Avatar for Bhavi_1

Unable to execute the VB.Net code even can't view in Print Preview after clicked. Anyone there to help me. I'm new to VB.Net. Imports System.Drawing.Imaging 'Imports IDAutomation.Windows.Forms.LinearBarCode Imports System.Drawing.Printing Imports System.Configuration 'Imports GenCode128 Imports System.Data.SqlClient Public Class Form1 Dim table2 As New DataTable Dim dte = Date.Now() Dim PrintDoc As …

Member Avatar for Bhavi_1
0
198
Member Avatar for Vmr_574

Hello all, I have a question I have a list view in eg and there are songs in it now I want when I click on a button that he plays all the music in succession but I can't get that done can someone send me an example? Thank you

Member Avatar for rproffitt
1
59
Member Avatar for Bill_44

I've got a picture box On a form in visual basic 6 and keypreview is set to true for the form. Keypress is being used to trap a letter pressed while the mouse is pointing at a particular object. A mouse version of cut and paste. But Keypress fails for …

Member Avatar for pritaeas
0
35
Member Avatar for Logang

I am using the code below to populate the DataGridView. I need help in that the Barcode Image is not being generated according to the txtLab.text amd the alphamumeric value. Please see attached image. Thanks Private Sub btnAdd_Click(sender As System.Object, e As System.EventArgs) Handles btnAdd.Click Dim alphaNumeric As String = …

Member Avatar for rproffitt
1
61

The End.