用vb 设计程序：使用一个输出，使用label.使用两个单选按钮，一个caption是周长，一个是面积。

Private Sub Command1_Click()

Dim s As Double

r = Val(Text1Text)

Const pi = 314159265

s = pi r r

Label1Caption = "圆的面积为 " & s

End Sub

Private Sub Command2_Click()

Dim c As Double

r = Val(Text1Text)

Const pi = 314159265

c = 2 pi r

Label2Caption = "圆的周长为 " & c

End Sub

VB程序设计让标签移到右上角可使用Move方法实现。

Move 方法，用以移动 MDIForm、Form 或控件。不支持命名参数。

说明

只有 left

参数是必须的。但是，要指定任何其它的参数，必须先指定出现在语法中该参数前面的全部参数。例如，如果不先指定 left 和 top 参数，则无法指定 width

参数。任何没有指定的尾部的参数则保持不变。

实现代码：

Private Sub Form_Click()

    Dim left, top, width, height

    top = 0

    left = MeScaleWidth - Label1width

    width = Label1width

    height = Label1height

    Label1Move left, top, width, height

End Sub

#ifndef WIDGET_H

#define WIDGET_H

#include <QtGui/QWidget>

#include <QPushButton>

#include <QLabel>

#include <QHBoxLayout>

class Widget : public QWidget

{

Q_OBJECT

public:

Widget(QWidget parent = 0);

~Widget();

QPushButton clearNO,addNO;

QLabel label;

QHBoxLayout qhboxlayout;

private slots:

void clearNOhandle();

void addNOhandle();

};

#endif // WIDGET_H

///////////widgetcpp

#include "widgeth"

Widget::Widget(QWidget parent)

: QWidget(parent)

{

clearNO =new QPushButton("CLEAR");

addNO =new QPushButton("ADD");

label =new QLabel("0");

qhboxlayout =new QHBoxLayout(this);

qhboxlayout->addWidget(label);

qhboxlayout->addWidget(clearNO);

qhboxlayout->addWidget(addNO);

connect(clearNO,SIGNAL(clicked()),this,SLOT(clearNOhandle()));

connect(addNO,SIGNAL(clicked()),this,SLOT(addNOhandle()));

}

void Widget::addNOhandle(){

QString nostr;

int no;

nostr = label->text();

no = nostrtoInt();

no++;

nostrsetNum(no);

label->setText(nostr);

}

////////main函数

void Widget::clearNOhandle(){

label->setText("0");

}

Widget::~Widget()

{

}

#include <QtGui/QApplication>

#include "widgeth"

int main(int argc, char argv[])

{

QApplication a(argc, argv);

Widget w;

wshow();

return aexec();

}

1、PLC编程软件（西门子、三菱、AB等）。

2、工控组态软件（如：WinCC 、组态王、物控等）。

3、触摸屏组态软件（如：WinCC flexible等）。

4、DCS相关软件等等。

注意事项：

1、西门子TIA Portal

是西门子工业自动化集团发布的一款全新的全集成自动化软件。它是业内首个采用统一的工程组态和软件项目环境的自动化软件，几乎适用于所有自动化任务。借助该全新的工程技术软件平台，用户能够快速、直观地开发和调试自动化系统。

2、西门子step7

STEP7是西门子的最经典的编程软件，其中对应着西门子S7-300/400系列，属于西门子旧款PLC的代表作。STEP 7具有以下功能：硬件配置和参数设置、通讯组态、编程、测试、启动和维护、文件建档、运行和诊断功能等。

3、三菱GX works

三菱PLC编程软件适用于Q、QnU、QS、QnA等全系列可编程控制器。三菱PLC编程软件GX Developer定位为可编程控制器综合开发平台，支持梯形图、指令表、SFC、ST及FB、Label语言程序设计，网络参数设定，可进行程序的线上更改，异地读写PLC程序功能。现在常用GX works。

VBNET Label控件用于显示文本，是设计应用程序界面时经常要用到的控件之一，主要是用于显示其他控件名称，描述程序运行状态或标识程序运行的结果信息等等，响应程序的事件或跟踪程序运行的结果。

使用Label控件的情况很多，但用Label控件显示的信息一般都不是描述Label控件自身的特性，而是描述其他控件的属性或特征（如名称等）。例如，可用Label控件为文本框（TextBox）、列表框（ListBox）、组合框（ComboBox）等控件添加描述性的信息。

以上就是关于用vb 设计程序：使用一个输出，使用label.使用两个单选按钮，一个caption是周长，一个是面积。全部的内容，包括:用vb 设计程序：使用一个输出，使用label.使用两个单选按钮，一个caption是周长，一个是面积。、VB程序设计如何让标签移到右上角、QT编程如何在一个qmainwindow窗口顶部加一个label呀，就是跟窗口标题在一行的等相关内容解答，如果想了解更多相关内容，可以关注我们，你们的支持是我们更新的动力！