编写VB程序，求三个数中最大值MAX。要求：用文本框输入整数，用标签显示结果，画出窗体效果。

窗体上放3个文本框text1,text2,text3和一个标签Label1，一个按钮Command1，双击按钮，里边输入以下代码

max=val(text1text)

a=val(text2text)

b=val(text3text)

if max<a then max =a

if max<b then max=b

label1caption=max

private void Form2_Paint(object sender, EventArgs e)

{

Graphics g = thisCreateGraphics();

Rectangle r1 = new Rectangle(20, 20, 50, 50);

Rectangle r2 = new Rectangle(80, 20, 80, 100);

gDrawRectangle(PensBlue, r1);

gFillRectangle(BrushesRed, r2);

}

//用这个事件Form2_Paint

这个就非常多啦，VisualStudio，Qt，IDEA，Delphi，PowerBuilder等这些软件都可以，直接拖拽控件就可设计Windows窗体应用程序，下面我简单介绍一下：

VisualStudio

这是微软开发的一个非常著名的IDE集成环境，主要用于Windows环境下开发使用，对于Windows窗体应用程序，主要是WinForm、WPF、MFC等，可用控件非常丰富，可以直接拖拽设置设计UI界面，兼容性和扩展性也非常好，是Windows平台下主要的窗体应用程序开发软件：

Qt

这是一个基于C++的图形用户界面应用程序开发框架，免费、开源、跨平台，应用非常广泛，提供可视化组件非常多，可以直接拖拽设计Windows窗体程序，还可以利用QSS进行界面美化，如果你需要跨平台应用，并且要基于C++进行，那么可以考虑学习一下这框架，非常不错，值得学习和使用：

IDEA

这是一个Java集成开发环境，在业界非常受欢迎，已经集成了Windows窗体应用程序设计，可用组件众多（基于swing），可以直接拖拽设计UI界面，如果你对Java编程比较熟悉的话，可以使用一下这个软件，非常不错：

Delphi

这是Windows平台下一个非常著名的应用程序开发工具，以可视化的图形用户界面为开发工具，可用控件众多，可以直接拖拽设计UI界面，所见即所得，非常方便，开发、编译和运行效率都非常高，在早期的Windows窗体设计中经常会用到，不过随着Qt、WinForm等的兴起，Delphi应用的范围越来越小，正在逐渐走向没落：

PowerBuilder

这也是Windows平台下一个非常不错的可视化编程工具，和Delphi一样，在早期的Windows窗体程序设计中，经常会用到，内置控件众多，可以直接拖拽编辑设计UI界面，支持高效的应用程序开发，查询、报表和图形功能强大，对于桌面C/S应用程序开发来说，也是一个不错的选择，不过随着新技术的兴起，PB也在逐渐走向没落，使用的人也越来越少：

目前，就分享这5个Windows窗体应用程序开发软件吧，前3个软件是目前主流的窗体开发软件，后2个软件正在逐渐走向没落，只要你有一定的编程基础，熟悉一下相关软件的使用，很快就能掌握的，网上也有相关教程和资料，介绍的非常详细，感兴趣的话，可以搜一下，希望以上分享的内容能对你有所帮助吧，也欢迎大家评论、留言进行补充。

使用VisualC++开发Windows窗体项目,通常与使用任何其他NET语言(如VisualBasicNET或C#)进行开发并无不同。

首先添加一个窗体，在这个窗体上加一个文本框的控件，在这个文本框的单击事件中写如下的程序：

Dim num, sum, it(1), n, t, h

Private Sub Form_Click()

File1Refresh

sum = 0

List1Clear

For i = 0 To File1ListCount - 1

t = Split(File1List(i), "")(UBound(Split(File1List(i), "")))

If LCase(t) = LCase("jpg") Or LCase(t) = LCase("bmp") Or LCase(t) = LCase("gif") Then List1AddItem File1List(i): sum = sum + 1

Next

h = Rnds(sum)

Print h

Image1Picture = LoadPicture(List1List(h))

End Sub

Private Sub Form_Load()

File1Visible = 0

List1Visible = 0

num = -1

End Sub

Function Rnds(ByVal Value)

re:

DoEvents

Randomize

n = Fix(Rnd Value)

If num = 1 Then num = -1

num = num + 1

it(num) = n

If it(0) = it(1) Then GoTo re

Rnds = n

End Function

'添加image1、file1、list1控件各一个

以上就是关于编写VB程序，求三个数中最大值MAX。要求：用文本框输入整数，用标签显示结果，画出窗体效果。全部的内容，包括:编写VB程序，求三个数中最大值MAX。要求：用文本框输入整数，用标签显示结果，画出窗体效果。、C#窗体程序画了一个矩形，但是无法显示，程序如下、用什么软件开发windows窗体应用小程序等相关内容解答，如果想了解更多相关内容，可以关注我们，你们的支持是我们更新的动力！