Search:
Type: Posts; User: 5ms?
Search:
Search took 0.03 seconds.
-
Till him thanks :D
:eek: :confused: Have you not looked at this thread :confused:
No... it's your choice if you want to end up in hell.
I know there is no hell to go to, so I have no choice, I...
-
I just downloaded CodeBank_Declared_V4.0.0.zip from post #9 OK.
I can not unzip it, I get a MsgBox "No files to extract".
-
I get the same for the V 4.0.0, but the CodeBank_v3.1.3.zip downloads OK.
-
Don't hard-code any strings, i.e(text in quotes)
LaVolpe means if you compile this block of code as an dll or exe you'll see all the text that is in quotes, i.e
Private Sub cmdOK_Click() 'check for...
-
The "else without if"
You have:
If Check1(1).Value = vbChecked Then lMultiplier = lMultiplier + 110 *val(text2.text)
Else
text2.text = " "
Shood be
If Check1(1).Value = vbChecked Then
...
-
Check Box and Option Button controls do not have same Values
Check Box Values are vbChecked, vbUnchecked or vbGrayed
Option Button Values are True or False
i.e
If Option1(0).Value = True Then...
-
If the code is compiled as a dll they cannot access the source code
-
This may help with the array bit
-
Hi All.........
I'm trying to Capture and Overlay on a webcam.
-
Yip, that makes cents
But I do not know how to do that or if it can be dun
The idea was:
have two off-screen bitmaps, one to hold the frame (as it comes) and another to hold the image to be...
-
Hi all.
I need to overlay an .jpg or .gif over video.
I know this way.
Grabbing a Webcam:
capCreateCaptureWindow
SendMessage GET_FRAME
SendMessage Copy
Copy...
-
I'd would guess that Doogle is on to it.
Are you sure it's not this, there is only 3 quotes, the leading quote is missing:
rs.Open "Select * from queryStudent where stud_id = '" & varStudMain &...
-
Have I got it for the probability P = 2 ^ -(N - K)
I have 3 Text boxes P,N and K
Private Sub K_Change()
P.Text = 2 ^ -(N - K)
End Sub
Private Sub N_Change()
P.Text = 2 ^ -(N - K)...
-
Thanks dilettante
That's why I needed the "Combination of Bytes"
I made two CRC class's one 8 bit and one 16 bit,
The 8 bit CRC is not cutting the mustard, it's only unique for one byte (8...
-
@dilettante
Thank you for trying!
I didn't know how to do it with only one loop.
I didn't have a clue how to till you what I was trying to accomplish.
@Logophobic
Thank you that's what I was...
-
I'm working on communicating with an 8Bit IC and I need to calculate Checksums.
Message length could be as long as 255 Bytes,
but does not need to be that long, I may set the max at 16 or 32...
-
'is "RandomNumbers()" an array of Cards, or it Returns a Random Number?
' You don't need this,
'this> For N = 1 To 7 '5'<--- Change to whatever you like to control number of shuffles
...
-
I do not open '.rar' files.
Do you have two packs of cards in your shuffle?
-
is it this line ".txtLname.Text = rs.Fields(1)"
if so,
if you take out the line, DO you get the same error on the next line?
-
Here is some info on 'Split', 'Left' and 'Right'
Dim AnyString As String, MyStr As String
AnyString = "Hello World" ' Define string.
MyStr = Left(AnyString, 1) ' Returns "H".
MyStr =...
-
Private Sub Command3_Click()
' Add names to column 1.
AddNameTo ListView1, 1, "Mary"
'this is the same as [Set itmX= ListView1.ListItems.Add(1, "Mary", "Mary")]
End Sub
Public Sub...
-
Have a look in VBForums > Visual Basic > Games and Graphics Programming> Game Demos
Like this:
Option Explicit
Dim chosen(1 To 4) As cards
Public Sub SomeSub()
Randomize
-
If there can not be changes by the user,
then you'll be doing all the changes in you code,
so you must know when a change has happened.
To put all changes in one place do like this
Public...
-
To clone a project I Just copy the project folder, then rename the coped folder, then run the project,
if I need to clone just one Form, cls or BAS
I just open it 'select all' 'Copy' and then...
-
Maybe some thing like
Dim ThisFileName As String, LookAtThisFileName ' As String
Dim TodayDate As Date, OldDate As Date
ThisFileName = "myfiles "
'TodayDate=format(now,................
...
-
No prob!
Here's a little more about the CommonDialog, from (MSDN)
ShowColor, ShowFont, ShowHelp, ShowOpen, ShowPrinter, ShowSave Methods Example
This example uses the CommonDialog control and...
-
Try
CommonDialog1.ShowOpen
-
TipeOh!
OK OK TipeOh (S)!
There you go this we run, I'm not good at explaining, so if you run this with F8 you'll see.
-
Maybe this well do it.
Private Sub Command2_Click()
Dim filenum As Integer, i As Long
CommonDialog1.Filter = "Text File|*.txt"
CommonDialog1.DefaultExt = ".txt"
...
-
With 'GetKeyPress' you're getting the Last KeyPress
-
I think you may have code like this
Dim LastKeyPress
Public Function GetKeyPress()
GetKeyPress = LastKeyPress
End Function
Public Sub SaveKeyPress(KeyPress)
-
Try this
Me.Caption = ListView1.ListItems(1).ListSubItems.Item(1)
-
Do you have 'WTUserScale1' Checked in the Ref area?
If not then look,
From Visual Basic click on the project menu and then Components.
-
How can I get my 'Delimited Array' if I get rid of the nested loops ?
Here's my code so far
Option Explicit
Private Const LB = 3
Dim A1, A2, A3, A4, A5, A6, A7, A8, ByteArray(1 To LB) As...
-
I need to get all combinations.
for a two Byte Array
0,1
0,2
so on....
1,1
-
Mmmmmmm................
simply finding out how many there would be is no bigy
BUT!
I need to test all combinations.
Private Sub Run3()
For A = 0 To 255
ByteArray(1) = A
-
What would be the easiest way to run throw all Combinations of Bytes
all Combinations
of 2 Bytes
of 3 Bytes
of 4 Bytes
.....
of 10 Bytes
.....
of 16 Bytes
-
-
Nope you don't get me, your code is the same as my code in post #1.
what I need is,
I got my pay, it was before tax $666 and but now it's $555.55
so what is the tax rate?
Text1 = (Val(Text3)...
-
Look for Bubblesort QuickSort
|
Click Here to Expand Forum to Full Width
|