VB Visual Basic 2015如何使用字符串设置名称?

时间:2016-04-16 14:16:09

标签: vb.net visual-studio variables object

我有很多picterbox对象,例如 mybox1001big,mybox1002big,mybox1003big 等。

我想在代码选择名称中使用一些字符串或整数,如:

Dim ident as integer
ident = 1002
mybox[ident]big.Image = temporary.Image

......但这不起作用。解决办法是什么?

3 个答案:

答案 0 :(得分:0)

您可以使用Controls集合按名称查找控件。

以下代码假定控件直接位于表单表面上。如果它嵌套在其他控件中,请用适当的控件名替换Me

Dim ident as integer
ident = 1002
Me.Controls("mybox" & ident.ToString & "big").Image = temporary.Image

答案 1 :(得分:0)

如果你想要一个方法绕过PictureBox的所有表单容器,那么你可以使用这个方法;

public static IEnumerable<T> GetControlsOfType<T>(Control root)
where T : Control
{
var t = root as T;
if (t != null) yield return t;

var container = root as ContainerControl;
if (container != null)
    foreach (Control c in container.Controls)
        foreach (var i in GetControlsOfType<T>(c))
            yield return i;
}

然后做这样的事情

ident = 1002
foreach (var pictureBox in GetControlsOfType<PictureBox>(theForm)) 
{
    //Then use Pradeeps code here
    //Me.Controls("mybox" & ident.ToString & "big").Image = temporary.Image
    ident++;
}

答案 2 :(得分:0)

这个解决方案怎么样?

<?php

/**
 * @file
 * Bartik's theme implementation to display a node.
 *
 * Available variables:
 * - $title: the (sanitized) title of the node.
 * - $content: An array of node items. Use render($content) to print them all,
 *   or print a subset such as render($content['field_example']). Use
 *   hide($content['field_example']) to temporarily suppress the printing of a
 *   given element.
 * - $user_picture: The node author's picture from user-picture.tpl.php.
 * - $date: Formatted creation date. Preprocess functions can reformat it by
 *   calling format_date() with the desired parameters on the $created variable.
 * - $name: Themed username of node author output from theme_username().
 * - $node_url: Direct URL of the current node.
 * - $display_submitted: Whether submission information should be displayed.
 * - $submitted: Submission information created from $name and $date during
 *   template_preprocess_node().
 * - $classes: String of classes that can be used to style contextually through
 *   CSS. It can be manipulated through the variable $classes_array from
 *   preprocess functions. The default values can be one or more of the
 *   following:
 *   - node: The current template type; for example, "theming hook".
 *   - node-[type]: The current node type. For example, if the node is a
 *     "Blog entry" it would result in "node-blog". Note that the machine
 *     name will often be in a short form of the human readable label.
 *   - node-teaser: Nodes in teaser form.
 *   - node-preview: Nodes in preview mode.
 *   The following are controlled through the node publishing options.
 *   - node-promoted: Nodes promoted to the front page.
 *   - node-sticky: Nodes ordered above other non-sticky nodes in teaser
 *     listings.
 *   - node-unpublished: Unpublished nodes visible only to administrators.
 * - $title_prefix (array): An array containing additional output populated by
 *   modules, intended to be displayed in front of the main title tag that
 *   appears in the template.
 * - $title_suffix (array): An array containing additional output populated by
 *   modules, intended to be displayed after the main title tag that appears in
 *   the template.
 *
 * Other variables:
 * - $node: Full node object. Contains data that may not be safe.
 * - $type: Node type; for example, story, page, blog, etc.
 * - $comment_count: Number of comments attached to the node.
 * - $uid: User ID of the node author.
 * - $created: Time the node was published formatted in Unix timestamp.
 * - $classes_array: Array of html class attribute values. It is flattened
 *   into a string within the variable $classes.
 * - $zebra: Outputs either "even" or "odd". Useful for zebra striping in
 *   teaser listings.
 * - $id: Position of the node. Increments each time it's output.
 *
 * Node status variables:
 * - $view_mode: View mode; for example, "full", "teaser".
 * - $teaser: Flag for the teaser state (shortcut for $view_mode == 'teaser').
 * - $page: Flag for the full page state.
 * - $promote: Flag for front page promotion state.
 * - $sticky: Flags for sticky post setting.
 * - $status: Flag for published status.
 * - $comment: State of comment settings for the node.
 * - $readmore: Flags true if the teaser content of the node cannot hold the
 *   main body content.
 * - $is_front: Flags true when presented in the front page.
 * - $logged_in: Flags true when the current user is a logged-in member.
 * - $is_admin: Flags true when the current user is an administrator.
 *
 * Field variables: for each field instance attached to the node a corresponding
 * variable is defined; for example, $node->body becomes $body. When needing to
 * access a field's raw values, developers/themers are strongly encouraged to
 * use these variables. Otherwise they will have to explicitly specify the
 * desired field language; for example, $node->body['en'], thus overriding any
 * language negotiation rule that was previously applied.
 *
 * @see template_preprocess()
 * @see template_preprocess_node()
 * @see template_process()
 */
?>

但这是针对对象的,如何将它用于变量?

Dim ident As Integer = 1002
Dim name = String.Format("mybox{0}big", ident)
Dim elem = TryCast(Me.Controls(name), picturebox)
If elem IsNot Nothing Then elem.Image = ...