Dismiss Notice
Join Physics Forums Today!
The friendliest, high quality science and math community on the planet! Everyone who loves science is here!

Hello im new in this one and i need help

  1. Apr 6, 2012 #1
    I need help in solving the two simple task, and I will be very grateful if you helped me.

    1)Write a program that prints the textbox:


    1
    121
    12321
    1234321
    123454321

    2) Write a program that brings the input sentence.In this sentence instead of the letter A there is the letter X and show theat into the newly obtained string.

    Thanks a lot!
     
  2. jcsd
  3. Apr 6, 2012 #2

    chiro

    User Avatar
    Science Advisor

    Hey i try and welcome to the forums.

    Can you show us any code you've written along with any of your thoughts and what you've tried and thought about trying?
     
  4. Apr 6, 2012 #3
    I tried to do that, but we do not succeed.

    here code:


    Public Class Form1
    Dim m(10) As Char
    Dim i, j, pr As Integer
    Dim unos As Char
    Dim postoji As Boolean


    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
    Do While i < 11
    postoji = False
    unos = InputBox("unesi nesto")
    ListBox1.Items.Add(unos)


    For j = 1 To i - 1
    If unos = m(j) Then
    postoji = True
    pr = j

    End If
    Next
    Loop

    If Not (postoji) Then
    m(i) = unos
    i = i + 1

    i = i - 1

    End If
     
  5. Apr 6, 2012 #4

    chiro

    User Avatar
    Science Advisor

    I'm going to put your code in the tags first.

    To do this you use the CODE tag with the square braces with /CODE at the end.

    Code (Text):

    Public Class Form1
        Dim m(10) As Char
        Dim i, j, pr As Integer
        Dim unos As Char
        Dim postoji As Boolean


        Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
            Do While i < 11
                postoji = False
                unos = InputBox("unesi nesto")
                ListBox1.Items.Add(unos)


                For j = 1 To i - 1
                    If unos = m(j) Then
                        postoji = True
                        pr = j

                    End If
                Next
            Loop

            If Not (postoji) Then
                m(i) = unos
                i = i + 1
           
                i = i - 1

            End If
    End Form1
     
     
  6. Apr 6, 2012 #5

    jtbell

    User Avatar

    Staff: Mentor

    Is this Python?
     
  7. Apr 6, 2012 #6

    chiro

    User Avatar
    Science Advisor

    OK, let's take it from the top.

    The first thing you should realize that for creating the string is that you should decompose your string creation into just one routine that creates the string for the textbook (using an actual string object) and then assign this string to the value of the textbook.

    For this function we should give the number of lines we want to create and then pass that to a function. Since this is a small routine, I'll write the routine and get your take on it.

    Code (Text):


    Sub CalculateString(String s, ByVal n As Integer)
       s = ""
     
       dim x as integer
       dim i as integer
     
       for x = 1 to n
            for i = 1 to x
               s = s + Trim(Str(x))  
            end for
            for i = x-1 to 1
               s = s + Trim(Str(x))
            end for
            s = s + VbCrLf
       end for
    End Sub
     
    I'm assuming that you pass the string by reference instead of by value and you could turn this into a function if you want to.
     
  8. Apr 6, 2012 #7

    chiro

    User Avatar
    Science Advisor

    It's Visual Basic.
     
Know someone interested in this topic? Share this thread via Reddit, Google+, Twitter, or Facebook




Similar Discussions: Hello im new in this one and i need help
Loading...