在vba中声明(自动)变量

时间:2016-02-23 21:07:37

标签: vba excel-vba excel

是否可以在vba中声明(自动)变量并增加数量? 我必须Dim 50变量,比如Var1到Var50 是否可以使用vba代码

我所有的努力(下一个连接都没有用)

结果应该是;

将Var1调整为整数 Dim Var2为整数 。 。 Dim Var50为整数

1 个答案:

答案 0 :(得分:3)

使用

Var(1) = 1
Var(2) = 2
Var(3) = 3
Var(4) = 4
Var(5) = 5
Var(6) = 6
Var(7) = 7
Var(8) = 8
Var(9) = 9
Var(10) = 10
Var(11) = 11
Var(12) = 12
Var(13) = 13
Var(14) = 14
Var(15) = 15
Var(16) = 16
Var(17) = 17
Var(18) = 18
Var(19) = 19
Var(20) = 20
Var(21) = 21
Var(22) = 22
Var(23) = 23
Var(24) = 24
Var(25) = 25
Var(26) = 26
Var(27) = 27
Var(28) = 28
Var(29) = 29
Var(30) = 30
Var(31) = 31
Var(32) = 32
Var(33) = 33
Var(34) = 34
Var(35) = 35
Var(36) = 36
Var(37) = 37
Var(38) = 38
Var(39) = 39
Var(40) = 40
Var(41) = 41
Var(42) = 42
Var(43) = 43
Var(44) = 44
Var(45) = 45
Var(46) = 46
Var(47) = 47
Var(48) = 48
Var(49) = 49
Var(50) = 50

然后你可以为每个设置值

if(isset($_POST['name'], $_POST['email'], $_POST['rating']$_POST['comment'], $_POST['interest'])){

                    $name = $_POST['name']);
                    $email = $_POST(['email']);
                    $rating = $_POST['rating']);
                    $comment = $_POST(['comment']);
                    $interest = $_POST(['interest']);


$sql = "INSERT INTO data ". "(E-Mail, Name, Bewertung, Kommentar, Thema) " . "VALUES('$email', '$name', '$rating', '$comment', '$e', '$interest')";
mysql_select_db('DATABASE NAME');
            $retval = mysql_query($sql, $conn); //$conn for your connection to database

            if(! $retval) {die('Could not enter data: ' . mysql_error());}}
}