Posts by abu taher

anybody can help me?

start a new thread.

plz mark solved the problem.

in from1

Private Sub Command1_Click()
Form2.Label1.Caption = "Name"
Form2.Show
End Sub

plz check this.

you mean your pc not start. so plz check the cable of power button. or you can unplug it and try to start it manually by connect those 2 pin by any thing. check the power cable of mother board.

try to check the port and check a another harddisk in this machine.

try to find out it in web by size and details option.

I don't know. but you can search it in web.

I think your computer attack by virus.

not work. more thing:
1. I use query (balancesheet)
2. in dataenvironment: data object - view , object name - balancesheet. in grouping tab - field used grouping - category. in Aggregates tab - name: total, function: sum, Aggregate on: grouping, Field: Amount.
here I do it, to see the sum of category. it work, I mean it show the total sum by category. but the above code i use to see the sum of category by date. I mean I select a date and the total sum will show by this date.

not work. it show the all data.

you can see this two thread
http://www.daniweb.com/forums/thread74358.html
http://www.daniweb.com/forums/thread39114.html

you can find out in web.

use this:

Printer.CurrentX = 0.85
Printer.CurrentY = 0.46

use this

Printer.Print Text11.Text

all r for different option.

Try to search in web. you can find a lot.

Sub QryReport()
    On Error Resume Next
    
    Dim QryDef As QueryDef
    Dim str As String
    
    Set QryDef = dbase.QueryDefs("balancesheet")
    dbase.QueryDefs.Refresh
    
    If Err.Number = 3265 Then
        Set QryDef = dbase.CreateQueryDef("balancesheet")
        dbase.QueryDefs.Refresh
    End If
    

        str = "select *  from [balancesheet]" & _
              " where Date ='" & Dtpicker.Value & "'"

    QryDef.SQL = str
    datareport1.Show
    End Sub

here show the all data. but the sql command not work. I mean when I select a date the report didn't show that date's data. it show all data. what problem ?

please tell the problem. more details

some reason:
1) power supply become hot
2) ram didn't support
please check it.

easy way : write and search in web.

ok do it. It is possible to done in vb and ms access. so 1st start and when you face problem then start thread.

nice. go ahead. and plz tell the problem.

see:
http://www.daniweb.com/forums/thread214396.html

you can see the 'read me'. there are lot of site include here. you can get lot of experience from here.

in data environment I write code

SELECT AccountInfo.incategory, Sum(AccountInfo.InAmount) AS SumOfInAmount
FROM AccountInfo
where Date and Date between DTFr.value and DTTo.vlaue
GROUP BY AccountInfo.incategory;

in form I write code in a command button like:

Private Sub Command2_Click()
     Load DataEnvironment1
    With DataEnvironment1
   If .Command3.State <> 0 Then .Command3.Clos
     .Command3 Format(DTFr.Value, "dd/mm/yyyy"), Format(DTTo.Value, "dd/mm/yyyy")
     End With
datareport1.Show
End Sub

in this form I have two dtpicker. when I run the project , I select two date from this two dtpicker and press the button then a msg show:

compile error:
argument not optional

then highlight this

If .Command3.State <> 0 Then .Command3.Close

please help me anybody

try this

Dim f1 As New Form1

  '  Dim f2 As New Form1 'u must have this form in project
    

      
Private Sub Command1_Click()
f1.Show
    '  f2.Show
End Sub

adjust the alignment, if it has this property.

I made a unit converter. there I input all value by code and then it works. as like vb5prgrmr said.

u can get idea from the attach file.

I think there is no problem to use if else statement.

if your window is ok then try to installed another fresh copy of ms program.

I think You need original cd or the full version cd of those software.

desktop pc

I didn't read all post. some reason do it:
1. disconnect hard disk with motherboard
2. 1st Boot device problem
3. operating system damage
or hard disk damage

vb.net is not similar vb. lot of change made in vb.net. this is right that you get idea form vb and it help to understand vb.net. but not so.

when I press my power button 3 or 4 time (on off) or some time more then display show in monitor. when I press 1st time then the pc start but no display show in monitor. when I off it and then again on it ( 3 or 4 time I did it) then display show. but pc not start normally. it show a display like:
press F1 to run setup
prss F2 to start default operating system
and show with other more thing.
when I press F2 then windows start normally. now what I need to do?

what you actually want to do? more details

some time after scan many thing are not fix up. then have to need change some thing or install a fresh windows.

I type 2009 in mask edit box and select August from a combo box. then I press report button for report. then show this msg:
"run time error 713
Application - defined or object defined error"
another thing when I run the exe of this project in another pc then show this msg. when I run it my pc then no msg show.

when I maximized other software the bottom of the screen stop the top of taskbar. how it possible?

another thing which resulation is best for work with vb6?

if you use vb6 then try it easily:

Private Sub Command1_Click()
Command1.Caption = "Hello World"
End Sub

I saw many project resize with change screen resulation. I mean I work with my project in 800 by 600 pixel resulation. when I run It 1024 by 768 pixels then its many control change. but I want it match with changing resulation. example: I have a image control with image in the background of form. when I change the resulation and maximized the form then some place show blink. other control like it. then what I need to do? when I maximized other software the bottom of the screen stop the top of taskbar. how it possible?

my data report is portrait. how I change it in landscape.

I write in data environment:

SELECT AccountInfo.incategory, Sum(AccountInfo.InAmount) AS SumOfInAmount
FROM AccountInfo
where Date and Date between DTFr.value and DTTo.vlaue
GROUP BY AccountInfo.incategory;

DTFr and DTTo is dtpicker. and I write code in a button for show the report is

Load DataEnvironment1
    With DataEnvironment1
    If .Command3.State <> 0 Then .Command3.Close
     .Command3 Format(DTFr.Value, "dd/mm/yyyy"), Format(DTTo.Value, "dd/mm/yyyy")
     End With
datareport1.Show

but a error msg show:
"compile error:
argument not optional"
and then select this word

If .Command3.State <> 0 Then .Command3.Close

now what I need to do?

In my access file I write code in query

SELECT AccountInfo.incategory, Sum(AccountInfo.InAmount) AS TotalAmount
FROM AccountInfo
WHERE (((AccountInfo.Date)>=#1/1/2009# And (AccountInfo.Date)<=#12/31/2009#))
GROUP BY AccountInfo.incategory;

It show the total amount between 01-01-09 to 31-12-09 and it show in report. but in vb6 I want I select this two date and the total amount will show in report. what I need to do?

help me anybody

in msflexgrid I have one fixed row. and 5 or more data show in 5 row. If I write code like:txt1.Text = MSFlexGrid1.TextMatrix(MSFlexGrid1.Row, 1) then when I click on a row then only one text box show that data. but I want I click a button then all data of msflexgrid will show in 5 textbox. what I need to do.

If i write 'option explicit' then show a msg:
complie error
veriable not difined
or If I press CTRL+Break then a line highligt. and this is

if from1.windowstate = vbmaximized then
from2.windowstate = vbnormal
end if

I have more line like it. but only 2 like slected. and then end if selected.

did you write code

Beep

If not then I think no problem in your code.

a msflexgrid show my data. I write code in msflexgrid_click():

txt1.Text = MSFlexGrid1.TextMatrix(MSFlexGrid1.RowSel, 0)
txt2.Text = MSFlexGrid1.TextMatrix(MSFlexGrid1.RowSel, 1)

for show data in textbox. but one error msg show:
"run time error 381
subscript out of range"
what I do now?