Results 1 to 5 of 5

Thread: Changing a field length and its values in VB.NET

Threaded View

  1. #1

    Thread Starter
    Hyperactive Member pourkascheff's Avatar
    Join Date
    Apr 2020
    Location
    LocalHost
    Posts
    384

    Changing a field length and its values in VB.NET

    Hi all.
    Consider a field of variables like below:
    Code:
        Private Sendcmd() As Byte
    
        Public Sub New()
            InitializeComponent()
        End Sub
    There is a NumericUpDown control (called SendLenght) which determines Sendcmd length i.e. from 1 to 64.
    By clicking a button, filling Sendcmd with NumericUpDown values from 1 to current value of SendLenght. (There are 64 NumericUpDown maximum)

    How can I do such thing in VB.NET?
    I tried for loop as shown below but I suspected an array or collection making is required.
    Code:
    Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
            Dim NumericUpDown As NumericUpDown() = {NumericUpDown1, NumericUpDown2, NumericUpDown3, NumericUpDown4, NumericUpDown5, NumericUpDown6, NumericUpDown7, NumericUpDown8, NumericUpDown9, NumericUpDown10, NumericUpDown11, NumericUpDown12, NumericUpDown13, NumericUpDown14, NumericUpDown15, NumericUpDown16, NumericUpDown17, NumericUpDown18, NumericUpDown19, NumericUpDown20, NumericUpDown21, NumericUpDown22, NumericUpDown23, NumericUpDown24, NumericUpDown25, NumericUpDown26, NumericUpDown27, NumericUpDown28, NumericUpDown29, NumericUpDown30, NumericUpDown31, NumericUpDown32, NumericUpDown33, NumericUpDown34, NumericUpDown35, NumericUpDown36, NumericUpDown37, NumericUpDown38, NumericUpDown39, NumericUpDown40, NumericUpDown41, NumericUpDown42, NumericUpDown43, NumericUpDown44, NumericUpDown45, NumericUpDown46, NumericUpDown47, NumericUpDown48, NumericUpDown49, NumericUpDown50, NumericUpDown51, NumericUpDown52, NumericUpDown53, NumericUpDown54, NumericUpDown55, NumericUpDown56, NumericUpDown57, NumericUpDown58, NumericUpDown59, NumericUpDown60, NumericUpDown61, NumericUpDown62, NumericUpDown63, NumericUpDown64}
            For i As Decimal = 1 To SendLenght.Value
                Sendcmd(i - 1)=Sendcmd(i - 1) {NumericUpDown i - 1}   '<-- End of statement expected error to this line
            Next
        End Sub
    Thanks in advanced.

    ______________________________________________
    /UPDATE/
    Expected results:

    For SendLenght.Value = 1
    Code:
    Sendcmd(1) = {NumericUpDown1.Value}
    For SendLenght.Value = 2
    Code:
    Sendcmd(2) = {NumericUpDown1.Value, NumericUpDown2.Value}
    For SendLenght.Value = 10
    Code:
    Sendcmd(10) = {NumericUpDown1.Value, NumericUpDown2.Value, NumericUpDown3.Value, NumericUpDown4.Value, NumericUpDown5.Value, NumericUpDown6.Value, NumericUpDown7.Value, NumericUpDown8.Value, NumericUpDown9.Value, NumericUpDown10.Value}
    Last edited by pourkascheff; Jul 17th, 2021 at 06:01 AM.

Tags for this Thread

Posting Permissions

  • You may not post new threads
  • You may not post replies
  • You may not post attachments
  • You may not edit your posts
  •  



Click Here to Expand Forum to Full Width