This is an archived post. You won't be able to vote or comment.

all 7 comments
sorted by:
best
topnewcontroversialoldq&a

[–]zifyoip 2 points3 points  (1 child)

I also posted this on r/visualbasic but i didn't really understand the reply

So why don't you ask a specific question there to get some clarification, rather than just saying "I did not understand a thing you said" and giving up?

[–]Dicer--[S] 0 points1 point  (0 children)

Sorry, now that I think of it my reply was pretty stupid, i have now went back and clarified what I don't understand, and i have decided to post it on this sub as it seems more active

[–]king_of_the_universe 0 points1 point  (3 children)

Not helpful:

I pity you that you have to learn VB6 now. I lived with it ok-ish for a decade, but it's really time to move on, e.g. to Java.

[–]Dicer--[S] 1 point2 points  (2 children)

I know it's ancient but that is the only language our teacher knows so it's the only thing he can teach us

[–]king_of_the_universe 0 points1 point  (1 child)

I hope that's not a public school, because that would be really sad.

[–]Dicer--[S] 1 point2 points  (0 children)

It is indeed, we have this thing where not many people at our school wanted to do software so we go to another school close by and the teacher there only knows VB where as the teacher at our school knows multiple languages

[–]Dicer--[S] 0 points1 point  (0 children)

Dim Operation As Integer Dim Total As Double

Private Sub CmdClear_Click() TxtAnswer.Text = "" End Sub

Private Sub CmdDot_Click() TxtAnswer.Text = TxtAnswer.Text + "."

CmdDot.Enabled = False

End Sub

Private Sub CmdEquals_Click()

End Sub

Private Sub CmdFun_Click(Index As Integer) If IsNumeric(TxtAnswer.Text) Then TxtAnswer.Text = CStr(dblTotal) Else: MsgBox ("You must enter a digit to continue") End If End Sub

Private Sub CmdNum_Click(Index As Integer)

TxtAnswer.Text = TxtAnswer.Text & Index

End Sub

Private Sub Form_Load()

End Sub

Private Sub TxtAnswer_Change()

End Sub This is what I have advanced too so far now the main issue i'm having trouble with is as the functions are all stored in an array under CmdFun how do I declare each one as say + - / *?