- Upvotes Received
- 1
- Posts with Upvotes
- 1
- Upvoting Members
- 1
- Downvotes Received
- 0
- Posts with Downvotes
- 0
- Downvoting Members
- 0
|
hi i need to add button thath allow to print out list my script display on the screen, i try few thing but button always dissapear after i display list. can someone help me? this is my script code: <!DOCTYPE HTML> <html> <head> <meta charset="utf-8"> <title>Untitled Document</title> <script> var teams …
|
|
|
Is there any VB pseudocode generator? or converter from vb code to pseudo code. I need to convert that code for pseudocode: 1) Login form: [CODE] Private Sub Command2_Click() Dim password As String Do Until password = "dawid" Or attempts > 2 password = InputBox("Please enter your password") attempts = …
|
|
|
I have program: [CODE]Dim ItemCode(6) As String Dim Description(6) As String Dim price(6) As Currency Dim Quantity As Integer Dim SaleCost As Currency Dim item As String Dim position As Integer Option Explicit Private Sub Command1_Click() item = Text3.Text Quantity = Val(Text2.Text) If Option2.Value = True Then Call CodeSearch(item) Else …
|
|
|
can someone convert that to case statement: [CODE]Private Function Discount(curr As Currency) As Currency Dim temp As Currency If curr < 15 Then temp = 0 ElseIf (curr > 14.99) And (curr < 30) Then temp = 0.05 ElseIf (curr > 29.99) Then temp = 0.1 End If Discount = …
|
|
|
Hi, I have to do search engine for shop (my course assessment) it have to search produckts by code and description. I dont really know how to do it. Can someone help me? that what i have: [CODE]Private Sub Command1_Click() Dim code(6) As String Dim description(6) As String Dim price(6) …
|
|
|
Hi, i have got code: [CODE]Dim numbers(99) As String Dim howmany As String Private Sub Command1_Click() howmany = InputBox("how many number you want input?") For x = 1 To howmany numbers(x) = InputBox("Enter a number") Next x FontSize = 14 For y = 1 To howmany Print numbers(y) Next y … 
|
|
|
I have a code: [CODE]Private Sub OK_Click() Dim Username As String Username = InputBox("Username") If Username = "Martyna" Then MsgBox "Welcome, " & Username Else: MsgBox "Sorry, access is denied, please Check your username and try again" End If End Sub[/CODE] and it should ask 3 time for username then …
|
|
|
Write a program that will deal with the following scenario: - someone buys a car at £7.500 - the car is to be "paid up" over 4 years - the intrest rate is 5% flat rate per annum. The program should display the total monthly payment, and should alsoo show … 
|
|
|
write a program which will print power of 2 use loop 2 ^ 0 1 2 ^ 1 2 2 ^ 2 3 2 ^ 3 4
|
|
|
I've got that. that should be displayed after log on ( it can be rewrite with use IF statement) [CODE]Private Sub cmdLogon_Click() Dim age As Integer age = InputBox("please enter your age") Select Case age Case Is >= 18 MsgBox "you are" & " " & age & ", let's …
|